From 6dce07044218943be05b6f9d019154189130ab3e Mon Sep 17 00:00:00 2001 From: Jeff Davis Date: Mon, 22 May 2017 13:26:10 -0700 Subject: [PATCH] LP#1682296: Avoid database query error on serials batch receive To test ------- [1] Example Search -> Retrieve title by database ID -> Actions for this Record -> Serials Batch Receive -> Next -> this works as expected & receivable issues are listed. [2] Click on "Start Over"; you are prompted to "Enter an identifier for a bibliographic record" this is where the search fails Example enter "109242427" results in two errors. [3] Desired behavior - If you enter a database ID or ISSN in the "Enter an identifier for a bibliographic record" field the receivable issuances should be displayed Signed-off-by: Jeff Davis Signed-off-by: Cesar Velez Signed-off-by: Galen Charlton --- Open-ILS/src/perlmods/lib/OpenILS/Application/Serial.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Serial.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Serial.pm index 3a9aaec3f8..f0b10d2cbe 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Serial.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Serial.pm @@ -3637,7 +3637,7 @@ sub bre_by_identifier { $search->disconnect; # Un-nest results. They tend to look like [[1],[2],[3]] for some reason. - @ids = map { @{$_} } @{$search_result->{"ids"}}; + @ids = map { @{$_}[0] } @{$search_result->{"ids"}}; unless (@ids) { $e->disconnect; -- 2.43.2