648baf
diff -up netpbm-10.47.09/editor/ppmfade.ppmfadeusage netpbm-10.47.09/editor/ppmfade
648baf
--- netpbm-10.47.09/editor/ppmfade.ppmfadeusage	2010-02-17 11:22:02.000000000 +0100
648baf
+++ netpbm-10.47.09/editor/ppmfade	2010-02-17 11:27:29.000000000 +0100
648baf
@@ -34,7 +34,6 @@ my $base_name = "fade";		# default base 
79d065
 my $image = "ppm";		# default output storage format
79d065
 my $mode = $SPREAD;		# default fading mode
79d065
 
648baf
-
79d065
 my $n;  # argument number
79d065
 
648baf
 for ($n = 0; $n < @ARGV; $n++) {
648baf
@@ -44,7 +43,7 @@ for ($n = 0; $n < @ARGV; $n++) {
79d065
         if (-e $first_file) {
79d065
         } else {
79d065
             print "I can't find first file '$first_file'\n";
79d065
-            exit 20;
79d065
+            exit 1;
79d065
         }
79d065
     } elsif ($ARGV[$n] eq "-l") {
79d065
         $n++;
648baf
@@ -52,7 +51,7 @@ for ($n = 0; $n < @ARGV; $n++) {
79d065
         if (-e $last_file) {
79d065
         } else {
79d065
             print "I can't find last file '$last_file'\n";
79d065
-            exit 20;
79d065
+            exit 1;
79d065
         }
79d065
     } elsif ($ARGV[$n] eq "-base") {
79d065
         $n++;
648baf
@@ -73,11 +72,12 @@ for ($n = 0; $n < @ARGV; $n++) {
648baf
         $mode = $BLOCK;
648baf
     } elsif ("$ARGV[$n]" eq "-mix") {
648baf
         $mode = $MIX;
648baf
-    } elsif ($ARGV[$n] eq "-help" || $ARGV[$n] eq "-h") {
648baf
-        usage();
648baf
+    } elsif ($ARGV[$n] eq "-help" || $ARGV[$n] eq "--help" || $ARGV[$n] eq "-h") {
648baf
+        print "ppmfade: Use 'man ppmfade' for help.\n";
648baf
+        exit 1;
79d065
     } else {
79d065
         print "Unknown argument: $ARGV[$n]\n";
79d065
-        exit 100;
79d065
+        exit 1;
79d065
     } 
79d065
 }
79d065
 #
648baf
@@ -96,18 +96,18 @@ if ($first_file ne "undefined") {
79d065
         $width = $1; $height = $2;
79d065
     } else {
79d065
         print("Unrecognized results from pnmfile on $first_file.\n");
79d065
-        exit(50);
79d065
+        exit 1;
79d065
     }
79d065
 } elsif ($last_file ne "undefined") {
79d065
     if ((`pnmfile $last_file` =~ m{\b(\d+)\sby\s(\d+)} )) { 
79d065
         $width = $1; $height = $2;
79d065
     } else {
79d065
         print("Unrecognized results from pnmfile on $first_file.\n");
79d065
-        exit(50);
79d065
+        exit 1;
79d065
     }
79d065
 } else {
79d065
     print("ppmfade:  You must specify -f or -l (or both)\n");
79d065
-    exit(90);
79d065
+    exit 1;
79d065
 }
79d065
 
79d065
 print("Frames are " . $width . "W x " . $height . "H\n");