Changeset 22663 for main/trunk/greenstone2/perllib/plugins/BasePlugin.pm

Timestamp:

2010-08-18T10:50:18+12:00 (14 years ago)

Author:

mdewsnip

Message:

Changed "srclink_file" metadata to always contain the filename, instead of referencing another metadata element. This is so the C++ code can escape underscores in the filename values correctly.

File:

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

main/trunk/greenstone2/perllib/plugins/BasePlugin.pm

@@ -1140 +1140 @@
     
     $doc_obj->associate_file($filename, $assocfilename, undef, $cursection);
-    $doc_obj->add_utf8_metadata ($cursection, "srclink_file", "[SourceFile]");
+    $doc_obj->add_utf8_metadata ($cursection, "srclink_file", $doc_obj->get_sourcefile());
 }