08/18: gnu: lxsession: Build with GTK 3.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit 15badf7b1eb7b9bf44977d07845154bc3baaeb2c
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Wed Aug 17 22:14:16 2022 -0400

    gnu: lxsession: Build with GTK 3.
    
    * gnu/packages/lxde.scm (lxsession)[snippet]: Delete trailing #t.
    [configure-flags]: New argument.
    [phases]: Delete trailing #t.
    [inputs]: Remove labels.
---
 gnu/packages/lxde.scm | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/lxde.scm b/gnu/packages/lxde.scm
index dee8a5aa5e..9fcd6e1414 100644
--- a/gnu/packages/lxde.scm
+++ b/gnu/packages/lxde.scm
@@ -539,21 +539,20 @@ in LXDE.")
                    (and (string-suffix? ".c" file)
                         (file-exists? (c->vala file))))))
            (for-each delete-file
-                     (find-files "." generated-c-file?))
-           #t))))
+                     (find-files "." generated-c-file?))))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
+     `(#:configure-flags (list "--enable-gtk3")
+       #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'rm-stamp
            (lambda _
              (for-each delete-file (find-files "." "\\.stamp$"))
              ;; Force regeneration of configure script.
-             (delete-file "configure")
-             #t)))))
+             (delete-file "configure"))))))
     (inputs
-     `(("gtk+-2" ,gtk+-2)
-       ("polkit" ,polkit)))
+     (list gtk+
+           polkit))
     (native-inputs
      (list pkg-config
            intltool