Changeset 16022

Timestamp:

2008-06-16T13:59:57+12:00 (16 years ago)

Author:

kjdon

Message:

removed SourceUTF8 metadata, Source metadata is now utf8. Note, still need to check that this works

File:

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

gsdl/trunk/perllib/plugins/BasePlugin.pm

@@ -594 +594 @@
     my $top_section = $doc_obj->get_top_section();
     
-    # the original encoding filename
-    $doc_obj->set_metadata_element($top_section, "Source", $filename_no_path);
     # UTF-8 version of filename
     my $filemeta = $self->filename_to_utf8_metadata($filename_no_path, $file_encoding);
-    $doc_obj->set_utf8_metadata_element($top_section, "SourceUTF8", $filemeta);
+    $doc_obj->set_utf8_metadata_element($top_section, "Source", $filemeta);
 
 }