From f4a01f3e009112e8991df849b0cbea2f3317bc4b Mon Sep 17 00:00:00 2001 From: Phillip Lord Date: Wed, 20 Jan 2016 22:02:26 +0000 Subject: [PATCH] Add new option `-always-pin' `use-package-always-pin' allows a default archive (or manual) to be specified for all use-package statements, unless explicitly overridden. --- lisp/use-package/use-package.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index a359e946378..a76b0473d7e 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -71,6 +71,11 @@ then the expanded macros do their job silently." :type 'sexp :group 'use-package) +(defcustom use-package-always-pin nil + "Treat every package as though it had specified `:pin SYM." + :type 'symbol + :group 'use-package) + (defcustom use-package-minimum-reported-time 0.1 "Minimal load time that will be reported. @@ -1075,6 +1080,11 @@ this file. Usage: (if use-package-always-ensure (use-package-plist-maybe-put args0 :ensure use-package-always-ensure) + args0))) + (args* (use-package-sort-keywords + (if use-package-always-pin + (use-package-plist-maybe-put + args* :pin use-package-always-pin) args0)))) ;; When byte-compiling, pre-load the package so all its symbols are in -- 2.39.2