From: Micah Cowan <micah@cowan.name>
Date: Sat, 25 Oct 2008 14:13:24 +0000 (-0700)
Subject: Minor tweaks to freeopts.
X-Git-Tag: v1.13~401
X-Git-Url: http://sjero.net/git/?p=wget;a=commitdiff_plain;h=b4ebafa39cc21ad4b2dc840f35fd2570dd88cbe8

Minor tweaks to freeopts.
---

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";