X-Git-Url: https://git.distorted.org.uk/~mdw/distorted-keys/blobdiff_plain/d516ebd0d3928deae4cf80a113d6ccf1f666bfe6..4c8c406559cd6b201004955a3db7cb3386a0f00d:/userv/distorted-keys.in

diff --git a/userv/distorted-keys.in b/userv/distorted-keys.in
index 2f618aa..07ecd4a 100644
--- a/userv/distorted-keys.in
+++ b/userv/distorted-keys.in
@@ -14,7 +14,24 @@ if ( glob service cryptop
 	require-fd 1-2 write
 	ignore-fd 3-
 	no-set-environment
-	execute @sbindir@/cryptop
+	execute @bindir@/cryptop
+fi
+
+###--------------------------------------------------------------------------
+### Key administration operations.
+
+if ( glob service keys
+   & glob service-user @user@
+   & ( grep calling-user @pkgconfdir@/admin.users
+     | grep calling-group @pkgconfdir@/admin.groups
+     )
+   )
+	no-suppress-args
+	require-fd 0 read
+	require-fd 1-2 write
+	ignore-fd 3-
+	no-set-environment
+	execute @sbindir@/keys
 fi
 
 ###--------------------------------------------------------------------------