diff options
| -rw-r--r-- | src/lib.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lib.lisp b/src/lib.lisp index b3741cd..b5256fe 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -474,6 +474,7 @@ and, failing that, try to fetch from configured server." 4))) (defun print-oneliner-result-for-user (oneliner) + (unless *term-width* (set-term-width)) ; setting here as a fallback, can set it elswere if desired. (let* ((title-line-format-str (concatenate 'string "~" (prin1-to-string *term-width*) "<[~a]~;~a~;~a~>~%")) (tags-line-format-string |