diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-01 17:33:34 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-01 17:34:07 +0100 |
| commit | d086d4f91d159d554dd8d9200052a66ccf9c287a (patch) | |
| tree | 49385e6f5fc6e14fba0269850ec8e163e4022b8e /lisp/textmodes/pixel-fill.el | |
| parent | 0f6bf308ab302cb8850e97bd7e41a4b432fcfeca (diff) | |
| download | emacs-d086d4f91d159d554dd8d9200052a66ccf9c287a.tar.gz emacs-d086d4f91d159d554dd8d9200052a66ccf9c287a.tar.bz2 emacs-d086d4f91d159d554dd8d9200052a66ccf9c287a.zip | |
Fix fencepost error in pixel-fill--fill-line
* 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.
Diffstat (limited to 'lisp/textmodes/pixel-fill.el')
| -rw-r--r-- | lisp/textmodes/pixel-fill.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/textmodes/pixel-fill.el b/lisp/textmodes/pixel-fill.el index 86fdd3c2ff4..f69696e1f56 100644 --- a/lisp/textmodes/pixel-fill.el +++ b/lisp/textmodes/pixel-fill.el @@ -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)))) |