system: Export default xdefaults.
* gnu/system/shadow.scm (%default-xdefaults): Extract from default-skeletons, export. (default-skeletons): Use %default-xdefaults. Change-Id: I44018516ec3687a68d32ca5c86c41bc29507a273
This commit is contained in:
parent
6a9e4b0639
commit
7292838874
|
@ -66,6 +66,7 @@ (define-module (gnu system shadow)
|
|||
#:export (%default-bashrc
|
||||
%default-bash-profile
|
||||
%default-zprofile
|
||||
%default-xdefaults
|
||||
default-skeletons
|
||||
skeleton-directory
|
||||
%base-groups
|
||||
|
@ -182,6 +183,11 @@ (define %default-zprofile
|
|||
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 @@ (define (default-skeletons)
|
|||
(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
|
||||
|
|
Loading…
Reference in a new issue