@@ -, +, @@ reg --- opac/opac-memberentry.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) --- a/opac/opac-memberentry.pl +++ a/opac/opac-memberentry.pl @@ -20,7 +20,6 @@ use Modern::Perl; use CGI qw ( -utf8 ); use Digest::MD5 qw( md5_base64 md5_hex ); use String::Random qw( random_string ); -use HTML::Entities; use C4::Auth; use C4::Output; @@ -403,7 +402,7 @@ sub ParseCgiForBorrower { foreach ( $cgi->param ) { if ( $_ =~ '^borrower_' ) { my ($key) = substr( $_, 9 ); - $borrower{$key} = HTML::Entities::encode( $scrubber->scrub( scalar $cgi->param($_) ) ); + $borrower{$key} = $scrubber->scrub( scalar $cgi->param($_) ); } } --