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: Bruno Toumi
Subject: [Koha-cvs] koha/members memberentry.pl [rel_3_0]
Date: Fri, 13 Oct 2006 11:21:54 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     Bruno Toumi <btoumi>    06/10/13 11:21:54

Modified files:
        members        : memberentry.pl 

Log message:
        bug fix : modify condition to accept  ' and " in text  fields

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

Patches:
Index: memberentry.pl
===================================================================
RCS file: /sources/koha/koha/members/memberentry.pl,v
retrieving revision 1.38.2.6
retrieving revision 1.38.2.7
diff -u -b -r1.38.2.6 -r1.38.2.7
--- memberentry.pl      12 Oct 2006 14:37:15 -0000      1.38.2.6
+++ memberentry.pl      13 Oct 2006 11:21:54 -0000      1.38.2.7
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: memberentry.pl,v 1.38.2.6 2006/10/12 14:37:15 btoumi Exp $
+# $Id: memberentry.pl,v 1.38.2.7 2006/10/13 11:21:54 btoumi Exp $
 
 # Copyright 2006 SAN OUEST PROVENCE et Paul POULAIN
 #
@@ -104,8 +104,7 @@
        my @names=$input->param;
        foreach my $key (@names){
                $data{$key}=$input->param($key)||'';
-               $data{$key}=~ s/\'/\\\'/g;
-               $data{$key}=~ s/\"/\\\"/g;
+               $data{$key}=~ s/\"/&quot;/gg;
        }
 
        # WARN : some tests must be done whatever the step, because the 
librarian can click on any tab.
@@ -435,11 +434,6 @@
        } else {
                $template->param( sort2 => $data{'sort2'});
        }
-
-       
-       $data{'opacnotes'} =~ s/\\//g;
-       $data{'borrowernotes'} =~ s/\\//g;
-
        # increase step to see next page
         if ($nok) {
             foreach my $error (@errors) {
@@ -451,7 +445,6 @@
             $step++;
         }
 
-
        $template->param(
                BorrowerMandatoryField => 
C4::Context->preference("BorrowerMandatoryField"),#field to test with javascript
                category_type   => $category_type,#to know the category type of 
the borrower




reply via email to

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