Fix for PINES-Specific Holdings Sort Order

See Tom Berezansky's original fix at:
http://git.evergreen-ils.org/?p=evergreen/pines.git;a=commit;h=adc566e152d10796b73c992a16ae46e69cc3ab77

Some changes to the base code required this fix to be updated.

Signed-off-by: Terran McCanna <tmccanna@georgialibraries.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
index c4c14d0..f3cc243 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Record.pm
@@ -393,8 +393,14 @@ sub mk_copy_query {
                         where => {id => $filter_orgs}
                     }
                 }
-            }
-        }};
+            },
+            join => { 'parent' => { 'class' => 'aou', 'fkey' => 'parent_ou'} }
+        }
+    }}
+    else {
+        $query->{from}->{acp}->[1] = {aou => { 
+            join => { 'parent' => { 'class' => 'aou', 'fkey' => 'parent_ou'} } }
+        }; 
     };
 
     my $ou_sort_param = [$org, $pref_ou ];