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))