fix the number of rows to display - 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 c6ebdeef05fc755afb9f9506445026dded37a077
 (DIR) parent 1272da9d52dd55f3de944489c2314728f99099ee
 (HTM) 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)