From: Justin Talbott <justin@waymondo.com>
Date: Sun, 10 Feb 2019 01:52:50 +0000 (-0500)
Subject: use `use-package-as-one` for normalizing `:ensure-system-package`
X-Git-Tag: emacs-29.0.90~1306^2~15^2~27^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4149ec6cfa;p=emacs.git

use `use-package-as-one` for normalizing `:ensure-system-package`

This makes the preferred syntax consistent with other `use-package`
keywords. All of these are now valid:

```
(use-package format-all
  :ensure-system-package
  (prettier . "npm i -g prettier")
  (rufo . "gem install rufo"))

(use-package format-all
  :ensure-system-package
  ((prettier . "npm i -g prettier")
   (rufo . "gem install rufo")))

(use-package format-all
  :ensure-system-package
  (prettier . "npm i -g prettier"))
```
---

diff --git a/lisp/use-package/use-package-ensure-system-package.el b/lisp/use-package/use-package-ensure-system-package.el
index 87abf407020..948d69df4ba 100644
--- a/lisp/use-package/use-package-ensure-system-package.el
+++ b/lisp/use-package/use-package-ensure-system-package.el
@@ -46,7 +46,7 @@
 ;;;###autoload
 (defun use-package-normalize/:ensure-system-package (_name-symbol keyword args)
   "Turn `arg' into a list of cons-es of (`package-name' . `install-command')."
-  (use-package-only-one (symbol-name keyword) args
+  (use-package-as-one (symbol-name keyword) args
     (lambda (_label arg)
       (cond
        ((and (listp arg) (listp (cdr arg)))