From 1239df730046760592f6d9f76a4f35e14bc5d1a7 Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sat, 31 May 2008 19:45:10 +0000
Subject: [PATCH] fix sort and dir adv search syntax

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_2_2@9754 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
index 1671861668..0b5b26943d 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Search/Biblio.pm
@@ -493,6 +493,10 @@ sub multiclass_query {
             $arghash->{language} = [] unless $arghash->{language};
             push(@{$arghash->{language}}, $value);
 
+        } elsif($type =~ /^sort/o) {
+            # sort and sort_dir modifiers
+            $arghash->{$type} = $value;
+             
         } else {
             # append the search term to the term under construction
             $search->{$type} =  {} unless $search->{$type};
-- 
2.11.0