Added a FIXME comment.
authorarensb <arensb>
Sun, 13 Oct 2002 06:03:38 +0000 (06:03 +0000)
committerarensb <arensb>
Sun, 13 Oct 2002 06:03:38 +0000 (06:03 +0000)
C4/Input.pm
C4/Maintainance.pm

index 5c1e609..87abce1 100644 (file)
@@ -137,6 +137,7 @@ sub checkvalidisbn {
                 $c+=$digit*(10-$i);
             }
            $c=$c%11;  # % is the modulus function
+                       # FIXME - %=
             ($c==10) && ($c='X');
             # FIXME - $isbngood = $c eq $checksum;
             if ($c eq $checksum) {
index 6f749bc..af9cca5 100644 (file)
@@ -196,7 +196,7 @@ sub undeletebib{
     $query="Insert into biblio values (";
     foreach my $temp (@data){
       $temp=~ s/\'/\\\'/g;
-      $query=$query."'$temp',";
+      $query=$query."'$temp',";                # FIXME - .=
     }
     $query=~ s/\,$/\)/;
     #   print $query;