From d346e769f49b9dcad1840036b38cd07e067a7e8b Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Fri, 5 Aug 2022 10:55:27 -0700 Subject: :AS: fix name of keyword argument to :SU, :USER -> :TO Reported-by: Andreas Reuleaux Signed-off-by: Sean Whitton --- src/connection/as.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/connection/as.lisp b/src/connection/as.lisp index a78f13f..aa24b0c 100644 --- a/src/connection/as.lisp +++ b/src/connection/as.lisp @@ -30,6 +30,6 @@ whether it is possible to establish a :SETUID connection. Note that both these connection types require root." ;; An alternative to :SU would be :SUDO or runuser(1), but :SU is more ;; portable. - (establish-connection (if (and (lisp-connection-p) (can-setuid)) - :setuid :su) - remaining :user user)) + (let ((setuid (and (lisp-connection-p) (can-setuid)))) + (establish-connection + (if setuid :setuid :su) remaining (if setuid :user :to) user))) -- cgit v1.2.3