Commit a03ab7ea authored by Artur Malabarba's avatar Artur Malabarba
Browse files

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

parent 3b8b549f
......@@ -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>
 
......
......@@ -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.
......
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