diff options
| author | Jelle Licht <jlicht@fsfe.org> | 2022-12-13 19:35:59 +0100 |
|---|---|---|
| committer | Jelle Licht <jlicht@fsfe.org> | 2023-01-15 20:30:12 +0100 |
| commit | a5b914156eda876000ecab29ebe855080f8d8ff6 (patch) | |
| tree | 836d3dd8006415702a23830cd736f53765e58665 /gnu/services/base.scm | |
| parent | 238f965c331990459a69cbc713ca951ad40e6044 (diff) | |
| download | guix-a5b914156eda876000ecab29ebe855080f8d8ff6.tar guix-a5b914156eda876000ecab29ebe855080f8d8ff6.tar.gz | |
services: greetd: Add 'source-profile?' configuration field.
* gnu/services/base.scm (<greetd-terminal-configuration>)[source-profile?]:
New field.
(make-greetd-terminal-configuration-file): Serialize new field to
configuration file.
* doc/guix.texi (Base Services): Document it.
Diffstat (limited to 'gnu/services/base.scm')
| -rw-r--r-- | gnu/services/base.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm index 08eea46dc6..9e799445d2 100644 --- a/gnu/services/base.scm +++ b/gnu/services/base.scm @@ -3050,6 +3050,7 @@ to handle." (default (default-log-file-name this-record))) (terminal-vt greetd-terminal-vt (default "7")) (terminal-switch greetd-terminal-switch (default #f)) + (source-profile? greetd-source-profile? (default #t)) (default-session-user greetd-default-session-user (default "greeter")) (default-session-command greetd-default-session-command (default (greetd-agreety-session)))) @@ -3063,12 +3064,14 @@ to handle." (define (make-greetd-terminal-configuration-file config) (let* ((config-file-name (greetd-config-file-name config)) + (source-profile? (greetd-source-profile? config)) (terminal-vt (greetd-terminal-vt config)) (terminal-switch (greetd-terminal-switch config)) (default-session-user (greetd-default-session-user config)) (default-session-command (greetd-default-session-command config))) (mixed-text-file config-file-name + "source_profile = " (if source-profile? "true" "false") "\n" "[terminal]\n" "vt = " terminal-vt "\n" "switch = " (if terminal-switch "true" "false") "\n" |