Mercurial > hg > xemacs-beta
diff lisp/prim/fill.el @ 4:b82b59fe008d r19-15b3
Import from CVS: tag r19-15b3
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:46:56 +0200 |
parents | ac2d302a0011 |
children | ec9a17fef872 |
line wrap: on
line diff
--- a/lisp/prim/fill.el Mon Aug 13 08:46:35 2007 +0200 +++ b/lisp/prim/fill.el Mon Aug 13 08:46:56 2007 +0200 @@ -693,7 +693,8 @@ (point) (min (point-max) (+ (length fill-prefix) (point)))))) (forward-char (length fill-prefix)) - (if (and adaptive-fill-mode + ;; XEmacs bug fix + (if (and adaptive-fill-mode adaptive-fill-regexp (looking-at adaptive-fill-regexp)) (goto-char (match-end 0)))) (setq fp-end (point))