Changeset 1235 for trunk/gsdl

Timestamp:

2000-06-23T16:53:36+12:00 (24 years ago)

Author:

nzdl

Message:

* empty log message *

File:

• trunk/gsdl/perllib/plugins/HBSPlug.pm (modified) (4 diffs)

trunk/gsdl/perllib/plugins/HBSPlug.pm

@@ -85 +85 @@
     return undef unless ($filename =~ /\.hb$/i && (-e $filename));
 
-    print STDERR "GBBPlug: processing $filename\n" if $processor->{'verbosity'};
+    print STDERR "HBSPlug: processing $filename\n" if $processor->{'verbosity'};
 
     # create a new document
@@ -190 +190 @@
     if ($imagetype eq "jpg") {$imagetype = "jpeg";}
     if ($imagetype !~ /^(jpeg|gif|png)$/) {
-    print STDERR "GBHPlug: Warning - unknown image type ($imagetype)\n";
+    print STDERR "HBSPlug: Warning - unknown image type ($imagetype)\n";
     }
     my ($imagefile) = $link =~ /([^\/]*)$/;
@@ -202 +202 @@
         $foundimage = 1;
     } else {
-        $error = "GBHPlug: Warning - couldn't find image file $imagefile in either $filename or";
+        $error = "HBSPlug: Warning - couldn't find image file $imagefile in either $filename or";
     }
     }
@@ -214 +214 @@
         print STDERR "$error $filename\n";
     } else {
-        print STDERR "GBHPlug: Warning - couldn't find image file $imagefile in $filename\n";
+        print STDERR "HBSPlug: Warning - couldn't find image file $imagefile in $filename\n";
     }
     }