From 8fb68aef4babb71b943fd08daaaecc87d4fe4cde Mon Sep 17 00:00:00 2001 From: Chris Sharp Date: Tue, 14 Jan 2014 12:50:16 -0500 Subject: [PATCH] Adding fix for KPAC hold placement. Signed-off-by: Chris Sharp --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGKPacLoader.pm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGKPacLoader.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGKPacLoader.pm index c50e1dd24b..f9eb664737 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGKPacLoader.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGKPacLoader.pm @@ -93,7 +93,7 @@ sub load_getit { ]); } - # If user is logged in and has a default pickup location, grab it + # If user is logged in and has a default pickup location for holds, grab it if ($ctx->{user}) { my $set_map = $self->ctx->{user_setting_map}; if ($$set_map{'opac.default_pickup_location'}) { @@ -101,7 +101,6 @@ sub load_getit { } } - $self->ctx->{page} = 'getit'; # repair the page return Apache2::Const::OK; } @@ -114,6 +113,11 @@ sub login_and_place_hold { my $password = $self->cgi->param('password'); my $pickup_lib = $self->cgi->param('pickup_lib'); + #Temporary workaround for selection problem - if PINES (value 1) is selected, reload page + if ($pickup_lib == '1' || $pickup_lib == '') { + return $self->load_login; + } + return Apache2::Const::HTTP_BAD_REQUEST unless $pickup_lib =~ /^\d+$/; -- 2.11.0