[open-ils-commits] r19552 - trunk/Open-ILS/src/perlmods/lib/OpenILS/Application (erickson)

svn at svn.open-ils.org svn at svn.open-ils.org
Tue Mar 1 16:19:45 EST 2011


Author: erickson
Date: 2011-03-01 16:19:39 -0500 (Tue, 01 Mar 2011)
New Revision: 19552

Modified:
   trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm
Log:
update cached user after email/password update; repaired recently-introduced typo on user transaction retrieval method

Modified: trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm	2011-03-01 18:09:57 UTC (rev 19551)
+++ trunk/Open-ILS/src/perlmods/lib/OpenILS/Application/Actor.pm	2011-03-01 21:19:39 UTC (rev 19552)
@@ -1313,6 +1313,9 @@
 
     $e->update_actor_user($db_user) or return $e->die_event;
     $e->commit;
+
+    # update the cached user to pick up these changes
+    $U->simplereq('open-ils.auth', 'open-ils.auth.session.reset_timeout', $auth, 1);
     return 1;
 }
 
@@ -1701,7 +1704,7 @@
         { 'total_owed' => { '>' => 0 } };
 
     my $method = 'open-ils.actor.user.transactions.history.still_open';
-    $method = "$method.authoritative" if $api => /authoritative/;
+    $method = "$method.authoritative" if $api =~ /authoritative/;
     my ($trans) = $self->method_lookup($method)->run($auth, $user_id, $type, $filter, $options);
 
 	if($api =~ /total/o) { 



More information about the open-ils-commits mailing list