1
0
mirror of https://github.com/moparisthebest/wget synced 2024-07-03 16:38:41 -04:00

Minor tweaks to freeopts.

This commit is contained in:
Micah Cowan 2008-10-25 07:13:24 -07:00
parent a32d41c5d0
commit b4ebafa39c

View File

@ -29,7 +29,7 @@ END {
my $cols = 0;
my $max_cols = 13;
my $opt_chars =
"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789%+/";
"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789";
print "Free chars:\n\t";
for (my $i = 0; $i < length $opt_chars; ++$i, ++$cols) {
if ($cols == $max_cols) {
@ -39,7 +39,7 @@ END {
my $opt = substr($opt_chars,$i,1);
print ' ';
if (!$used_chars{ $opt }) {
print $opt;
print "-$opt";
} else {
print ' ';
}