chiark
/
gitweb
/
~ijackson
/
d.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
numbered-alias-sheet: new paperpts arrangement
[d.git]
/
evade-mail-pregen
diff --git
a/evade-mail-pregen
b/evade-mail-pregen
index 9ab3d220747af761e09e5617e40e235f492baf6a..4369ec1ebf735e93c5587d9cc0d999872158b201 100755
(executable)
--- a/
evade-mail-pregen
+++ b/
evade-mail-pregen
@@
-252,7
+252,10
@@
$comment_re =~ s/\W/\\$&/g;
or badusage "comment pattern (\`$comment_pattern')".
" must contain \`<number>' exactly once";
-@ARGV or badusage "missing action";
+if (!@ARGV) {
+ print STDERR $usage or die $!;
+ exit 1;
+}
my $action = shift @ARGV;
fetch_list();