commenting - clic - Clic is an command line interactive client for gopher written in Common LISP
(HTM) 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
(HTM) 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)))))