Changeset 7304

Timestamp:

2004-05-11T14:28:58+12:00 (20 years ago)

Author:

kjdon

Message:

now adds Source metadata

File:

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

trunk/gsdl/perllib/plugins/UnknownPlug.pm

@@ -192 +192 @@
     $doc_obj->set_OIDtype ($processor->{'OIDtype'});    
     $doc_obj->add_utf8_metadata($doc_obj->get_top_section(), "$self->{'plugin_type'}", "1");
+    $doc_obj->add_metadata($doc_obj->get_top_section(), "Source", &ghtml::dmsafe($file)); # set the filename as Source metadata to be consistent with other plugins
 
     # associate the file with the document