branch: externals/marginalia
commit 65da400307a99d64965a722b63568b4fbb9f5993
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>
marginalia-annotate-package: show package version
I don't find it very useful, but it is consistent with list-packages and for
melpa packages it shows the date. If possible I would prefer to rather
print the
date of the last update, but I don't think that information exists.
---
marginalia.el | 12 +++++++++++-
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/marginalia.el b/marginalia.el
index 65c8552..5ca447f 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -64,6 +64,11 @@
"Face used to highlight dates in `marginalia-mode'."
:group 'marginalia)
+(defface marginalia-version
+ '((t :inherit marginalia-size))
+ "Face used to highlight package version in `marginalia-mode'."
+ :group 'marginalia)
+
(defface marginalia-archive
'((t :inherit marginalia-key))
"Face used to highlight package archives in `marginalia-mode'."
@@ -291,9 +296,14 @@ This hash table is needed to speed up
`marginalia-annotate-command-binding'.")
(package--from-builtin built-in)
(car (alist-get pkg package-archive-contents))))))
(concat
- (marginalia--align 8 ;; archive
+ (marginalia--align 16 ;; version
+ marginalia-separator-width
+ 8 ;; archive
marginalia-separator-width
marginalia-documentation-width)
+ (propertize (format "%-16s" (package-version-join (package-desc-version
desc)))
+ 'face 'marginalia-version)
+ (marginalia--separator)
(propertize (format "%-8s" (package-desc-archive desc))
'face 'marginalia-archive)
(marginalia--separator)
