ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-13 06:36:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: greetd: Add 'source-profile?' configuration field.

Browse source 
* 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.
This commit is contained in:
Jelle Licht 2022-12-13 19:35:59 +01:00
parent 238f965c33
commit a5b914156e
No known key found for this signature in database
GPG key ID: DA4597F947B41025
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
doc/guix.texi
View file

@ -18908,6 +18908,10 @@ is recommended.
@item @code{terminal-switch} (default: @code{#f}) @item @code{terminal-switch} (default: @code{#f})
Make this terminal active on start of @code{greetd}. Make this terminal active on start of @code{greetd}.
@item @code{source-profile?} (default: @code{#t})
Whether to source @file{/etc/profile} and @file{~/.profile}, when they
exist.
@item @code{default-session-user} (default: @samp{"greeter"}) @item @code{default-session-user} (default: @samp{"greeter"})
The user to use for running the greeter. The user to use for running the greeter.

3
gnu/services/base.scm
View file

@ -3050,6 +3050,7 @@ (define-record-type* <greetd-terminal-configuration>
(default (default-log-file-name this-record))) (default (default-log-file-name this-record)))
(terminal-vt greetd-terminal-vt (default "7")) (terminal-vt greetd-terminal-vt (default "7"))
(terminal-switch greetd-terminal-switch (default #f)) (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-user greetd-default-session-user (default "greeter"))
(default-session-command greetd-default-session-command (default-session-command greetd-default-session-command
(default (greetd-agreety-session)))) (default (greetd-agreety-session))))
@ -3063,12 +3064,14 @@ (define (default-log-file-name config)
(define (make-greetd-terminal-configuration-file config) (define (make-greetd-terminal-configuration-file config)
(let* (let*
((config-file-name (greetd-config-file-name config)) ((config-file-name (greetd-config-file-name config))
(source-profile? (greetd-source-profile? config))
(terminal-vt (greetd-terminal-vt config)) (terminal-vt (greetd-terminal-vt config))
(terminal-switch (greetd-terminal-switch config)) (terminal-switch (greetd-terminal-switch config))
(default-session-user (greetd-default-session-user config)) (default-session-user (greetd-default-session-user config))
(default-session-command (greetd-default-session-command config))) (default-session-command (greetd-default-session-command config)))
(mixed-text-file (mixed-text-file
config-file-name config-file-name
"source_profile = " (if source-profile? "true" "false") "\n"
"[terminal]\n" "[terminal]\n"
"vt = " terminal-vt "\n" "vt = " terminal-vt "\n"
"switch = " (if terminal-switch "true" "false") "\n" "switch = " (if terminal-switch "true" "false") "\n"