mirror of
https://codeberg.org/hako/Rosenthal.git
synced 2025-09-18 20:54:37 +00:00
services: greetd-tuigreet-session: Fix tuigreet reference.
* modules/rosenthal/services/base.scm (<greetd-tuigreet-session>) (greetd-tuigreet-session-compiler): Fix tuigreet reference.
This commit is contained in:
parent
859be3792b
commit
4baff4a832
@ -18,13 +18,13 @@
|
|||||||
greetd-tuigreet-session?
|
greetd-tuigreet-session?
|
||||||
this-greetd-tuigreet-session
|
this-greetd-tuigreet-session
|
||||||
(tuigreet greetd-tuigreet-session-tuigreet
|
(tuigreet greetd-tuigreet-session-tuigreet
|
||||||
(default tuigreet)))
|
(default (spec->pkg "tuigreet"))))
|
||||||
|
|
||||||
(define-gexp-compiler (greetd-tuigreet-session-compiler
|
(define-gexp-compiler (greetd-tuigreet-session-compiler
|
||||||
(session <greetd-tuigreet-session>)
|
(session <greetd-tuigreet-session>)
|
||||||
system target)
|
system target)
|
||||||
(match-record session <greetd-tuigreet-session> (tuigreet)
|
(match-record session <greetd-tuigreet-session> (tuigreet)
|
||||||
(let ((tuigreet (file-append tuigreet "/bin/tuigreet")))
|
(let ((tuigreet (file-append (spec->pkg "tuigreet") "/bin/tuigreet")))
|
||||||
(lower-object
|
(lower-object
|
||||||
(program-file "tuigreet-wrapper"
|
(program-file "tuigreet-wrapper"
|
||||||
#~(execl #$tuigreet #$tuigreet
|
#~(execl #$tuigreet #$tuigreet
|
||||||
|
Loading…
Reference in New Issue
Block a user