diff options
| author | David Thompson <dthompson2@worcester.edu> | 2023-03-26 09:54:48 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2023-03-26 09:54:48 -0400 |
| commit | bd9adb3c7c6e97afb56320d32f994a4596a71cce (patch) | |
| tree | e929d242b5c94dcfaf80ba1a183e12d553b7c81a | |
| parent | 5941a2379dbcaa22f1da3f33dbcf38662727d164 (diff) | |
Use resize method in line editor.
| -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 |