From: Phillip Lord <phillip.lord@russet.org.uk>
Date: Mon, 31 Dec 2012 16:58:45 +0000 (+0100)
Subject: ELPA package support
X-Git-Tag: emacs-29.0.90~1306^2~15^2~467^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c28874e956;p=emacs.git

ELPA package support
---

diff --git a/lisp/use-package/use-package.el b/lisp/use-package/use-package.el
index f9bc5c2b32e..3dce341e9da 100644
--- a/lisp/use-package/use-package.el
+++ b/lisp/use-package/use-package.el
@@ -314,6 +314,12 @@
                                     :url (match-string 1))))))))
     args))
 
+
+(defun use-package-ensure-elpa (package)
+  (when (not (package-installed-p package))
+    (package-install package)))
+
+
 (defmacro use-package (name &rest args)
   (let* ((commands (plist-get args :commands))
          (pre-init-body (plist-get args :pre-init))
@@ -342,6 +348,11 @@
          (name-symbol (if (stringp name) (intern name) name)))
 
     (unless (plist-get args :disabled)
+      
+      ;; force this immediately -- one off cost!
+      (if (plist-get args :ensure)
+          (use-package-ensure-elpa name))
+      
       (if diminish-var
           (setq config-body
                 `(progn