Changeset 10985

Timestamp:

2005-12-09T12:17:51+13:00 (18 years ago)

Author:

kjdon

Message:

added a new option srcicon - can specify a different icon instead of iconunknown, if there is already one available. e.g. I used this for processing PDF files that failed with PDF plug, so I wanted a pdf icon and set srcicon to iconpdf

File:

• trunk/gsdl/perllib/plugins/UnknownPlug.pm (modified) (2 diffs)

trunk/gsdl/perllib/plugins/UnknownPlug.pm

@@ -80 +80 @@
     'type' => "string",
     'deft' => "",
+    'reqd' => "no" },
+      { 'name' => "srcicon",
+    'desc' => "{UnknownPlug.srcicon}",
+    'type' => "string",
+    'deft' => "iconunknown",
     'reqd' => "no" },
       { 'name' => "process_extension",
@@ -148 +153 @@
     $doc_obj->add_metadata ($section, "srclink", 
                 "<a href=\"_httpcollection_/index/assoc/[assocfilepath]/[$assoc_field]\">");
-    $doc_obj->add_metadata ($section, "srcicon", "_iconunknown_");
+    #$doc_obj->add_metadata ($section, "srcicon", "_iconunknown_");
+    $doc_obj->add_metadata ($section, "srcicon", "_".$self->{'srcicon'}."_");
     $doc_obj->add_metadata ($section, "/srclink", "</a>");