Changeset 11467 for trunk/gsdl

Timestamp:

2006-03-22T16:48:28+12:00 (18 years ago)

Author:

mdewsnip

Message:

Changed my mind about the previous change. Now the nicely formatted table record is added as the document text, so users will get this by default. The raw record is added as ISISRawRecord metadata.

File:

• trunk/gsdl/perllib/plugins/ISISPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/ISISPlug.pm

@@ -292 +292 @@
     }
 
-    # Add a reasonably formatted HTML table view of the record as metadata, as a shortcut towards a nice display
+    # Add a reasonably formatted HTML table view of the record as the document text
     $isis_record_html_metadata_value .= "</table>";
-    $doc_obj->add_utf8_metadata($section, "ISISRecordHTML", $isis_record_html_metadata_value);
-
-    # Add the full record as the document text
-    $$textref =~ s/\</&lt;/g;
-    $$textref =~ s/\>/&gt;/g;
-    $doc_obj->add_utf8_text($section, $$textref);
+    $doc_obj->add_utf8_text($section, $isis_record_html_metadata_value);
+
+    # Add the full raw record as metadata
+    $doc_obj->add_utf8_metadata($section, "ISISRawRecord", $$textref);
 
     # Add FileFormat metadata