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 c5ad93bd84b0e56df44e063c6871c587e98ef9c0
Solene Rapenne <solene@perso.pw>
2018-01-03 14:39:48 +0100

Fix a comparison issue

 clic.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/clic.lisp b/clic.lisp
index a783248..1bdc093 100644
--- a/clic.lisp
+++ b/clic.lisp
@@ -376,7 +376,7 @@
 
 (defun parse-url(url)
   "parse a gopher url and return a location"
-  (let ((url (if (= 0 (search "gopher://" url))
+  (let ((url (if (search "gopher://" url)
                  (subseq url 9)
                  url)))