sbcli: better prompt; zsh: better prompt and cowsay

This commit is contained in:
2019-04-15 20:32:24 +02:00
parent c7d53d76c7
commit 7799367b58
2 changed files with 7 additions and 6 deletions

View File

@@ -28,5 +28,6 @@
(defun colorize (color var)
(format nil "~a[~dm~a~a[0m" (code-char 27) (gethash color *colors*) var (code-char 27)))
(setf *prompt* (colorize :bold (colorize :blue *prompt*)))
(setf *ret* (colorize :bold (colorize :red *ret*)))
(setf *prompt* (colorize :bold (colorize :blue "λ ")))
(setf *prompt2* (colorize :bold (colorize :blue "λ₂ ")))
(setf *ret* (colorize :bold (colorize :red "⇒ ")))