master d221c02fa1: Fix bibtex-map-entries regression at bobp

[Lars Ingebrigtsen]

branch: master
commit d221c02fa1db17e1275687f0bbce4ff1499119a1
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix bibtex-map-entries regression at bobp
    
    * lisp/textmodes/bibtex.el (bibtex-map-entries): Fix regression
    introduced by c32e8b33f (bug#55342) -- don't fail when the first
    entry is at bobp.
---
 lisp/textmodes/bibtex.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index 62a4af1377..544e0da827 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -2298,11 +2298,11 @@ is non-nil, FUN is not called for @String entries."
     (set-marker-insertion-type end-marker t)
     (save-excursion
       (goto-char (point-min))
-      (let ((prev (point)))
+      (let ((prev nil))
         (while (setq found (bibtex-skip-to-valid-entry))
           ;; If we have invalid entries, ensure that we have forward
           ;; progress so that we don't infloop.
-          (if (= (point) prev)
+          (if (equal (point) prev)
               (forward-line 1)
             (setq prev (point))
             (set-marker end-marker (cdr found))