[open-ils-commits] r13921 - trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher (miker)
svn at svn.open-ils.org
svn at svn.open-ils.org
Mon Aug 24 10:38:48 EDT 2009
Author: miker
Date: 2009-08-24 10:38:46 -0400 (Mon, 24 Aug 2009)
New Revision: 13921
Modified:
trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
Log:
adjusting indentation for readability
Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm 2009-08-24 03:04:23 UTC (rev 13920)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/action.pm 2009-08-24 14:38:46 UTC (rev 13921)
@@ -768,20 +768,19 @@
$self->method_lookup('open-ils.storage.transaction.commit')->run;
- if(0) { # caluclate penalties inline. Needs to be tested.
- OpenILS::Utils::Penalty->calculate_penalties(
- undef, $c->usr->to_fieldmapper->id.'', $c->circ_lib->to_fieldmapper->id.'');
+ if(0) { # caluclate penalties inline. Needs to be tested.
+ OpenILS::Utils::Penalty->calculate_penalties(
+ undef, $c->usr->to_fieldmapper->id.'', $c->circ_lib->to_fieldmapper->id.'');
+ } else {
- } else {
-
- $penalty->request(
+ $penalty->request(
'open-ils.penalty.patron_penalty.calculate',
{ patron => $c->usr->to_fieldmapper,
update => 1,
background => 1,
}
)->gather(1);
- }
+ }
} catch Error with {
my $e = shift;
More information about the open-ils-commits
mailing list