rescue the coming Emacs 24.4.
This commit is contained in:
parent
390c509144
commit
e2369e6772
@ -94,7 +94,7 @@
|
|||||||
(setq ghc-process-num-of-results (or n 1))
|
(setq ghc-process-num-of-results (or n 1))
|
||||||
(ghc-with-process cmd 'ghc-process-callback nil hook)
|
(ghc-with-process cmd 'ghc-process-callback nil hook)
|
||||||
(while (null ghc-process-rendezvous)
|
(while (null ghc-process-rendezvous)
|
||||||
(sit-for 0.01))
|
(sit-for 0.1 t))
|
||||||
ghc-process-results)
|
ghc-process-results)
|
||||||
|
|
||||||
(defun ghc-process-callback ()
|
(defun ghc-process-callback ()
|
||||||
|
Loading…
Reference in New Issue
Block a user