From 13b012754eff829bbd8b16184cfc623b96a8d4e1 Mon Sep 17 00:00:00 2001 From: L p R n d n Date: Tue, 16 Apr 2019 13:58:26 +0200 Subject: gnu: lightdm-gtk-greeter: Fix .desktop file. * gnu/packages/display-managers.scm (lightdm-gtk-greeter)[arguments]: Fix reference to greeter in .desktop file with "fix-.desktop-file" phase. Signed-off-by: Ricardo Wurmus --- gnu/packages/display-managers.scm | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/gnu/packages/display-managers.scm b/gnu/packages/display-managers.scm index cfd2e6dd95..cda7598066 100644 --- a/gnu/packages/display-managers.scm +++ b/gnu/packages/display-managers.scm @@ -209,7 +209,17 @@ display manager which supports different greeters.") `(#:configure-flags (list (string-append "--enable-at-spi-command=" (assoc-ref %build-inputs "at-spi2-core") - "/libexec/at-spi-bus-launcher")))) + "/libexec/at-spi-bus-launcher")) + #:phases + (modify-phases %standard-phases + (add-after 'install 'fix-.desktop-file + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (substitute* (string-append + out "/share/xgreeters/lightdm-gtk-greeter.desktop") + (("Exec=lightdm-gtk-greeter") + (string-append "Exec=" out "/sbin/lightdm-gtk-greeter"))) + #t)))))) (native-inputs `(("exo" ,exo) ("intltool" ,intltool) -- cgit v1.2.3