1 files changed, 45 insertions, 0 deletions

diff --git a/graphics/netpbm/files/patch-editor-pnmquant b/graphics/netpbm/files/patch-editor-pnmquant
new file mode 100644
index 000000000000..df830ab671a1
--- /dev/null
+++ b/graphics/netpbm/files/patch-editor-pnmquant
@@ -0,0 +1,45 @@
+--- editor/pnmquant.DIST	Mon Dec 29 08:11:52 2003
++++ editor/pnmquant	Mon Dec 29 08:12:24 2003
+@@ -20,7 +20,7 @@
+ 
+ sub parseCommandLine(@) {
+ 
+-    my @args = @_;
++    @ARGV = @_;
+ 
+     my ($opt_center, $opt_meancolor, $opt_meanpixel, $opt_floyd,
+         $opt_spreadbrightness, $opt_spreadluminosity, $opt_mapfile);
+@@ -34,18 +34,18 @@
+                             "floyd|fs!" => \$opt_floyd,
+                             );
+ 
+-    if (@args > 2) {
++    if (@ARGV > 2) {
+         print(STDERR "This program takes at most 2 arguments.  You specified ",
+-              0+@args, "\n");
++              0+@ARGV, "\n");
+         exit(1);
+     } 
+-    if (@args < 1) {
++    if (@ARGV < 1) {
+         print(STDERR 
+               "You must specify the number of colors as an argument.\n");
+         exit(1);
+     }
+     my $infile;
+-    my $ncolors = $args[0];
++    my $ncolors = $ARGV[0];
+     
+     if (!($ncolors =~ m{ ^[[:digit:]]+$ }x ) || $ncolors == 0) {
+         print(STDERR 
+@@ -54,8 +54,8 @@
+         exit(1);
+     }
+ 
+-    if (@args > 1) {
+-        $infile = $args[1];
++    if (@ARGV > 1) {
++        $infile = $ARGV[1];
+     } else {
+         $infile = "-";
+     }