sbcli: better prompt; zsh: better prompt and cowsay
This commit is contained in:
5
sbclirc
5
sbclirc
@@ -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 "⇒ ")))
|
||||
|
Reference in New Issue
Block a user