From: Justin Talbott <justin@waymondo.com>
Date: Fri, 16 Mar 2018 16:29:20 +0000 (-0400)
Subject: :ensure-system-package allow cdr of cons to be a package name symbol
X-Git-Tag: emacs-29.0.90~1306^2~15^2~73^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5d3826b625228ef61632273df374d775b429fca;p=emacs.git

:ensure-system-package allow cdr of cons to be a package name symbol

closes https://github.com/jwiegley/use-package/issues/652
---

diff --git a/lisp/use-package/use-package-ensure-system-package.el b/lisp/use-package/use-package-ensure-system-package.el
index 48fbde2e20a..81beaec104f 100644
--- a/lisp/use-package/use-package-ensure-system-package.el
+++ b/lisp/use-package/use-package-ensure-system-package.el
@@ -48,7 +48,11 @@
     (cons arg (use-package-ensure-system-package-install-command arg)))
    ((symbolp arg)
     (cons arg (use-package-ensure-system-package-install-command (symbol-name arg))))
-   ((consp arg) arg)))
+   ((consp arg)
+    (if (stringp (cdr arg))
+        arg
+      (cons (car arg)
+            (use-package-ensure-system-package-install-command (symbol-name (cdr arg))))))))
 
 ;;;###autoload
 (defun use-package-normalize/:ensure-system-package (name-symbol keyword args)