From 3dc8e345b2c020a344a4f4752a6c49f01e785fd7 Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Mon, 21 Apr 2014 17:35:10 +0900 Subject: [PATCH] fixing/disabling idle timer. --- elisp/ghc-comp.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/elisp/ghc-comp.el b/elisp/ghc-comp.el index e070419..55c2240 100644 --- a/elisp/ghc-comp.el +++ b/elisp/ghc-comp.el @@ -16,7 +16,7 @@ ;;; (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") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -101,7 +101,8 @@ unloaded modules are loaded") "System.Directory" "System.FilePath" "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 ;;; -(defalias 'ghc-idle-timer 'ghc-load-module-all-buffer) - -(defun ghc-load-module-all-buffer () nil) +(defalias 'ghc-idle-timer 'ghc-load-module-all-buffers) (provide 'ghc-comp)