Changeset 3086 for trunk

Timestamp:

2002-04-22T13:00:48+12:00 (22 years ago)

Author:

nzdl

Message:

* empty log message *

Location:

trunk/gsdl

Files:

• macros/english.dm (modified) (1 diff)
• perllib/plugins/BasPlug.pm (modified) (1 diff)

trunk/gsdl/macros/english.dm

@@ -48 +48 @@
 # text macros
 #------------------------------------------------------------
+
+_textperiodicals_ {Periodicals}
+_textsource_ {source: }
+_textdate_ {date: }
+_textnumpages_ {no. of pages: }
 
 _textsignin_ {sign in}

trunk/gsdl/perllib/plugins/BasPlug.pm

@@ -725 +725 @@
     if (-e $filename) {
     $doc_obj->associate_file($filename, "cover.jpg", "image/jpeg");
+    } else {
+    $filename =~ s/jpg$/JPG/;
+    if (-e $filename) {
+        $doc_obj->associate_file($filename, "cover.jpg", "image/jpeg");
+    }
     }
 }