Fix syntax error
authorsenator <senator@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 2 Mar 2010 15:53:59 +0000 (15:53 +0000)
committersenator <senator@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 2 Mar 2010 15:53:59 +0000 (15:53 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@15653 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Acq/Financials.pm

index 16acddf..9901e69 100644 (file)
@@ -1215,7 +1215,7 @@ sub po_events {
     }
     my $po_events = $e->json_query($query);
 
-    my $flesh_fields = ( 'atev' => [ 'event_def' ] };
+    my $flesh_fields = { 'atev' => [ 'event_def' ] };
     my $flesh_depth = 1;
 
     for my $id (@$po_events) {