From 6ce092cc02b4453fff0357b03aee0963461e9f75 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Mon, 16 Jul 2012 16:56:10 -0400 Subject: [PATCH] Squelch uninitialized var warning from hold_copy_targeter open-ils.storage_stderr.log was getting filled with entries like: "Use of uninitialized value in concatenation (.) or string at /usr/local/share/perl/5.10.1/OpenILS/Application/Storage/Publisher/action.pm" ... consuming disk space endlessly. Stop that! (Stealing Lebbeous' footwork and providing a slightly different solution.) Signed-off-by: Bill Erickson Signed-off-by: Ben Shum Signed-off-by: Dan Scott --- .../src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm index 7c07e6f188..ada8dc4df2 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Publisher/action.pm @@ -1285,7 +1285,7 @@ sub new_hold_copy_targeter { my @good_copies; for my $c (@$all_copies) { # current target - next if ($c->id eq $hold->current_copy); + next if ($hold->current_copy and $c->id eq $hold->current_copy); # skip on circ lib is closed IFF we care my $ignore_closing; -- 2.11.0