syntax error
authortoins <toins>
Fri, 13 Jul 2007 16:00:50 +0000 (16:00 +0000)
committertoins <toins>
Fri, 13 Jul 2007 16:00:50 +0000 (16:00 +0000)
cataloguing/z3950_search.pl

index f990dcc..87f7712 100755 (executable)
@@ -56,7 +56,6 @@ my $count;
 my $toggle;
 my $record;
 my $oldbiblio;
-my $dbh = C4::Context->dbh;
 my $errmsg;
 my @serverloop = ();
 my @serverhost;
@@ -205,11 +204,8 @@ else {
                         $notmarcrecord, $alreadyindb, $alreadyinfarm,
                         $imported,      $breedingid
                       )
-                      = ImportBreeding( $marcdata, 1, $serverhost[$k],
-                        $encoding[$k], $random );
-                        
-                        $encoding[$k], $random ));
-                        
+                      = ImportBreeding( $marcdata, 1, $serverhost[$k], $encoding[$k], $random );
+
                     my %row_data;
                     if ( $i % 2 ) {
                         $toggle = "#ffffcc";