[Koha-devel] CVS: koha insertdata.pl,1.2,1.3

[Chris Cornack]

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv25915

Modified Files:
        insertdata.pl 
Log Message:
Fixing stupid bug that was causing the sql insert command to break if a person 
had a '
in their name


Index: insertdata.pl
===================================================================
RCS file: /cvsroot/koha/koha/insertdata.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** insertdata.pl       2001/03/07 01:48:48     1.2
--- insertdata.pl       2001/03/07 21:12:47     1.3
***************
*** 24,27 ****
--- 24,29 ----
  foreach my $key (@names){
    $data{$key}=$input->param($key);
+   $data{$key}=~ s/\'/\\\'/g;
+   $data{$key}=~ s/\"/\\\"/g;
  }
  my $dbh=C4Connect;