diff options
| author | Chong Yidong <[email protected]> | 2011-09-27 11:58:13 -0400 |
|---|---|---|
| committer | Chong Yidong <[email protected]> | 2011-09-27 11:58:13 -0400 |
| commit | 502f9ebda07a494d37a9127bd396718f42c4c4d9 (patch) | |
| tree | e6d72479914d3ff3b515098da117baf198cd06e0 /lisp/emacs-lisp/package.el | |
| parent | 2b1928b8071719a779e7144bcf777d999cd9bbec (diff) | |
* lisp/emacs-lisp/package.el (list-packages): Fix echo area message.
Diffstat (limited to 'lisp/emacs-lisp/package.el')
| -rw-r--r-- | lisp/emacs-lisp/package.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 4cab8f4348..2e340a442a 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1658,10 +1658,11 @@ The list is displayed in a buffer named `*Packages*'." (switch-to-buffer buf)) (let ((upgrades (package-menu--find-upgrades))) (if upgrades - (message "%d package%s can be upgraded; type `%s' to mark them for upgrading." + (message "%d package%s can be upgraded; type `%s' to mark %s for upgrading." (length upgrades) (if (= (length upgrades) 1) "" "s") - (substitute-command-keys "\\[package-menu-mark-upgrades]"))))) + (substitute-command-keys "\\[package-menu-mark-upgrades]") + (if (= (length upgrades) 1) "it" "them"))))) ;;;###autoload (defalias 'package-list-packages 'list-packages) |