diff --git a/scheme/nuit-packages.scm b/scheme/nuit-packages.scm index 8901f32..0cfaff4 100644 --- a/scheme/nuit-packages.scm +++ b/scheme/nuit-packages.scm @@ -439,6 +439,7 @@ rendezvous rendezvous-channels + ncurses plugin tty-debug result-buffer-changes diff --git a/scheme/termbuf.scm b/scheme/termbuf.scm index 5a2817c..06d5314 100644 --- a/scheme/termbuf.scm +++ b/scheme/termbuf.scm @@ -158,10 +158,9 @@ (define (paint-single-line termbuf win) (debug-message "paint-single-line " termbuf) + (wmove win (terminal-buffer-y termbuf) 0) (wclrtoeol win) - (mvwaddstr win - (terminal-buffer-y termbuf) 0 - (line-at-cursor-position termbuf)) + (waddstr win (line-at-cursor-position termbuf)) (position-cursor termbuf win)) (define (position-cursor termbuf win)