diff options
| -rw-r--r-- | catbird/line-editor.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/catbird/line-editor.scm b/catbird/line-editor.scm index 463bd0c..03dc4a9 100644 --- a/catbird/line-editor.scm +++ b/catbird/line-editor.scm @@ -158,9 +158,9 @@ (place-right on after) (align-left on cursor) ;; Adjust size - (set! (width editor) - (+ (width lprompt) (width before) (width on) (width after))) - (set! (height editor) (height cursor)) + (resize editor + (+ (width lprompt) (width before) (width on) (width after)) + (height cursor)) ;; Resume blinking cursor after a short idle timeout. (run-script cursor (forever |