Revert "Bug 21986: Do not escape quotation marks when cataloguing"

[koha.git] / authorities / authorities.pl

diff --git a/authorities/authorities.pl b/authorities/authorities.pl
index 18fa5db..7ffb010 100755 (executable)
--- a/authorities/authorities.pl
+++ b/authorities/authorities.pl
@@ -136,6 +136,8 @@ sub create_input {
     
     my $index_subfield = CreateKey(); # create a specifique key for each subfield
 
+    $value =~ s/"/"/g;
+
     # determine maximum length; 9999 bytes per ISO 2709 except for leader and MARC21 008
     my $max_length = 9999;
     if ($tag eq '000') {