|
@@ -39,7 +39,8 @@ $portdir = '.';
|
|
|
|
|
|
# version variables
|
|
|
my $major = 2;
|
|
|
-my $minor = 3;
|
|
|
+my $minor = 4;
|
|
|
+my $micro = 1;
|
|
|
|
|
|
sub l { '[{(]'; }
|
|
|
sub r { '[)}]'; }
|
|
@@ -91,6 +92,7 @@ usage: $prog [-AabchvtN] [-M ENV] [-B#] [port_directory]
|
|
|
-v verbose mode
|
|
|
-t nit pick about use of spaces
|
|
|
-N writing a new port
|
|
|
+ -V print the version and exit
|
|
|
-M ENV set make variables to ENV (ex. PORTSDIR=/usr/ports.work)
|
|
|
-B# allow # contiguous blank lines (default: $contblank line)
|
|
|
EOF
|
|
@@ -98,11 +100,10 @@ EOF
|
|
|
}
|
|
|
|
|
|
sub version {
|
|
|
- print "$prog version $major.$minor\n";
|
|
|
+ print "$prog version $major.$minor.$micro\n";
|
|
|
exit $major;
|
|
|
}
|
|
|
|
|
|
-
|
|
|
getopts('AabchtvB:M:NV');
|
|
|
|
|
|
&usage if $opt_h;
|