shamir.1: Add manpage.
[distorted-keys] / cryptop.genkey
index b33458d..d220fe3 100755 (executable)
@@ -28,10 +28,11 @@ case "${KEYSLIB+t}" in t) ;; *) echo >&2 "$0: KEYSLIB unset"; exit 1 ;; esac
 . "$KEYSLIB"/keyfunc.sh
 
 defhelp <<HELP
-[-f] KEY PROFILE [ARGUMENTS ...]
+[-f] KEY PROFILE [OPTION=VALUE ...]
 Generate a named KEY, according to the PROFILE.
 
-The ARGUMENTS are passed to the key-type handler selected by the profile.
+The OPTIONS and VALUES are passed to the key-type handler selected by the
+profile.
 
 Options:
   -f           Force overwriting an existing key.
@@ -39,7 +40,7 @@ HELP
 
 genhook_recov () {
   base=$1 nub=$2
-  for recov in $kopt_recovery; do
+  for recov in $kprop_recovery; do
     (stash $recov $kowner/$klabel <"$nub")
   done
 }
@@ -92,7 +93,7 @@ case "$profile" in
     ;;
 esac
 checkword "profile label" "$label"
-read_profile $profile
+read_profile $USERV_USER $profile
 
 ## Generate the key.
 c_genkey $profile $kdir $knub genhook_recov "$@"