misc/cronjobs/update_items.pl: fixed syntax errors
authorGalen Charlton <galen.charlton@liblime.com>
Fri, 4 Jan 2008 00:43:36 +0000 (18:43 -0600)
committerJoshua Ferraro <jmf@liblime.com>
Fri, 4 Jan 2008 02:22:08 +0000 (20:22 -0600)
Fixed syntax errors preventing compilation; however,
unsure whether this is a dead utility that should be
removed outright.

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
misc/cronjobs/update_items.pl

index 15b8249..2e43bdf 100755 (executable)
@@ -37,7 +37,7 @@ GetOptions(
        'h' => \$help,
 );
 
-if ($h) {
+if ($help) {
     print $USAGE."\n";
     exit;
 }
@@ -71,7 +71,6 @@ my $biblioserverdir = C4::Context->zebraconfig('biblioserver')->{directory};
 unless (-d "$biblioserverdir/specialUpdate") {
     system("mkdir -p $biblioserverdir/specialUpdate");
     print "Info: created $biblioserverdir/specialUpdate\n";
-    $created_dir_or_file++;
 }
 
 my $outfile = "$biblioserverdir/specialUpdate/$filename";
@@ -111,7 +110,6 @@ print "fetching marc and items data, updating\n";
 #
 my ($itemnumberTag,$itemnumberSubfield) = GetMarcFromKohaField("items.itemnumber","");
 my ($date_dueTag,$date_dueSubfield) = GetMarcFromKohaField("items.issues","");
-my (
 while (my $biblionumber=$biblionumber_sth->fetchrow) {
        $count++;