koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] koha/members memberentry.pl [rel_3_0]


From: paul poulain
Subject: [Koha-cvs] koha/members memberentry.pl [rel_3_0]
Date: Thu, 25 Jan 2007 11:02:08 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     paul poulain <tipaul>   07/01/25 11:02:08

Modified files:
        members        : memberentry.pl 

Log message:
        Don't escape " in borrowernotes or opacnote : the librarian must be 
able to insert html in those fields, to hilight or put a link

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/memberentry.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.38.2.23&r2=1.38.2.24

Patches:
Index: memberentry.pl
===================================================================
RCS file: /sources/koha/koha/members/memberentry.pl,v
retrieving revision 1.38.2.23
retrieving revision 1.38.2.24
diff -u -b -r1.38.2.23 -r1.38.2.24
--- memberentry.pl      10 Jan 2007 16:31:15 -0000      1.38.2.23
+++ memberentry.pl      25 Jan 2007 11:02:08 -0000      1.38.2.24
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: memberentry.pl,v 1.38.2.23 2007/01/10 16:31:15 toins Exp $
+# $Id: memberentry.pl,v 1.38.2.24 2007/01/25 11:02:08 tipaul Exp $
 
 # Copyright 2006 SAN OUEST PROVENCE et Paul POULAIN
 #
@@ -104,7 +104,7 @@
        my @names=$input->param;
        foreach my $key (@names){
                $data{$key}=$input->param($key)||'';
-               $data{$key}=~ s/\"/&quot;/gg;
+               $data{$key}=~ s/\"/&quot;/gg unless $key eq 'borrowernotes' or 
$key eq 'opacnote';
        }
 
        # WARN : some tests must be done whatever the step, because the 
librarian can click on any tab.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]