aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/mate.scm
diff options
context:
space:
mode:
authorng0 <ng0@infotropique.org>2017-12-30 22:41:46 +0100
committerDanny Milosavljevic <dannym@scratchpost.org>2017-12-30 22:55:23 +0100
commit1b332539ebfe258536ecdf1199fc82d7516fdad3 (patch)
tree5ce49937de77aa4596727e946db1b28bde5167c2 /gnu/packages/mate.scm
parent75282ec1688d76822fd9c6cecf6d2e40df017503 (diff)
downloadguix-1b332539ebfe258536ecdf1199fc82d7516fdad3.tar
guix-1b332539ebfe258536ecdf1199fc82d7516fdad3.tar.gz
gnu: mate-session-manager: Configure with with elogind support.
* gnu/packages/mate.scm (mate-session-manager)[arguments]: Add '--enable-elogind' to configure-flags. (phases): Add 'pre-configure' phase. Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
Diffstat (limited to 'gnu/packages/mate.scm')
-rw-r--r--gnu/packages/mate.scm24
1 files changed, 24 insertions, 0 deletions
diff --git a/gnu/packages/mate.scm b/gnu/packages/mate.scm
index eeb5eb161d..409ca570fe 100644
--- a/gnu/packages/mate.scm
+++ b/gnu/packages/mate.scm
@@ -235,6 +235,29 @@ configurations (profiles).")
(base32
"0i0xq6041x2qmb26x9bawx0qpfkgjn6x9w3phnm9s7rc4s0z20ll"))))
(build-system glib-or-gtk-build-system)
+ (arguments
+ `(#:configure-flags (list "--enable-elogind"
+ "--disable-schemas-compile")
+ #:phases
+ (modify-phases %standard-phases
+ (add-before 'configure 'pre-configure
+ (lambda* (#:key outputs #:allow-other-keys)
+ ;; Use elogind instead of systemd.
+ (substitute* "configure"
+ (("libsystemd-login")
+ "libelogind")
+ (("systemd") "elogind"))
+ (substitute* "mate-session/gsm-systemd.c"
+ (("#include <systemd/sd-login.h>")
+ "#include <elogind/sd-login.h>"))
+ ;; Remove uses of the systemd journal.
+ (substitute* "mate-session/main.c"
+ (("#ifdef HAVE_SYSTEMD") "#if 0"))
+ (substitute* "mate-session/gsm-manager.c"
+ (("#ifdef HAVE_SYSTEMD") "#if 0"))
+ (substitute* "mate-session/gsm-autostart-app.c"
+ (("#ifdef HAVE_SYSTEMD") "#if 0"))
+ #t)))))
(native-inputs
`(("pkg-config" ,pkg-config)
("intltool" ,intltool)
@@ -243,6 +266,7 @@ configurations (profiles).")
(inputs
`(("gtk+" ,gtk+)
("dbus-glib" ,dbus-glib)
+ ("elogind" ,elogind)
("libsm" ,libsm)
("mate-desktop" ,mate-desktop)))
(home-page "https://mate-desktop.org/")