keys.delete-keeper: Check all versions of recovery keys.

[distorted-keys] / keys.delete-keeper

diff --git a/keys.delete-keeper b/keys.delete-keeper
index 84a3ae9..908e22e 100755 (executable)
--- a/keys.delete-keeper
+++ b/keys.delete-keeper
@@ -74,7 +74,7 @@ if [ -d $KEYS/recov ]; then
       ## this keeper set, or it also depends on at least one other set.  If
       ## not, add it to the `deps' list.
       this=nil others=nil
-      for kp in $r/current/*.param; do
+      for kp in $ri/*.param; do
        k=${kp##*/}; k=${k%.param}
        case $k in $keeper) this=t ;; *) others=t ;; esac
       done