chiark / gitweb /
numbered-alias-sheet: fixed layout options
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:43:26 +0000 (21:43 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:43:26 +0000 (21:43 +0000)
numbered-alias-sheet

index 59af99e4c28c458f5af424fb6ada273ce2738437..027f8bc9b4e47594131aec89556fa290cd32c45c 100755 (executable)
@@ -30,6 +30,10 @@ options:
   -D                      debug
 END
 
+foreach my $spec (@lp_options) { $usage .= <<END foreach @$spec; }
+  --$_
+END
+
 open DEBUG, ">/dev/null" or die $!;
 
 our @paperpts;
@@ -86,6 +90,16 @@ for (;;) {
        } elsif (s/^-D/-/) {
            open DEBUG, ">&STDERR" or die $!;
        } else {
+           if (m/^--([-a-z]+)$/) {
+               my $lpi = grep {
+                   grep { $1 eq $_ } @{ $lp_options[$_] }
+               } 0..$#lp_options;
+               if (defined $lpi) {
+                   $lp_fixed[$lpi] = $1;
+                   $_ = '';
+                   next;
+               }
+           }
            badusage;
        }
     }