[open-ils-commits] r17620 - trunk/Open-ILS/src/perlmods/OpenILS/Application (senator)

[svn at svn.open-ils.org]

Author: senator
Date: 2010-09-12 16:19:18 -0400 (Sun, 12 Sep 2010)
New Revision: 17620

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Serial.pm
Log:
Serials: little bugfixin on this OPAC-oriented method


Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Serial.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Serial.pm	2010-09-12 19:31:52 UTC (rev 17619)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Serial.pm	2010-09-12 20:19:18 UTC (rev 17620)
@@ -360,7 +360,7 @@
 
     my $e = new_editor();
     my $issuances = $e->json_query({
-        select  => { 'siss' => [ 'id' ] },
+        select  => {'siss' => [{"transform" => "distinct", "column" => "id"}, "date_published"]},
         from    => {
             siss => {
                 ssub => {
@@ -395,19 +395,13 @@
             },
             $$args{ou} ? ( '+sdist' => {
                 holding_lib => {
-                    'in' => {
-                        from => [
-                            'actor.org_unit_descendants',
-                            defined($$args{depth}) ? ( $$args{ou}, $$args{depth} ) :  ( $$args{ou} )
-                        ]
-                    }
+                    'in' => $U->get_org_descendants($$args{ou}, $$args{depth})
                 }
             }) : ()
         },
         $$args{limit}  ? ( limit  => $$args{limit}  ) : (),
         $$args{offset} ? ( offset => $$args{offset} ) : (),
-        order_by => [{ class => 'siss', field => 'date_published', direction => $$args{order} }],
-        distinct => 1
+        order_by => [{ class => 'siss', field => 'date_published', direction => $$args{order} }]
     });
 
     $client->respond($e->retrieve_serial_issuance($_->{id})) for @$issuances;