From b75c1cb47e7ca8bc37536eab6b9534f2c8ecbea4 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Mon, 16 Mar 2015 02:48:13 -0500 Subject: [PATCH] Allow :pin to accept a symbol --- lisp/use-package/use-package.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el index b843725eccb..638a16ee992 100644 --- a/lisp/use-package/use-package.el +++ b/lisp/use-package/use-package.el @@ -304,9 +304,12 @@ the user specified.") (:pin (use-package-only-one (symbol-name head) args (lambda (label arg) - (if (stringp arg) - arg - (use-package-error ":pin wants an archive name (a string)"))))) + (cond + ((stringp arg) arg) + ((symbolp arg) (symbol-name arg)) + (t + (use-package-error + ":pin wants an archive name (a string)")))))) (_ (use-package-error (format "Unrecognized keyword: %s" head))))) (use-package-normalize-plist name-symbol tail))))) -- 2.39.2