summaryrefslogtreecommitdiff
path: root/gnu/system
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2023-12-31 10:26:44 +0200
committerEfraim Flashner <efraim@flashner.co.il>2024-01-17 11:11:09 +0200
commit72928388746e05fa698b62fd7a6c78965f374aef (patch)
tree51208a560183678a2117328313ad88265f8e6609 /gnu/system
parent6a9e4b063917240c8c4bf412db47f7e07df39732 (diff)
system: Export default xdefaults.
* gnu/system/shadow.scm (%default-xdefaults): Extract from default-skeletons, export. (default-skeletons): Use %default-xdefaults. Change-Id: I44018516ec3687a68d32ca5c86c41bc29507a273
Diffstat (limited to 'gnu/system')
-rw-r--r--gnu/system/shadow.scm10
1 files changed, 7 insertions, 3 deletions
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index 9b1678c54d..be7c4370a2 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -66,6 +66,7 @@
#:export (%default-bashrc
%default-bash-profile
%default-zprofile
+ %default-xdefaults
default-skeletons
skeleton-directory
%base-groups
@@ -182,6 +183,11 @@ eval \"$(guix package --search-paths \\
export PATH=/run/setuid-programs:$PATH
"))
+(define %default-xdefaults
+ (plain-file "Xdefaults" "\
+XTerm*utf8: always
+XTerm*metaSendsEscape: true\n"))
+
(define (default-skeletons)
"Return the default skeleton files for /etc/skel. These files are copied by
'useradd' in the home directory of newly created user accounts."
@@ -189,9 +195,7 @@ export PATH=/run/setuid-programs:$PATH
(let ((profile %default-bash-profile)
(bashrc %default-bashrc)
(zprofile %default-zprofile)
- (xdefaults (plain-file "Xdefaults" "\
-XTerm*utf8: always
-XTerm*metaSendsEscape: true\n"))
+ (xdefaults %default-xdefaults)
(gdbinit (plain-file "gdbinit" "\
# Tell GDB where to look for separate debugging files.
guile