From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 4 Sep 2013 22:55:08 +0000 (+0100)
Subject: genopts alphanum tidyups
X-Git-Tag: test~21
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?p=d.git;a=commitdiff_plain;h=a0d460e9f5b0655ad386ae4580869b377fedbe47

genopts alphanum tidyups
---

diff --git a/service b/service
index 14852b2..aefff42 100755
--- a/service
+++ b/service
@@ -28,7 +28,7 @@ privileged actions
 default generation method is alphanum
 END
 our %usage_genopts = (
-'alphanum' => <<END
+'alphanum' => <<END,
   -l<randlength>     (number of letters+digits)
 END
 );
@@ -389,6 +389,8 @@ sub action_disable_user {
 
 sub action_list_actions {
     print $usage2 or die $!;
+    print "genopts\n" or die $!;
+    print $usage_genopts{$genmethod} or die $!;
 }
 
 while (@ARGV) {