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

Timestamp:

2010-03-01T13:03:47+13:00 (14 years ago)

Author:

kjdon

Message:

should be using assocfilepath instead of archivedir

File:

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

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

@@ -1088 +1088 @@
         my ($pre_doc_ext) = ($file_extended_ext =~ m/^(.*)\..*$/);
         my ($doc_ext) = ($tail_filename =~ m/^.*\.(.*)$/);
-        my $start_doclink = "<a href=\"_httpprefix_/collect/[collection]/index/assoc/{Or}{[parent(Top):archivedir],[archivedir]}/$url_tail_filename\">";
+        my $start_doclink = "<a href=\"_httpprefix_/collect/[collection]/index/assoc/{Or}{[parent(Top):assocfilepath],[assocfilepath]}/$url_tail_filename\">";
         my $srcicon = "_icon".$doc_ext."_";
         my $end_doclink = "</a>";