Recently Written · git

clic

MIRROR ONLY Gopher client with pretty colours in Common Lisp

git clone https://github.com/equwal/clic

Log | Files | Refs


commit b76072a5f201bed263c85b2776dff7ed10b6aac1
Solene Rapenne <solene@perso.pw>
2018-03-15 12:33:39 +0100

remove capital letters in the prompt

 clic.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/clic.lisp b/clic.lisp
index d11f7d9..f95ada5 100644
--- a/clic.lisp
+++ b/clic.lisp
@@ -659,7 +659,7 @@
 
 (defun display-prompt()
   (let ((last-page (car *history*)))
-    (format t "gopher://~a:~a/~a~a (~as) / (P)rev (R)edisplay (H)istory : "
+    (format t "gopher://~a:~a/~a~a (~as) / (p)rev (r)edisplay (h)istory : "
             (location-host last-page)
             (location-port last-page)
             (location-type last-page)