fix the number of rows to display - 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 c6ebdeef05fc755afb9f9506445026dded37a077
DIR parent 1272da9d52dd55f3de944489c2314728f99099ee
HTML Author: Solene Rapenne <solene@perso.pw>
Date: Sat, 11 Nov 2017 13:21:43 +0000
fix the number of rows to display
Diffstat:
M clic.lisp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
---
DIR diff --git a/clic.lisp b/clic.lisp
@@ -348,7 +348,7 @@
(loop for line across *buffer*
counting line into row
do
- (when (= row (- rows 2)) ; -1 for text and another -1, because I want
+ (when (= row (- rows 1)) ; -1 for text displayed
(setf row 0)
(format t "~a press enter or a shell command ~a : "
(get-color 'cyan)