Changeset 9703 for trunk/gsdl/perllib/plugins/ImagePlug.pm

Timestamp:

2005-04-18T13:18:39+12:00 (19 years ago)

Author:

mdewsnip

Message:

Improvement to previous change so "file not processed" messages are seen in Expert mode.

File:

• trunk/gsdl/perllib/plugins/ImagePlug.pm (modified) (3 diffs)

trunk/gsdl/perllib/plugins/ImagePlug.pm

@@ -381 +381 @@
         print STDERR "<ProcessingError n='$file' r='Windows 95/98 not supported'>\n";
     }
-    else {
-        print $outhandle "ImagePlug: Windows 95/98 not supported\n";
-    }
+    print $outhandle "ImagePlug: Windows 95/98 not supported\n";
     return -1;
     }
@@ -392 +390 @@
         print STDERR "<ProcessingError n='$file' r='ImageMagick not installed'>\n";
     }
-    else {
-        print $outhandle "ImagePlug: ImageMagick not installed\n";
-    }
+    print $outhandle "ImagePlug: ImageMagick not installed\n";
     return -1;
     }
@@ -414 +410 @@
         print STDERR "<ProcessingError n='$file'>\n";
     }
-    else {
-        print $outhandle "ImagePlug: couldn't process \"$filename\"\n";
-    }
+    print $outhandle "ImagePlug: couldn't process \"$filename\"\n";
     return -1; # error during processing
     }