]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix fancy-about-screen point placement
authorLars Ingebrigtsen <larsi@gnus.org>
Sun, 5 Dec 2021 19:53:47 +0000 (20:53 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Sun, 5 Dec 2021 19:54:50 +0000 (20:54 +0100)
* lisp/startup.el (fancy-about-screen): Make point placement more
resilient (bug#43636).

lisp/startup.el

index 8ea7a5b392d1bd46b0017a537ccb37f554a78706..e5e6b07b4d413d2d470200294efdfe645c80c7dd 100644 (file)
@@ -1989,8 +1989,9 @@ splash screen in another window."
       (setq-local browse-url-browser-function 'eww-browse-url)
       (setq tab-width 22)
       (setq buffer-read-only t)
+      ;; Place point somewhere it doesn't cover a character.
       (goto-char (point-min))
-      (forward-line 3))))
+      (re-search-forward "\n$" nil nil 2))))
 
 (defun fancy-splash-frame ()
   "Return the frame to use for the fancy splash screen.