diff --git a/sbclirc b/sbclirc index 070d2cb..b9ad6ef 100644 --- a/sbclirc +++ b/sbclirc @@ -27,5 +27,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*)))