summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cl-lib.el2
-rw-r--r--lisp/emacs-lisp/package-vc.el6
-rw-r--r--lisp/emacs-lisp/package.el2
3 files changed, 7 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/cl-lib.el b/lisp/emacs-lisp/cl-lib.el
index 4a83e9d6a7c..2a952b57646 100644
--- a/lisp/emacs-lisp/cl-lib.el
+++ b/lisp/emacs-lisp/cl-lib.el
@@ -286,7 +286,7 @@ This function is considered deprecated in favor of the built-in function
"Return t if INTEGER is odd.
This function is considered deprecated in favor of the built-in function
-`evenp' that was added in Emacs 31.1.")
+`oddp' that was added in Emacs 31.1.")
(defalias 'cl-evenp #'evenp
"Return t if INTEGER is even.
diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el
index a18841fb64d..7455bfba69e 100644
--- a/lisp/emacs-lisp/package-vc.el
+++ b/lisp/emacs-lisp/package-vc.el
@@ -271,7 +271,11 @@ asynchronously."
(defun package-vc--generate-description-file (pkg-desc pkg-file)
"Generate a package description file for PKG-DESC and write it to PKG-FILE."
(let ((name (package-desc-name pkg-desc)))
- ;; Infer the subject if missing.
+ (when (equal (package-desc-summary pkg-desc) package--default-summary)
+ ;; We unset the package description if it is just the default
+ ;; summary, so that the following heuristic can take effect.
+ (setf (package-desc-summary pkg-desc) nil))
+ ;; Infer the package description if missing.
(unless (package-desc-summary pkg-desc)
(setf (package-desc-summary pkg-desc)
(let ((main-file (package-vc--main-file pkg-desc)))
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index dc6f71af7db..2a1045b18ed 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -4525,7 +4525,7 @@ of an installed ELPA package.
The return value is a string (or nil in case we can't find it).
It works in more cases if the call is in the file which contains
the `Version:' header."
- ;; In a sense, this is a lie, but it does just what we want: precompute
+ ;; In a sense, this is a lie, but it does just what we want: precomputes
;; the version at compile time and hardcodes it into the .elc file!
(declare (pure t))
;; Hack alert!