From c6768eb6eb3168afa3921e5222e6e578a30d24f0 Mon Sep 17 00:00:00 2001
From: Aleksandr Lebedev <alex.lebedev2003@icloud.com>
Date: Fri, 7 Nov 2025 23:34:46 +0100
Subject: [PATCH] Added bash prompt

---
 guix-config/home/prompt.sh       | 1 +
 guix-config/home/workstation.scm | 7 ++++---
 2 files changed, 5 insertions(+), 3 deletions(-)
 create mode 100644 guix-config/home/prompt.sh

diff --git a/guix-config/home/prompt.sh b/guix-config/home/prompt.sh
new file mode 100644
index 0000000..eba4b3c
--- /dev/null
+++ b/guix-config/home/prompt.sh
@@ -0,0 +1 @@
+export PS1='\[\033[38;2;166;227;161m\]\u\[\033[0m\]@\[\033[38;2;137;180;250m\]\h\[\033[0m\]:\[\033[38;2;249;226;175m\]\w${GUIX_ENVIRONMENT:+ [env]}\[\033[0m\]\[\033[38;2;222;221;218m\] λ \[\033[0m\]'
diff --git a/guix-config/home/workstation.scm b/guix-config/home/workstation.scm
index 4aebe10..cd5a4f8 100644
--- a/guix-config/home/workstation.scm
+++ b/guix-config/home/workstation.scm
@@ -69,14 +69,15 @@
 		 (service home-dbus-service-type)
 		 (service home-bash-service-type
                           (home-bash-configuration
-                           (environment-variables '(("PS1" . "\\[\\e[1;32m\\]\\u \\[\\e[1;34m\\]\\w \\[\\e[0m\\] ")
-                                                    ("EDITOR" . "emacsclient -c")))
+                           (environment-variables '(("EDITOR" . "emacsclient -c")))
                            (aliases '(("gs" . "git status")
 				      ("system-reconfigure" . "sudo -E guix time-machine -C ~/dotfiles/guix-config/channels-lock.scm -- system -L ~/dotfiles reconfigure ~/dotfiles/guix-config/system/$(hostname).scm")
 ("home-reconfigure" . "guix time-machine -C ~/dotfiles/guix-config/channels-lock.scm -- home -L ~/dotfiles reconfigure ~/dotfiles/guix-config/home/workstation.scm")
 ("guix-pull" . "guix pull --channels=$HOME/dotfiles/guix-config/channels.scm; guix describe --format=channels > $HOME/dotfiles/guix-config/channels-lock.scm")
 ("reconfigure" . "system-reconfigure && home-reconfigure")
-("guix-full-upgrade" . "guix-pull && reconfigure")))))
+("guix-full-upgrade" . "guix-pull && reconfigure")))
+(bashrc
+ (list (local-file "prompt.sh")))))
 		 (service home-dotfiles-service-type
                           (home-dotfiles-configuration
                            (directories '("../../files"))))