From 0a012f918abd6c454aeeb1535c6fb58a226ea947 Mon Sep 17 00:00:00 2001
From: Pierre Neidhardt <mail@ambrevar.xyz>
Date: Wed, 25 Sep 2019 12:19:34 +0200
Subject: [PATCH] .profile: Source all Guix profiles in ~/.guix-extra-profiles.

---
 .profile | 21 ++++++++++++++-------
 1 file changed, 14 insertions(+), 7 deletions(-)

diff --git a/.profile b/.profile
index 1c691b76..8a12ca76 100644
--- a/.profile
+++ b/.profile
@@ -6,7 +6,7 @@
 ## Mask
 ## Result for 027 is "rwxr-x---".  022 is the popular default.
 ##
-## As a result applications make the bad assumption # that "others" have access.
+## As a result applications make the bad assumption that "others" have access.
 ## Another drawback of 027 is that is behaves badly with default sudo config: for
 ## instance "sudo mkdir foo" will effectively create a "foo" folder whose owner
 ## is root and with permission 027, even if root's umask is 022.  This is
@@ -77,6 +77,19 @@ fi
 ## Cask
 appendpath "$HOME/.cask/bin"
 
+## Guix
+## WARNING: GUIX_PACKAGE_PATH is deprecated in favor of channels.
+# if command -v guix >/dev/null 2>&1; then
+# 	export GUIX_PACKAGE_PATH="$HOME/.guix-packages"
+# fi
+for i in ~/.guix-extra-profiles/*; do
+	profile=$i/$(basename "$i")
+	if [ -f "$profile"/etc/profile ]; then
+		GUIX_PROFILE="$profile" ; . "$profile"/etc/profile
+	fi
+	unset profile
+done
+
 ## Last PATH entries.
 appendpath "${HOME}/.local/bin"
 command -v pacman >/dev/null 2>&1 && appendpath "${HOME}/.local/bin/pacman"
@@ -151,12 +164,6 @@ if command -v asp >/dev/null 2>&1; then
 	export ASPROOT="$HOME/.cache/asp"
 fi
 
-## Guix
-## WARNING: GUIX_PACKAGE_PATH is deprecated in favor of channels.
-# if command -v guix >/dev/null 2>&1; then
-# 	export GUIX_PACKAGE_PATH="$HOME/.guix-packages"
-# fi
-
 ## Default text editor
 ## 'em' is a custom wrapper for emacsclient. See '.bin/em'.
 ## VISUAL is given priority by some programs like Mutt. This way we can separate