diff options
| -rw-r--r-- | lib/client.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/client.lisp b/lib/client.lisp index 680d07b..ae5534f 100644 --- a/lib/client.lisp +++ b/lib/client.lisp @@ -78,7 +78,7 @@ running the body. If such a oneliner can be found." (defun print-item-explanation (name-or-number) (when-oneliner (ol name-or-number) (print-oneliner-result-for-user ol) - (when (oneliner-explanation ol) + (when (plusp (length (remove #\space (oneliner-explanation ol)))) (loop repeat (floor (/ *term-width* 3)) do (princ " ")) (let ((tilde-count (floor (* 0.5 (- (/ *term-width* 3) (length "NOTES")))))) |