diff options
| author | Nicolas Richard <theonewiththeevillook@yahoo.fr> | 2014-02-16 11:59:59 +0100 |
|---|---|---|
| committer | Nicolas Richard <theonewiththeevillook@yahoo.fr> | 2014-03-17 16:22:43 +0100 |
| commit | 0ab0d77691873d25f478c1b6ed5070ee76aeb67d (patch) | |
| tree | 17af04edca9cd5a518b1bc2e1b44cba292276561 /lisp/use-package | |
| parent | db9cba9a31f532292a37f29977dbaedbef333e45 (diff) | |
| download | emacs-0ab0d77691873d25f478c1b6ed5070ee76aeb67d.tar.gz emacs-0ab0d77691873d25f478c1b6ed5070ee76aeb67d.tar.bz2 emacs-0ab0d77691873d25f478c1b6ed5070ee76aeb67d.zip | |
Add new option use-package-idle-interval
* use-package.el (use-package-idle-interval): new defcustom
(use-package-start-idle-timer): use it
(use-package-idle-eval): use it
* README.md: document it
This addresses bug https://github.com/jwiegley/use-package/issues/77
Diffstat (limited to 'lisp/use-package')
| -rw-r--r-- | lisp/use-package/use-package.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index a4973fbf627..36e7e0b757e 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -58,6 +58,11 @@ :type 'number :group 'use-package) +(defcustom use-package-idle-interval 3 + "Time to wait when using :idle in a `use-package' specification." + :type 'number + :group 'use-package) + (defmacro use-package-with-elapsed-timer (text &rest body) (declare (indent 1)) (let ((nowvar (make-symbol "now"))) @@ -82,7 +87,7 @@ (unless use-package-idle-timer (setq use-package-idle-timer (run-with-idle-timer - 3 t + use-package-idle-interval t 'use-package-idle-eval)))) (defun use-package-init-on-idle (form priority) @@ -129,7 +134,7 @@ Return nil when the queue is empty." "Failure on use-package idle. Form: %s, Error: %s" next e))) ;; recurse after a bit - (when (sit-for 3) + (when (sit-for use-package-idle-interval) (use-package-idle-eval))) ;; finished (so far!) (cancel-timer use-package-idle-timer) |