X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=blobdiff_plain;f=numbered-alias-sheet;h=027f8bc9b4e47594131aec89556fa290cd32c45c;hb=413d756b4a313fcfd6d675c032bf0dc3ad3bac7c;hp=59af99e4c28c458f5af424fb6ada273ce2738437;hpb=ffdaeded5684e652b96f69bab36397212686971e;p=evade-mail-usrlocal.git

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