diff lisp/prim/fill.el @ 70:131b0175ea99 r20-0b30

Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents 28a7c63c7e1e
children 360340f9fd5f
line wrap: on
line diff
--- a/lisp/prim/fill.el	Mon Aug 13 09:00:04 2007 +0200
+++ b/lisp/prim/fill.el	Mon Aug 13 09:02:59 2007 +0200
@@ -38,9 +38,7 @@
 A value of nil means that any change in indentation starts a new paragraph.")
 
 (defconst sentence-end-double-space t
-  "*Non-nil means a single space does not end a sentence.
-This variable applies only to filling, not motion commands.  To
-change the behavior of motion commands, see `sentence-end'.")
+  "*Non-nil means a single space does not end a sentence.")
 
 (defconst colon-double-space nil
   "*Non-nil means put two spaces after a colon when filling.")
@@ -206,7 +204,7 @@
 function, but with a prefix arg, does full justification instead.
 
 From a program, optional third arg JUSTIFY can specify any type of
-justification.  Fourth arg NOSQUEEZE non-nil means not to make spaces
+ustification.  Fourth arg NOSQUEEZE non-nil means not to make spaces
 between words canonical before filling.  Fifth arg SQUEEZE-AFTER, if non-nil,
 means don't canonicalize spaces before that position.
 
@@ -695,8 +693,7 @@
 			   (point) (min (point-max) (+ (length fill-prefix)
 						       (point))))))
 	      (forward-char (length fill-prefix))
-	    ;; XEmacs bug fix
-	    (if (and adaptive-fill-mode adaptive-fill-regexp
+	    (if (and adaptive-fill-mode 
 		     (looking-at adaptive-fill-regexp))
 		(goto-char (match-end 0))))
 	  (setq fp-end (point))