From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 3 Nov 2013 21:43:26 +0000 (+0000)
Subject: numbered-alias-sheet: fixed layout options
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?p=evade-mail-usrlocal.git;a=commitdiff_plain;h=413d756b4a313fcfd6d675c032bf0dc3ad3bac7c

numbered-alias-sheet: fixed layout options
---

diff --git a/numbered-alias-sheet b/numbered-alias-sheet
index 59af99e..027f8bc 100755
--- 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;
 	}
     }