Commit 5329208b authored by Artur Malabarba's avatar Artur Malabarba
Browse files

emacs-lisp/package.el (package-install): Rename ARG to MARK-SELECTED.

parent 0ade763b
2015-02-01 Artur Malabarba <bruce.connor.am@gmail.com>
* emacs-lisp/package.el (package-selected-packages): Fix :type
(package-install): Rename ARG to MARK-SELECTED.
2015-02-01 Thierry Volpiatto <thierry.volpiatto@gmail.com>
......
......@@ -1198,13 +1198,13 @@ using `package-compute-transaction'."
(mapc #'package-install-from-archive packages))
;;;###autoload
(defun package-install (pkg &optional arg)
(defun package-install (pkg &optional mark-selected)
"Install the package PKG.
PKG can be a package-desc or the package name of one the available packages
in an archive in `package-archives'. Interactively, prompt for its name
and add PKG to `package-selected-packages'.
When called from lisp you will have to use ARG if you want to
simulate an interactive call to add PKG to `package-selected-packages'."
in an archive in `package-archives'. Interactively, prompt for its name.
If called interactively or if MARK-SELECTED is non-nil, add PKG
to `package-selected-packages'."
(interactive
(progn
;; Initialize the package system to get the list of package
......@@ -1221,8 +1221,8 @@ simulate an interactive call to add PKG to `package-selected-packages'."
(symbol-name (car elt))))
package-archive-contents))
nil t))
"\p")))
(when (and arg (not (memq pkg package-selected-packages)))
t)))
(when (and mark-selected (not (memq pkg package-selected-packages)))
(customize-save-variable 'package-selected-packages
(cons pkg package-selected-packages)))
(package-download-transaction
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment