[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 4e6f98c: * lisp/emacs-lisp/package.el (package-buffer-info): Use
From: |
Stefan Monnier |
Subject: |
master 4e6f98c: * lisp/emacs-lisp/package.el (package-buffer-info): Use lm-maintainers |
Date: |
Mon, 9 Aug 2021 12:05:29 -0400 (EDT) |
branch: master
commit 4e6f98cd505ed56e7928fcdb5ab88c09d0e74d89
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/emacs-lisp/package.el (package-buffer-info): Use lm-maintainers
Avoid the now obsolete `lm-maintainer`.
---
lisp/emacs-lisp/package.el | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 82ea9e7..dac412c 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1120,7 +1120,7 @@ is wrapped around any parts requiring it."
(declare-function lm-header-multiline "lisp-mnt" (header))
(declare-function lm-homepage "lisp-mnt" (&optional file))
(declare-function lm-keywords-list "lisp-mnt" (&optional file))
-(declare-function lm-maintainer "lisp-mnt" (&optional file))
+(declare-function lm-maintainers "lisp-mnt" (&optional file))
(declare-function lm-authors "lisp-mnt" (&optional file))
(defun package-buffer-info ()
@@ -1166,7 +1166,10 @@ boundaries."
:kind 'single
:url homepage
:keywords keywords
- :maintainer (lm-maintainer)
+ :maintainer
+ ;; For backward compatibility, use a single string if there's only
+ ;; one maintainer (the most common case).
+ (let ((maints (lm-maintainers))) (if (cdr maints) maints (cat maints)))
:authors (lm-authors)))))
(defun package--read-pkg-desc (kind)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 4e6f98c: * lisp/emacs-lisp/package.el (package-buffer-info): Use lm-maintainers,
Stefan Monnier <=