From 6edfcf3e908ea9694417e798984461b1ef370626 Mon Sep 17 00:00:00 2001 From: Vagrant Cascadian Date: Sun, 14 Nov 2021 17:33:35 -0800 Subject: gnu: home: services: Fix typo. * gnu/home/services/shells.scm (home-shell-profile-configuration): Fix spelling of "available". --- gnu/home/services/shells.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gnu/home/services/shells.scm') diff --git a/gnu/home/services/shells.scm b/gnu/home/services/shells.scm index 81d07da86c..6b9ebe42e9 100644 --- a/gnu/home/services/shells.scm +++ b/gnu/home/services/shells.scm @@ -69,7 +69,7 @@ only be extended. @code{profile} is a list of file-like objects, which will go to @file{~/.profile}. By default @file{~/.profile} contains the initialization code, which have to be evaluated by login shell to make -home-environment's profile avaliable to the user, but other commands +home-environment's profile available to the user, but other commands can be added to the file if it is really necessary. In most cases shell's configuration files are preferred places for -- cgit v1.2.3 From c322d97832081e6e1913c6311616030d1fad4ee2 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Tue, 16 Nov 2021 13:23:08 +0100 Subject: home: services: bash: Emit 'extra-content' first again. Fixes a regression introduced in 4b96998292442ec03024481c911d88f86c7c36b5 that would less to a 'tests/guix-home.sh' failure. * gnu/home/services/shells.scm (add-bash-configuration)[file-if-not-empty]: Move EXTRA-CONTENT first. --- gnu/home/services/shells.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gnu/home/services/shells.scm') diff --git a/gnu/home/services/shells.scm b/gnu/home/services/shells.scm index 6b9ebe42e9..80f13a31b7 100644 --- a/gnu/home/services/shells.scm +++ b/gnu/home/services/shells.scm @@ -420,9 +420,9 @@ alias grep='grep --color=auto'\n") (not (null? ((configuration-field-getter field-obj) config)))) `(,(object->snake-case-string file-name) ,(apply mixed-text-file - (object->snake-case-string file-name) - (cons (serialize-field field) - (if extra-content extra-content '())))) + (object->snake-case-string file-name) + (append (or extra-content '()) + (list (serialize-field field))))) '()))) (filter -- cgit v1.2.3