aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/textmodes/refill.el2
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 124647122c3..e07a418c0db 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
12000-11-22 Miles Bader <miles@gnu.org> 12000-11-22 Miles Bader <miles@gnu.org>
2 2
3 * textmodes/refill.el (refill-adjust-ignorable-overlay)
4 (refill-fill-paragraph-at): Remove debugging code.
5
3 * calendar/calendar.el (generate-calendar-window): When we don't 6 * calendar/calendar.el (generate-calendar-window): When we don't
4 call `fit-window-to-buffer', make sure the top line is fully visible. 7 call `fit-window-to-buffer', make sure the top line is fully visible.
5 8
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)