[bug#67908] [PATCH] xsecurelock update and saver_xscreensaver enabling

[bug#67908] [PATCH] xsecurelock update and saver_xscreensaver enabling

[Benjamin Slade]

[-- Attachment #1: Type: text/plain, Size: 250 bytes --]

--

'(Dr Benjamin Slade (he/him)
     (website . <https://lambda-y.net>)     
     `(pgp_fp: ,(21BA 2AE1 28F6 DF36 110A 0E9C A320 BBE8 2B52 EE19))
       "sent by mu4e 1.10.8 in Emacs 30.0.50 with org-msg on GNU Guix (Linux)")

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-xsecurelock-update-and-saver_xscreensaver-enabling.patch --]
[-- Type: text/x-patch, Size: 1903 bytes --]

From 63fe50eef072cc0c5b9c9b5b3d5f8c2b49326315 Mon Sep 17 00:00:00 2001
From: Benjamin Slade <slade@lambda-y.net>
Date: Tue, 19 Dec 2023 12:33:08 -0600
Subject: [PATCH] xsecurelock update and saver_xscreensaver enabling

---
 gnu/packages/xdisorg.scm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index 485d55a..4aa3264 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -2690,20 +2690,21 @@ (define-public sct
 (define-public xsecurelock
   (package
     (name "xsecurelock")
-    (version "1.8.0")
+    (version "1.9.0")
     (source (origin
               (method url-fetch)
               (uri (string-append
                     "https://github.com/google/xsecurelock/releases"
                     "/download/v" version "/xsecurelock-" version ".tar.gz"))
               (sha256
-               (base32 "1i7vhzysirr5kra15vd501b79k0jgs11lkb9ck3hx6vicxm204d3"))))
+               (base32 "09c0br8vwx9q728i4iv1pcp4s0sm0cd1c5ligag4k2730kcg93bf"))))
     (build-system gnu-build-system)
     (arguments
      '(#:configure-flags
        '("--with-pam-service-name=login"
          "--with-xkb"
-         "--with-default-authproto-module=/run/setuid-programs/authproto_pam")))
+         "--with-default-authproto-module=/run/setuid-programs/authproto_pam"
+         "--with-xscreensaver=/run/current-system/profile/libexec/xscreensaver")))
     (native-inputs
      (list pandoc pkg-config))
     (inputs
@@ -2717,6 +2718,8 @@ (define-public xsecurelock
            libxrandr
            libxscrnsaver
            linux-pam))
+    (propagated-inputs
+     (list xscreensaver xrdb))
     (home-page "https://github.com/google/xsecurelock")
     (synopsis "X11 screen lock utility with the primary goal of security")
     (description "@code{xsecurelock} is an X11 screen locker which uses
-- 
2.41.0