[open-ils-commits] r9212 - trunk/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: miker
Date: 2008-04-03 20:43:23 -0400 (Thu, 03 Apr 2008)
New Revision: 9212

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
Log:
use a safer test for bool grantable flag

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-04-03 20:27:57 UTC (rev 9211)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-04-04 00:43:23 UTC (rev 9212)
@@ -855,7 +855,7 @@
 			$map->clear_id;
 		}
 
-		next if (!$all || !grep { $_->perm eq $map->perm and $_->grantable == 1 and $_->depth <= $map->depth } @$perms);
+		next if (!$all || !grep { $_->perm eq $map->perm and $U->is_true($_->grantable) and $_->depth <= $map->depth } @$perms);
 
 		#warn( "Updating permissions with method $method and session $ses and map $map" );
 		$logger->info( "Updating permissions with method $method and map $map" );