emacs-lisp/package.el (describe-package-1): Fix "incompat" handling.

This commit is contained in:
Artur Malabarba 2015-02-13 13:08:38 +00:00
parent 3b8b549fff
commit a03ab7eaf5
2 changed files with 4 additions and 3 deletions

View file

@ -4,6 +4,7 @@
(package--add-to-compatibility-table): New function.
(package-read-all-archive-contents): Populate compatibility table.
(package--incompatible-p): Also look in dependencies.
(describe-package-1): Fix "incompat" handling.
2015-02-13 Lars Ingebrigtsen <larsi@gnus.org>

View file

@ -1811,6 +1811,8 @@ the table."
(installable (and archive (not built-in)))
(status (if desc (package-desc-status desc) "orphan"))
(signed (if desc (package-desc-signed desc))))
(when (string= status "incompat")
(setq status "incompatible"))
(prin1 name)
(princ " is ")
(princ (if (memq (aref status 0) '(?a ?e ?i ?o ?u)) "an " "a "))
@ -1825,9 +1827,7 @@ the table."
(pkg-dir
(insert (propertize (if (member status '("unsigned" "dependency"))
"Installed"
(if (equal status "incompat")
"Incompatible"
(capitalize status))) ;FIXME: Why comment-face?
(capitalize status)) ;FIXME: Why comment-face?
'font-lock-face 'font-lock-comment-face))
(insert " in `")
;; Todo: Add button for uninstalling.