diff options
author | Phil Hagelberg <phil@hagelb.org> | 2012-01-28 17:49:29 +0800 |
---|---|---|
committer | Chong Yidong <cyd@gnu.org> | 2012-01-28 17:49:29 +0800 |
commit | 70550acf88e5d7083d3aa83d201a8a7ebc3ba4b6 (patch) | |
tree | b75054d97335a37fa8b86ca9106a6d3a9f65d3cf /lisp/emacs-lisp/package.el | |
parent | 0ce8e868b9c704f5f8630e0b8df5550ecadb0e95 (diff) | |
download | emacs-70550acf88e5d7083d3aa83d201a8a7ebc3ba4b6.tar.gz emacs-70550acf88e5d7083d3aa83d201a8a7ebc3ba4b6.tar.bz2 emacs-70550acf88e5d7083d3aa83d201a8a7ebc3ba4b6.zip |
Fix M-x package-install failure if no archive has been fetched yet.
* emacs-lisp/package.el (package-install): Run
package-refresh-contents if there is no archive yet.
Fixes: debbugs:97978
Diffstat (limited to 'lisp/emacs-lisp/package.el')
-rw-r--r-- | lisp/emacs-lisp/package.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 7e56c5534ec..317fa1fd23d 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -889,6 +889,8 @@ archive in `package-archives'. Interactively, prompt for NAME." ;; symbols for completion. (unless package--initialized (package-initialize t)) + (unless package-archive-contents + (package-refresh-contents)) (list (intern (completing-read "Install package: " (mapcar (lambda (elt) |