* [bug#35377] [PATCH] gnu: gdm: Provide custom session.
@ 2019-04-22 14:15 Danny Milosavljevic
0 siblings, 0 replies; only message in thread
From: Danny Milosavljevic @ 2019-04-22 14:15 UTC (permalink / raw)
To: 35377
* gnu/packages/gnome.scm (gdm)[arguments]<#:phases>[install-custom-session]:
Provide custom session.
---
gnu/packages/gnome.scm | 17 +++++++++++++++++
1 file changed, 17 insertions(+)
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 101c0ce13f..e3738fbd93 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -5536,6 +5536,23 @@ libxml2.")
(string-append "\"" (assoc-ref inputs "gnome-session")
"/bin/gnome-session\"")))
#t))
+ (add-after 'install 'install-custom-session
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (builtin-sessions (string-append out
+ "/share/gdm/BuiltInSessions")))
+ (mkdir-p builtin-sessions)
+ (call-with-output-file (string-append builtin-sessions "/custom.desktop")
+ (lambda (port)
+ (format port "[Desktop Entry]
+Encoding=UTF-8
+Type=Application
+Name=Custom Session
+Comment=Customized user session (in ~/.xsession)
+X-GDM-BypassXsession=false
+Exec=custom
+")))
+ #t)))
;; GDM needs GNOME Session to run these applications. We link
;; their autostart files in `share/gdm/greeter/autostart'
;; because GDM explicitly tells GNOME Session to look there.
^ permalink raw reply related [flat|nested] only message in thread
only message in thread, other threads:[~2019-04-22 14:30 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2019-04-22 14:15 [bug#35377] [PATCH] gnu: gdm: Provide custom session Danny Milosavljevic
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).