Changeset 12678

Timestamp:

2006-09-05T15:38:22+12:00 (17 years ago)

Author:

kjdon

Message:

added stuff to strip new lines and escaped quotes from collection meta

File:

• trunk/gsdl3/bin/script/convert_coll_from_gs2.pl (modified) (2 diffs)

trunk/gsdl3/bin/script/convert_coll_from_gs2.pl

@@ -153 +153 @@
             if ($entry =~ /^icon/) {
             $value = format_icon_value($value);
+            } else {
+            $value = tidy_up_metadata($value);
             }
             &output_display($collwriter, $name, $lang, $value);
@@ -475 +477 @@
     }
     }
+    return $value;
+}
+
+sub tidy_up_metadata {
+    my ($value) = @_;
+    # remove \n
+    $value =~ s/\\n//g;
+    # replace \' with '
+    $value =~ s/\\\'/\'/g;
+    # replace \" with "
+    $value =~ s/\\\"/\"/g;
     return $value;
 }