[Koha-devel] CVS: koha/C4 Maintainance.pm,1.3,1.4

[Chris Cormack]

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

Modified Files:
	Maintainance.pm 
Log Message:
Fixed apostrophe ' handling



Index: Maintainance.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Maintainance.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** Maintainance.pm	15 Mar 2001 10:15:51 -0000	1.3
--- Maintainance.pm	26 Feb 2002 09:31:14 -0000	1.4
***************
*** 76,80 ****
    my ($sub,$oldsub)=@_;
    my $dbh=C4Connect;
!   my $query="update bibliosubject set subject='$sub' where subject='$oldsub'";
    my $sth=$dbh->prepare($query);
    $sth->execute;
--- 76,82 ----
    my ($sub,$oldsub)=@_;
    my $dbh=C4Connect;
!   $sub=$dbh->quote($sub);
!   $oldsub=$dbh->quote($oldsub);
!   my $query="update bibliosubject set subject=$sub where subject=$oldsub";
    my $sth=$dbh->prepare($query);
    $sth->execute;