diff options
author | Dirk Meyer <dinoex@FreeBSD.org> | 2003-12-29 19:59:33 +0000 |
---|---|---|
committer | Dirk Meyer <dinoex@FreeBSD.org> | 2003-12-29 19:59:33 +0000 |
commit | 64a29ef092cc6da694e5038acf8836d803b600c0 (patch) | |
tree | 5d03929db7908ffe0aa0332952daf5e40c0ef94c /graphics/netpbm | |
parent | * Fix some whitespace nits spotted by portlint (diff) |
- Fix argument handling in perl scripts
Submitted by: kstailey@yahoo.com
Diffstat (limited to 'graphics/netpbm')
-rw-r--r-- | graphics/netpbm/Makefile | 2 | ||||
-rw-r--r-- | graphics/netpbm/files/patch-editor-pnmquant | 45 |
2 files changed, 46 insertions, 1 deletions
diff --git a/graphics/netpbm/Makefile b/graphics/netpbm/Makefile index 9a6837a897e3..59347e0df6d8 100644 --- a/graphics/netpbm/Makefile +++ b/graphics/netpbm/Makefile @@ -7,7 +7,7 @@ PORTNAME= netpbm PORTVERSION= 10.19 -PORTREVISION?= 2 +PORTREVISION?= 3 CATEGORIES= graphics MASTER_SITES= ${MASTER_SITE_SOURCEFORGE} MASTER_SITE_SUBDIR= ${PORTNAME} 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 = "-"; + } |