diff options
| author | John Wiegley <johnw@newartisans.com> | 2014-03-17 14:13:20 -0500 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2014-03-17 14:13:20 -0500 |
| commit | efe2419a22b05661d9990386f40ffcf4efbf7d84 (patch) | |
| tree | 17af04edca9cd5a518b1bc2e1b44cba292276561 /lisp/use-package | |
| parent | db9cba9a31f532292a37f29977dbaedbef333e45 (diff) | |
| parent | 0ab0d77691873d25f478c1b6ed5070ee76aeb67d (diff) | |
| download | emacs-efe2419a22b05661d9990386f40ffcf4efbf7d84.tar.gz emacs-efe2419a22b05661d9990386f40ffcf4efbf7d84.tar.bz2 emacs-efe2419a22b05661d9990386f40ffcf4efbf7d84.zip | |
Merge pull request from YoungFrog/idle-interval
Add new option use-package-idle-interval.
GitHub-reference: https://github.com/jwiegley/use-package/issues/99
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) |