chiark
/
gitweb
/
~ijackson
/
evade-mail-usrlocal.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ffdaede
)
numbered-alias-sheet: fixed layout options
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:43:26 +0000
(21:43 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sun, 3 Nov 2013 21:43:26 +0000
(21:43 +0000)
numbered-alias-sheet
patch
|
blob
|
history
diff --git
a/numbered-alias-sheet
b/numbered-alias-sheet
index 59af99e4c28c458f5af424fb6ada273ce2738437..027f8bc9b4e47594131aec89556fa290cd32c45c 100755
(executable)
--- a/
numbered-alias-sheet
+++ b/
numbered-alias-sheet
@@
-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;
}
}