summaryrefslogtreecommitdiff
path: root/lisp/use-package
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/use-package')
-rw-r--r--lisp/use-package/use-package.el9
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)