From 8a1598e34dfea1c61c8ffa1c8f676b0e8099339a Mon Sep 17 00:00:00 2001 From: Pasi Kallinen Date: Fri, 28 Jun 2013 10:22:59 +0300 Subject: [PATCH] Don't let pref_ou repeat in staff recent searches list Signed-off-by: Pasi Kallinen Signed-off-by: Ben Shum --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm index 8d81cf5389..5e3654142f 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Search.pm @@ -137,7 +137,7 @@ sub _prepare_biblio_search { } my $pref_ou = $ctx->{pref_ou}; - if (defined($pref_ou) and $pref_ou ne '' and $pref_ou != $org and ($pref_ou ne $ctx->{aou_tree}->()->id)) { + if (defined($pref_ou) and $pref_ou ne '' and $pref_ou != $org and ($pref_ou ne $ctx->{aou_tree}->()->id) and not $query =~ / pref_ou\(\S+\)/) { my $plib = $ctx->{get_aou}->($pref_ou)->shortname; $query .= " pref_ou($plib)"; } -- 2.43.2