[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#20255: [PATCH 2/4] system: default-skeletons: Set up Guix home profi
From: |
iyzsong |
Subject: |
bug#20255: [PATCH 2/4] system: default-skeletons: Set up Guix home profile when it exists. |
Date: |
Wed, 17 May 2023 22:04:09 +0800 |
From: 宋文武 <iyzsong@member.fsf.org>
This is a followup to 40310efde9b4a4f2cf98081d6cd10f843685ebb6.
* gnu/system/shadow.scm (default-skeletons)[bash_profile, zprofile]:
Source '~/.profile' when '~/.guix-home' exists.
---
gnu/system/shadow.scm | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm
index 4a8cc87f0f..afb47fc42d 100644
--- a/gnu/system/shadow.scm
+++ b/gnu/system/shadow.scm
@@ -151,9 +151,6 @@ (define (default-skeletons)
'useradd' in the home directory of newly created user accounts."
(let ((profile (plain-file "bash_profile" "\
-# Set up Guix Home profile
-if [ -f ~/.profile ]; then . ~/.profile; fi
-
# Honor per-interactive-shell startup file
if [ -f ~/.bashrc ]; then . ~/.bashrc; fi
@@ -165,6 +162,9 @@ (define (default-skeletons)
# Prepend setuid programs.
export PATH=/run/setuid-programs:$PATH
+
+# Set up Guix Home profile
+if [ -d ~/.guix-home ]; then . ~/.profile; fi
"))
(bashrc %default-bashrc)
(zprofile (plain-file "zprofile" "\
@@ -179,6 +179,9 @@ (define (default-skeletons)
# Prepend setuid programs.
export PATH=/run/setuid-programs:$PATH
+
+# Set up Guix Home profile
+if [ -d ~/.guix-home ]; then . ~/.profile; fi
"))
(xdefaults (plain-file "Xdefaults" "\
XTerm*utf8: always
--
2.40.1