branch: externals/marginalia
commit 7782ebdd5ce6cf05190ae47df47232e474f16abb
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Fix package-lint warning
---
marginalia.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/marginalia.el b/marginalia.el
index 73916611b7..09bc720f4b 100644
--- a/marginalia.el
+++ b/marginalia.el
@@ -859,7 +859,10 @@ These annotations are skipped for remote paths."
(let ((uid (file-attribute-user-id attrs))
(gid (file-attribute-group-id attrs)))
(if (or (/= (user-uid) uid) (/= (group-gid) gid))
- (format "%s:%s" (or (user-login-name uid) uid) (or (group-name gid)
gid))
+ (format "%s:%s"
+ (or (user-login-name uid) uid)
+ ;; group-name was introduced on Emacs 27
+ (or (and (fboundp 'group-name) (group-name gid)) gid))
"")))
(defun marginalia--file-modes (attrs)
