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

2015-08-17 12:59:52 +09:00 · 2015-08-17 12:59:52 +09:00 · 61922e249f
parent f1191a419e
commit 61922e249f
1 changed files with 2 additions and 2 deletions
--- a/elisp/ghc-process.el
+++ b/elisp/ghc-process.el
@ -126,8 +126,8 @@
 		      (with-selected-window cwin
 			(goto-char (point-max))
 			(insert-buffer-substring tbuf 1 end)
-			(set-buffer-modified-p nil)
-			(redisplay)))))
+			(set-buffer-modified-p nil))
+		      (redisplay))))
 		(delete-region 1 end)))))
 	(goto-char (point-max))
 	(forward-line -1)