From 04bf77f7feace19817dc7c1e0efa75c6112558a8 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 Signed-off-by: Kathy Lussier --- 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.43.2