From 05c6656774c99c2f45ef69f6e9aa472bb2bd731a Mon Sep 17 00:00:00 2001
From: eknauel <eknauel>
Date: Tue, 31 May 2005 14:32:16 +0000
Subject: [PATCH] Fix cursor position after eval in command-mode

---
 scheme/nuit-engine.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/scheme/nuit-engine.scm b/scheme/nuit-engine.scm
index af23262..0896701 100644
--- a/scheme/nuit-engine.scm
+++ b/scheme/nuit-engine.scm
@@ -258,7 +258,9 @@
     ;; FIXME, use insert here
     (append-to-history! new-entry)
     (paint-result-window new-entry)
-    (refresh-result-window)))
+    (refresh-result-window)
+    (move-cursor command-buffer result-buffer)
+    (refresh-command-window)))
 
 (define (eval-command-in-scheme-mode command-line)
   (let ((viewer