From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 26 May 2023 15:18:49 +0000 (-0400)
Subject: * lisp/emacs-lisp/package.el (package-buffer-info): Fix last change
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=321ed8ebae8f84e0f8ae6cf2012f0f8830d9fda9;p=emacs.git

* lisp/emacs-lisp/package.el (package-buffer-info): Fix last change

The code that follows expects point to be at/near the end of the buffer.
---

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index e906c73ecab..69595601bc8 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1199,7 +1199,7 @@ boundaries."
     ;; the earliest in version 31.1.  The idea is to phase out the
     ;; requirement for a "footer line" without unduly impacting users
     ;; on earlier Emacs versions.  See Bug#26490 for more details.
-    (unless (search-forward (concat ";;; " file-name ".el ends here") nil t)
+    (unless (search-forward (concat ";;; " file-name ".el ends here") nil 'move)
       (lwarn '(package package-format) :warning
              "Package lacks a terminating comment"))
     ;; Try to include a trailing newline.