]> git.eshelyaron.com Git - emacs.git/commitdiff
Reverting "Documentation for the use-package macro."
authorPhillip Lord <phillip.lord@russet.org.uk>
Thu, 17 Jan 2013 21:55:53 +0000 (21:55 +0000)
committerPhillip Lord <phillip.lord@russet.org.uk>
Thu, 17 Jan 2013 21:55:53 +0000 (21:55 +0000)
Revert "Documentation for the use-package macro."

This reverts commit abc0ebc92dc1cf9ef9adfe133d0b30bf7382b65c.

lisp/use-package/use-package.el

index 43466d7c666662dea5d6b65134f432e1d8f5778d..3dce341e9da490c1670754f9318b3f15c70b3a5c 100644 (file)
 
 
 (defmacro use-package (name &rest args)
-"Use a package with configuration options.
-
-For full documentation. please see commentary. 
-
-  (use-package package-name
-     :keyword option)
-:init Code to run when `use-package' form evals.
-:bind Perform key bindings, and define autoload for bound
-      commands.
-:commands Define autoloads for given commands.
-:mode Form to be added to `auto-mode-alist'.
-:interpreter Form to be added to `auto-interpreter-alist'.
-:defer Defer loading of package -- automatic
-       if :commands, :bind, :mode or :interpreter are used.
-:config Runs if and when package loads.
-:if Conditional loading.
-:disabled Ignore everything.
-:defines Define vars to silence byte-compiler.
-:load-path Add to `load-path' before loading.
-:diminish Support for diminish package (if it's installed).
-"
   (let* ((commands (plist-get args :commands))
          (pre-init-body (plist-get args :pre-init))
          (init-body (plist-get args :init))
@@ -372,13 +350,8 @@ For full documentation. please see commentary.
     (unless (plist-get args :disabled)
       
       ;; force this immediately -- one off cost!
-      (let* ((ensure (plist-get args :ensure))
-            (package-name 
-             (or (and (eq ensure t)
-                      name)
-                 ensure)))
-        (when package-name 
-         (use-package-ensure-elpa package-name)))
+      (if (plist-get args :ensure)
+          (use-package-ensure-elpa name))
       
       (if diminish-var
           (setq config-body