From 148b3500657cb3130475d097022636db3eb29e21 Mon Sep 17 00:00:00 2001 From: Jason Stephenson Date: Sun, 28 Sep 2014 10:22:28 -0400 Subject: [PATCH] Fix typos in NCIP::ILS::Evergreen caught by perl -c. Signed-off-by: Jason Stephenson --- lib/NCIP/ILS/Evergreen.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/NCIP/ILS/Evergreen.pm b/lib/NCIP/ILS/Evergreen.pm index fd19d33..2623fdf 100644 --- a/lib/NCIP/ILS/Evergreen.pm +++ b/lib/NCIP/ILS/Evergreen.pm @@ -2345,7 +2345,7 @@ sub find_target_via_bibliographid_id { if (@idobjs) { my $stashed_problem; # Reuse $idobj from above. - foreach $idobj (@$idobjs) { + foreach $idobj (@idobjs) { my ($idvalue, $idtype, $idfield); if ($_->{BibliographicItemIdentifier}) { $idvalue = $_->{BibliographicItemIdentifier}; @@ -2364,7 +2364,7 @@ sub find_target_via_bibliographid_id { } last if ($item); } - $item = $stashed_problem if (!$tem && $stashed_problem); + $item = $stashed_problem if (!$item && $stashed_problem); } return $item; @@ -2565,7 +2565,7 @@ sub _hold_search { unless (@holds) { # Look for volume holds, the next most common: $targetid = $copy_details->{volume}->id(); - @holds = grep {$_->hold_type eq 'V' && $_->target == $tagetid} @{$holds_list}; + @holds = grep {$_->hold_type eq 'V' && $_->target == $targetid} @{$holds_list}; } unless (@holds) { # Look for copy and force holds, the least likely. -- 2.43.2