hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixing a race (#405).

Browse Source
This commit is contained in:
Kazu Yamamoto 2014-11-29 12:57:23 +09:00
parent e487a366d8
commit fb2dc5fca5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
elisp/ghc-process.el
View File

@ -114,7 +114,7 @@
(condition-case nil (condition-case nil
(let ((inhibit-quit nil)) (let ((inhibit-quit nil))
(while (null ghc-process-rendezvous) (while (null ghc-process-rendezvous)
(accept-process-output pro))) (accept-process-output pro 0.1 nil t)))
(quit (quit
(setq ghc-process-running nil)))) (setq ghc-process-running nil))))
ghc-process-results)) ghc-process-results))