fix: export MY_TERM_COLS/ROWS before exec sbcl
This commit is contained in:
@@ -408,8 +408,8 @@ case "$COMMAND" in
|
|||||||
LISPEOF
|
LISPEOF
|
||||||
# Capture terminal dimensions in non-standard env vars
|
# Capture terminal dimensions in non-standard env vars
|
||||||
# (SBCL strips COLUMNS/LINES but leaves MY_* alone).
|
# (SBCL strips COLUMNS/LINES but leaves MY_* alone).
|
||||||
local ts=$(stty size 2>/dev/null)
|
ts=$(stty size 2>/dev/null)
|
||||||
export MY_TERM_LINES="${ts%% *}" MY_TERM_COLS="${ts##* }"
|
export MY_TERM_ROWS="${ts%% *}" MY_TERM_COLS="${ts##* }"
|
||||||
# Clear stale cl-tty cache to ensure latest backend-size fixes
|
# Clear stale cl-tty cache to ensure latest backend-size fixes
|
||||||
find ~/.cache/common-lisp -name "*.fasl" -path "*cl-tty*" -delete 2>/dev/null
|
find ~/.cache/common-lisp -name "*.fasl" -path "*cl-tty*" -delete 2>/dev/null
|
||||||
exec sbcl --noinform --load /tmp/tui-load.lisp
|
exec sbcl --noinform --load /tmp/tui-load.lisp
|
||||||
|
|||||||
Reference in New Issue
Block a user