commenting - clic - Clic is an command line interactive client for gopher written in Common LISP
HTML git clone git://bitreich.org/clic/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/clic/
DIR Log
DIR Files
DIR Refs
DIR Tags
DIR README
DIR LICENSE
---
DIR commit aef4daefc84599c967d86e9bef2fb5a778f8b3f8
DIR parent 6e9a0a50df3a58cdce03da5875fa63cef51cc469
HTML Author: Solene Rapenne <solene@perso.pw>
Date: Sun, 5 Nov 2017 00:13:25 +0000
commenting
Diffstat:
M clic.lisp | 8 ++++++++
1 file changed, 8 insertions(+), 0 deletions(-)
---
DIR diff --git a/clic.lisp b/clic.lisp
@@ -200,12 +200,20 @@
(string= "Q" user-input)))
do
(cond
+
+ ;; show help
((string= "HELP" user-input)
(help-shell))
+
+ ;; go to previous page
((string= "P" user-input)
(p))
+
+ ;; show history
((string= "H" user-input)
(format t "~{~a~%~}" *history*))
+
+ ;; go to a link and ignore invalid input
(t
(ignore-errors
(g (parse-integer user-input)))))