[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: system: Add skeleton '.zlogin'.
From: |
??? |
Subject: |
02/02: system: Add skeleton '.zlogin'. |
Date: |
Tue, 09 Dec 2014 10:52:29 +0000 |
iyzsong pushed a commit to branch master
in repository guix.
commit 02f707c590fa3c5bbd74168468bf561b47317f71
Author: 宋文武 <address@hidden>
Date: Fri Dec 5 21:17:49 2014 +0800
system: Add skeleton '.zlogin'.
* gnu/system/shadow.scm (default-skeletons): Add .zlogin.
---
gnu/system/shadow.scm | 4 ++++
1 files changed, 4 insertions(+), 0 deletions(-)
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index 4a2322b..b4ba006 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -122,6 +122,9 @@ if [ -f ~/.bashrc ]; then . ~/.bashrc; fi\n"))
PS1='address@hidden \\w\\$ '
alias ls='ls -p --color'
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
#:modules
'((guix build utils))))
@@ -133,6 +136,7 @@ XTerm*metaSendsEscape: true\n"))
set debug-file-directory ~/.guix-profile/lib/debug\n")))
(return `((".bash_profile" ,profile)
(".bashrc" ,bashrc)
+ (".zlogin" ,zlogin)
(".Xdefaults" ,xdefaults)
(".guile-wm" ,guile-wm)
(".gdbinit" ,gdbinit)))))