fixing/disabling idle timer.
This commit is contained in:
parent
334283a4cf
commit
3dc8e345b2
@ -16,7 +16,7 @@
|
|||||||
;;;
|
;;;
|
||||||
|
|
||||||
(defvar ghc-idle-timer-interval 30
|
(defvar ghc-idle-timer-interval 30
|
||||||
"*Period of idele timer in second. When timeout, the names of
|
"*Period of idle timer in second. When timeout, the names of
|
||||||
unloaded modules are loaded")
|
unloaded modules are loaded")
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
@ -101,7 +101,8 @@ unloaded modules are loaded")
|
|||||||
"System.Directory"
|
"System.Directory"
|
||||||
"System.FilePath"
|
"System.FilePath"
|
||||||
"System.IO"))
|
"System.IO"))
|
||||||
(run-with-idle-timer ghc-idle-timer-interval 'repeat 'ghc-idle-timer))
|
;; (run-with-idle-timer ghc-idle-timer-interval 'repeat 'ghc-idle-timer)
|
||||||
|
)
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;;;
|
;;;
|
||||||
@ -314,8 +315,6 @@ unloaded modules are loaded")
|
|||||||
;;; Background Idle Timer
|
;;; Background Idle Timer
|
||||||
;;;
|
;;;
|
||||||
|
|
||||||
(defalias 'ghc-idle-timer 'ghc-load-module-all-buffer)
|
(defalias 'ghc-idle-timer 'ghc-load-module-all-buffers)
|
||||||
|
|
||||||
(defun ghc-load-module-all-buffer () nil)
|
|
||||||
|
|
||||||
(provide 'ghc-comp)
|
(provide 'ghc-comp)
|
||||||
|
Loading…
Reference in New Issue
Block a user