03/04: gnu: xsecurelock: Update setuid example in description.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 2ea908b0a5c0c31201accedb474a9924c640f379
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun May 29 02:00:00 2022 +0200

    gnu: xsecurelock: Update setuid example in description.
    
    * gnu/packages/xorg.scm (xsecurelock)[description]: Update example code.
---
 gnu/packages/xdisorg.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index e5a98edb35..fb7ed457a9 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -2339,9 +2339,11 @@ As a consequence of the modular design, the usual screen 
locker service
 shouldn't be used with @code{xsecurelock}.  Instead, you need to add a helper
 binary to setuid-binaries:
 @example
-(setuid-programs (cons*
-                   (file-append xsecurelock 
\"/libexec/xsecurelock/authproto_pam\")
-                   %setuid-programs))
+(setuid-programs
+ (cons*
+  (setuid-program
+   (program (file-append xsecurelock \"/libexec/xsecurelock/authproto_pam\")))
+  %setuid-programs))
 @end example")
     (license license:asl2.0)))