diff options
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/refill.el | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/textmodes/refill.el b/lisp/textmodes/refill.el index 0e15d38ccea..43842744673 100644 --- a/lisp/textmodes/refill.el +++ b/lisp/textmodes/refill.el | |||
| @@ -64,7 +64,6 @@ This is used to optimize refilling.") | |||
| 64 | (defun refill-adjust-ignorable-overlay (overlay afterp beg end &optional len) | 64 | (defun refill-adjust-ignorable-overlay (overlay afterp beg end &optional len) |
| 65 | "Adjust OVERLAY to not include the about-to-be-modified region." | 65 | "Adjust OVERLAY to not include the about-to-be-modified region." |
| 66 | (when (not afterp) | 66 | (when (not afterp) |
| 67 | (message "adjust: %s-%s" beg end) | ||
| 68 | (save-excursion | 67 | (save-excursion |
| 69 | (goto-char beg) | 68 | (goto-char beg) |
| 70 | (forward-line -1) | 69 | (forward-line -1) |
| @@ -99,7 +98,6 @@ This is used to optimize refilling.") | |||
| 99 | fill-prefix)) | 98 | fill-prefix)) |
| 100 | ;; Turn off adaptive-fill-mode temporarily | 99 | ;; Turn off adaptive-fill-mode temporarily |
| 101 | (adaptive-fill-mode nil)) | 100 | (adaptive-fill-mode nil)) |
| 102 | (message "refill-at %s: %s-%s" pos oend end) | ||
| 103 | (save-restriction | 101 | (save-restriction |
| 104 | (if use-hard-newlines | 102 | (if use-hard-newlines |
| 105 | (fill-region oend end arg) | 103 | (fill-region oend end arg) |