From fba321106621ee7fa43e6c6b451f0eb2a740aa33 Mon Sep 17 00:00:00 2001 From: Jason Stephenson Date: Sun, 29 Oct 2017 15:14:41 -0400 Subject: [PATCH] Lp 1694058: Fix Issue With Place Holds Reported in Testing When staff did have to override in order to place the hold, and the "Place another hold for this title" link was subsequnetly used, the inputs for the patron barcodes and some other fields on the place holds page were duplicated. To avoid this, we now use uniq from the List::MoreUtils library when retrieving the hold targets list from the CGI parameters. Signed-off-by: Jason Stephenson --- Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm index 6095f85ed8..b6305175ed 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm @@ -14,6 +14,7 @@ $Data::Dumper::Indent = 0; use DateTime; use DateTime::Format::ISO8601; my $U = 'OpenILS::Application::AppUtils'; +use List::MoreUtils qw/uniq/; sub prepare_extended_user_info { my $self = shift; @@ -984,7 +985,7 @@ sub load_place_hold { my $cgi = $self->cgi; $self->ctx->{page} = 'place_hold'; - my @targets = $cgi->param('hold_target'); + my @targets = uniq $cgi->param('hold_target'); my @parts = $cgi->param('part'); $ctx->{hold_type} = $cgi->param('hold_type'); -- 2.11.0