From rangi@users.sourceforge.net Tue Feb 26 01:31:18 2002 From: Chris Cormack To: koha-devel@lists.koha-community.org Subject: [Koha-devel] CVS: koha/maint catmaintain.pl,1.2,1.3 Date: Tue, 26 Feb 2002 01:32:04 +0000 Message-ID: MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="===============1701822075200378692==" --===============1701822075200378692== Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable Update of /cvsroot/koha/koha/maint In directory usw-pr-cvs1:/tmp/cvs-serv31272/maint Modified Files: catmaintain.pl=20 Log Message: Fixed apostrophe ' handling Index: catmaintain.pl =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /cvsroot/koha/koha/maint/catmaintain.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -r1.2 -r1.3 *** catmaintain.pl 15 Mar 2001 10:15:51 -0000 1.2 --- catmaintain.pl 26 Feb 2002 09:31:15 -0000 1.3 *************** *** 25,28 **** --- 25,29 ---- my $sub2=3D$results->[$i]->{'subject'}; $sub2=3D~ s/ /%20/g; + $sub2=3D~ s/\'/%27/g; print "\"$results->[$i]->{'subject'}\"<= br>\n"; } *************** *** 85,88 **** --- 86,90 ---- print ""; print "Show all Titles beginning with "; + print "Item Number
"; print ""; print ""; --===============1701822075200378692==--