From bd9adb3c7c6e97afb56320d32f994a4596a71cce Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sun, 26 Mar 2023 09:54:48 -0400 Subject: Use resize method in line editor. --- catbird/line-editor.scm | 6 +++--- 1 file 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 -- cgit v1.2.3