Changeset 11238

Timestamp:

2006-02-13T11:55:10+13:00 (18 years ago)

Author:

mdewsnip

Message:

Now escapes all '&' characters, to prevent problems with undefined entities. This could cause problems if the exploded metadata already contains entities (which will be escaped again).

File:

• trunk/gsdl/bin/script/explode_metadata_database.pl (modified) (2 diffs)

trunk/gsdl/bin/script/explode_metadata_database.pl

@@ -303 +303 @@
 
     # Make $value XML-safe
+    $value =~ s/&/&/g;  # May mess up existing entities!
     $value =~ s/</&lt;/g;
     $value =~ s/>/&gt;/g;
@@ -310 +311 @@
     # should we be checking for them too?
     # this may not get all possibilities
-    $value =~ s/&([^;\s]*(\s|$))/&amp;$1/g;
+    # $value =~ s/&([^;\s]*(\s|$))/&amp;$1/g;
 
     print $metadata_xml_file "      <Metadata mode=\"accumulate\" name=\"$meta_prefix$field\">$value</Metadata>\n";