From 19474a17116737bc821041f2e1b339b32512c518 Mon Sep 17 00:00:00 2001 From: Ivan Goncharov Date: Mon, 18 Jan 2016 14:41:27 +1300 Subject: [PATCH] Do not package-initialize on each :pin --- lisp/use-package/use-package.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index a359e946378..9eab03dedc3 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -422,7 +422,9 @@ manually updated package." (add-to-list 'package-pinned-packages (cons package archive-name)) (error "Archive '%s' requested for package '%s' is not available." archive-name package)) - (package-initialize t))) + (when (and (boundp 'package--initialized) + (not package--initialized)) + (package-initialize t)))) (defun use-package-handler/:pin (name keyword archive-name rest state) (let ((body (use-package-process-keywords name rest state)) -- 2.39.2