[Koha-cvs] koha/admin systempreferences.pl [rel_3_0]

[paul poulain]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     paul poulain <tipaul>   06/11/01 21:21:18

Modified files:
        admin          : systempreferences.pl 

Log message:
        escaping > correctly

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/admin/systempreferences.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.34.2.5&r2=1.34.2.6

Patches:
Index: systempreferences.pl
===================================================================
RCS file: /sources/koha/koha/admin/systempreferences.pl,v
retrieving revision 1.34.2.5
retrieving revision 1.34.2.6
diff -u -b -r1.34.2.5 -r1.34.2.6
--- systempreferences.pl        30 Oct 2006 09:46:42 -0000      1.34.2.5
+++ systempreferences.pl        1 Nov 2006 21:21:18 -0000       1.34.2.6
@@ -164,7 +164,7 @@
                                $sth->execute($syspref);
                                while (my $data=$sth->fetchrow_hashref){
                                        $data->{value} =~ s/</&lt;/g;
-                                       $data->{value} =~ s/>/&lt;/g;
+                                       $data->{value} =~ s/>/&gt;/g;
                                        
$data->{value}=substr($data->{value},0,100)."..." if length($data->{value}) 
>100;
                                        push(@results,$data);
                                        $cnt++;