- Timestamp:
- 2010-03-03T11:09:07+13:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/OpenDocumentPlugin.pm
r21742 r21760 262 262 263 263 #setup to doclink thingi 264 my $doclink = "<a href=\"_httpprefix_/collect/[collection]/index/assoc/[assocfilepath]/$file_only\">"; 265 $doc_obj->add_utf8_metadata ("", "srclink", $doclink); 264 #my $doclink = "<a href=\"_httpprefix_/collect/[collection]/index/assoc/[assocfilepath]/$file_only\">"; 265 #$doc_obj->add_utf8_metadata ("", "srclink", $doclink); 266 $doc_obj->add_metadata ($section, "srclink_file", "[SourceFile]"); 266 267 $doc_obj->add_utf8_metadata ("", "srcicon", "<img border=\"0\" align=\"absmiddle\" src=\"_httpprefix_/collect/[collection]/index/assoc/[assocfilepath]/thumbnail.png\" alt=\"View the Open document\" title=\"View the Open document\">"); 267 $doc_obj->add_utf8_metadata ("", "/srclink", "</a>");268 #$doc_obj->add_utf8_metadata ("", "/srclink", "</a>"); 268 269 $self->set_Source_metadata($doc_obj, $file_only); 269 270 $doc_obj->set_utf8_metadata_element("", "FileSize", (-s $filename));
Note:
See TracChangeset
for help on using the changeset viewer.