Correct syntax error in BadDebt.pm
authordbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 10 Feb 2011 15:32:00 +0000 (15:32 +0000)
committerdbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 10 Feb 2011 15:32:00 +0000 (15:32 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6_2@19425 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/WWW/BadDebt.pm

index cb7c322..72cce27 100644 (file)
@@ -100,7 +100,7 @@ sub handler {
             my $w;
 
             if ($s->xact_type eq 'circulation') {
-                $w = $cstore->request('open-ils.cstore.direct.action.circulation.retrieve' => $xact)->gather(1)->circ_lib :
+                $w = $cstore->request('open-ils.cstore.direct.action.circulation.retrieve' => $xact)->gather(1)->circ_lib;
             } elsif ($s->xact_type eq 'grocery') {
                 $w = $cstore->request('open-ils.cstore.direct.money.grocery.retrieve' => $xact)->gather(1)->billing_location;
             } elsif ($s->xact_type eq 'reservation') {