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

elisp: Fix excessive map-file calls (again)

Browse Source 
(current-buffer) refered to the ghc-mod process buffer not the (user)
file buffer we actually wanted to check for modifications.
This commit is contained in:
Daniel Gröber 2017-05-26 09:40:29 +02:00
parent efca8f8270
commit 04972673dd
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

@ -55,7 +55,7 @@
(let ((pro (ghc-get-process cpro name buf root)) (let ((pro (ghc-get-process cpro name buf root))
(map-cmd (format "map-file %s\n" file))) (map-cmd (format "map-file %s\n" file)))
; (unmap-cmd (format "unmap-file %s\n" file))) ; (unmap-cmd (format "unmap-file %s\n" file)))
(when (buffer-modified-p (current-buffer)) (when (buffer-modified-p cbuf)
(setq ghc-process-file-mapping t) (setq ghc-process-file-mapping t)
(setq ghc-process-async-after-callback nil) (setq ghc-process-async-after-callback nil)
(erase-buffer) (erase-buffer)