]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix fencepost error in pixel-fill--fill-line
authorLars Ingebrigtsen <larsi@gnus.org>
Wed, 1 Dec 2021 16:33:34 +0000 (17:33 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 1 Dec 2021 16:34:07 +0000 (17:34 +0100)
* lisp/textmodes/pixel-fill.el (pixel-fill--fill-line): Don't add
a newline (and continuation) if we're at the end of the line.

lisp/textmodes/pixel-fill.el

index 86fdd3c2ff47d18957f04193a03778cb9a548d13..f69696e1f566a2e526163618efbacbe0b30b8f5f 100644 (file)
@@ -127,10 +127,11 @@ prefix on subsequent lines."
       ;; Success; continue.
       (when (= (preceding-char) ?\s)
        (delete-char -1))
-      (insert ?\n)
-      (when (> indentation 0)
-        (insert (propertize " " 'display
-                            (list 'space :align-to (list indentation)))))
+      (unless (eobp)
+        (insert ?\n)
+        (when (> indentation 0)
+          (insert (propertize " " 'display
+                              (list 'space :align-to (list indentation))))))
       (setq start (point))
       (pixel-fill--goto-pixel width))))