fixing a bug that the cursor stays in the error buffer.

This commit is contained in:
Kazu Yamamoto 2015-08-17 12:59:52 +09:00
parent f1191a419e
commit 61922e249f

View File

@ -126,8 +126,8 @@
(with-selected-window cwin (with-selected-window cwin
(goto-char (point-max)) (goto-char (point-max))
(insert-buffer-substring tbuf 1 end) (insert-buffer-substring tbuf 1 end)
(set-buffer-modified-p nil) (set-buffer-modified-p nil))
(redisplay))))) (redisplay))))
(delete-region 1 end))))) (delete-region 1 end)))))
(goto-char (point-max)) (goto-char (point-max))
(forward-line -1) (forward-line -1)