me/guix
Archived
1
0
Fork 0
Code Activity

system: Add skeleton '.zlogin'.

Browse source 
* gnu/system/shadow.scm (default-skeletons): Add .zlogin.
This commit is contained in:
宋文武 2014-12-05 21:17:49 +08:00
parent 4e2a21d3d2
commit 02f707c590
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gnu/system/shadow.scm
View file

@ -122,6 +122,9 @@ if [ -f ~/.bashrc ]; then . ~/.bashrc; fi\n"))
PS1='\\u@\\h \\w\\$ ' PS1='\\u@\\h \\w\\$ '
alias ls='ls -p --color' alias ls='ls -p --color'
alias ll='ls -l'\n")) alias ll='ls -l'\n"))
(zlogin (text-file "zlogin" "\
# Honor system-wide environment variables
source /etc/profile\n"))
(guile-wm (gexp->derivation "guile-wm" copy-guile-wm (guile-wm (gexp->derivation "guile-wm" copy-guile-wm
#:modules #:modules
'((guix build utils)))) '((guix build utils))))
@ -133,6 +136,7 @@ XTerm*metaSendsEscape: true\n"))
set debug-file-directory ~/.guix-profile/lib/debug\n"))) set debug-file-directory ~/.guix-profile/lib/debug\n")))
(return `((".bash_profile" ,profile) (return `((".bash_profile" ,profile)
(".bashrc" ,bashrc) (".bashrc" ,bashrc)
(".zlogin" ,zlogin)
(".Xdefaults" ,xdefaults) (".Xdefaults" ,xdefaults)
(".guile-wm" ,guile-wm) (".guile-wm" ,guile-wm)
(".gdbinit" ,gdbinit))))) (".gdbinit" ,gdbinit)))))