1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(beginning-of-line-text): Check adaptive-fill-regexp is non-nil.

This commit is contained in:
Richard M. Stallman 1996-03-06 19:12:58 +00:00
parent 766052779b
commit 7d43e2ad65

View File

@ -264,7 +264,7 @@ line, but does not move past any whitespace that was explicitly inserted
(buffer-substring
(point) (min (point-max) (+ (length fill-prefix) (point)))))
(forward-char (length fill-prefix)))
(if (and adaptive-fill-mode
(if (and adaptive-fill-mode adaptive-fill-regexp
(looking-at adaptive-fill-regexp))
(goto-char (match-end 0))))
;; Skip centering or flushright indentation