change request/gather order as short term solution to the fact that sessions are...

git-svn-id: svn://svn.open-ils.org/ILS/trunk@4697 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Authority.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Authority.pm
index 696e086..f9d7be0 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Authority.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Authority.pm
@@ -7,6 +7,7 @@ use OpenILS::Application::AppUtils;
 use XML::LibXML;
 use XML::LibXSLT;
 use OpenILS::Utils::Editor q/:funcs/;
+use OpenSRF::Utils::Logger qw/$logger/;
 
 use JSON;
 
@@ -38,15 +39,20 @@ sub crossref_authority {
 
        my $session = OpenSRF::AppSession->create("open-ils.storage");
 
+       $logger->info("authority xref search for $class=$term, limit=$limit");
+
        my $freq = $session->request(
                "open-ils.storage.authority.$class.see_from.controlled.atomic",$term, $limit);
+       my $fr = $freq->gather(1);
+
        my $areq = $session->request(
                "open-ils.storage.authority.$class.see_also_from.controlled.atomic",$term, $limit);
-
-       my $fr = $freq->gather(1);
        my $al = $areq->gather(1);
 
-       return _auth_flatten( $term, $fr, $al, 1 );
+
+       my $data = _auth_flatten( $term, $fr, $al, 1 );
+
+       return $data;
 }
 
 sub _auth_flatten {