adding sane default sort to transits by lib
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 1 Sep 2006 06:02:14 +0000 (06:02 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 1 Sep 2006 06:02:14 +0000 (06:02 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@5827 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Circ/Transit.pm

index 1cc3631..dd86011 100644 (file)
@@ -308,18 +308,24 @@ sub transits_by_lib {
        return $e->event unless $e->allowed('VIEW_CIRCULATIONS'); # eh.. basically the same permission
 
        my $tos = $e->search_action_transit_copy(
-               {
+               [{
                        dest => $orgid,
                        dest_recv_time => undef,
                },
+               {
+                       order_by => { atc => 'source_send_time' }
+               }]
                { idlist => 1 }
        );
 
        my $froms = $e->search_action_transit_copy(
-               {
+               [{
                        source => $orgid,
                        dest_recv_time => undef,
                },
+               {
+                       order_by => { atc => 'source_send_time' }
+               }]
                { idlist => 1 }
        );