From b4ebafa39cc21ad4b2dc840f35fd2570dd88cbe8 Mon Sep 17 00:00:00 2001 From: Micah Cowan Date: Sat, 25 Oct 2008 07:13:24 -0700 Subject: [PATCH] Minor tweaks to freeopts. --- util/freeopts | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/util/freeopts b/util/freeopts index 0df22a79..75f594a1 100755 --- a/util/freeopts +++ b/util/freeopts @@ -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,9 +39,9 @@ END { my $opt = substr($opt_chars,$i,1); print ' '; if (!$used_chars{ $opt }) { - print $opt; + print "-$opt"; } else { - print ' '; + print ' '; } } print "\n"; -- 2.39.2