From e1518e2d2775894fb720efe4f00209d896070aba Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 4 Apr 2017 12:29:34 -0400 Subject: [PATCH] Fix package-refresh-contents loop bug in package management --- core/autoload/packages.el | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/core/autoload/packages.el b/core/autoload/packages.el index 3042a19ab..e1b6a372c 100644 --- a/core/autoload/packages.el +++ b/core/autoload/packages.el @@ -1,15 +1,21 @@ ;;; packages.el (provide 'doom-lib-packages) +(defvar doom--last-refresh nil) + ;;;###autoload (defun doom-refresh-packages () "Refresh ELPA packages." (doom-initialize) (let ((last-refresh (persistent-soft-fetch 'last-pkg-refresh "emacs"))) - (when (or (not last-refresh) - (> (nth 1 (time-since last-refresh)) 600)) - (package-refresh-contents) - (persistent-soft-store 'last-pkg-refresh (current-time) "emacs")))) + (when last-refresh + (setq doom--last-refresh last-refresh))) + (when (or (not doom--last-refresh) + (> (nth 1 (time-since doom--last-refresh)) 600)) + (package-refresh-contents) + (persistent-soft-store + 'last-pkg-refresh (setq doom--last-refresh (current-time)) + "emacs"))) ;;;###autoload (defun doom-package-backend (name)