From a2ad21ac9e006514764fc828630a893d3c29f689 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Mon, 24 May 2010 11:15:18 -0400 Subject: [PATCH] removed unconditional warn introduced in previous patch Signed-off-by: Galen Charlton --- cataloguing/value_builder/callnumber.pl | 1 - 1 file changed, 1 deletion(-) diff --git a/cataloguing/value_builder/callnumber.pl b/cataloguing/value_builder/callnumber.pl index 3ed09d9fa8..2b56958aa2 100755 --- a/cataloguing/value_builder/callnumber.pl +++ b/cataloguing/value_builder/callnumber.pl @@ -96,7 +96,6 @@ sub plugin { } # If a prefix is submited, we look for the highest itemcallnumber with this prefix, and return it incremented } elsif ( $code =~ m/^[A-Z.\-]+$/ ) { - warn $code; my $sth = $dbh->prepare("SELECT MAX(CAST(SUBSTRING_INDEX(itemcallnumber,' ',-1) AS SIGNED)) FROM items WHERE itemcallnumber LIKE ?"); $sth->execute($code.' %'); if ( my $max = $sth->fetchrow ) { -- 2.39.5