diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/emacs-lisp/package.el | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1150b68fe0f..bb19e10b9ae 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-10-25 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * emacs-lisp/package.el (package-installed-p): Warn if not ready | ||
| 4 | (bug#12721). | ||
| 5 | |||
| 1 | 2012-10-25 Glenn Morris <rgm@gnu.org> | 6 | 2012-10-25 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * emacs-lisp/cl-macs.el (cl-progv): Doc fix. | 8 | * emacs-lisp/cl-macs.el (cl-progv): Doc fix. |
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 28d166271fb..303642b5bec 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -728,6 +728,7 @@ It will move point to somewhere in the headers." | |||
| 728 | (defun package-installed-p (package &optional min-version) | 728 | (defun package-installed-p (package &optional min-version) |
| 729 | "Return true if PACKAGE, of MIN-VERSION or newer, is installed. | 729 | "Return true if PACKAGE, of MIN-VERSION or newer, is installed. |
| 730 | MIN-VERSION should be a version list." | 730 | MIN-VERSION should be a version list." |
| 731 | (unless package--initialized (error "package.el is not yet initialized!")) | ||
| 731 | (let ((pkg-desc (assq package package-alist))) | 732 | (let ((pkg-desc (assq package package-alist))) |
| 732 | (if pkg-desc | 733 | (if pkg-desc |
| 733 | (version-list-<= min-version | 734 | (version-list-<= min-version |