Mercurial > hg > xemacs-beta

diff lisp/fill.el @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents cc15677e0335
children 74fd4e045ea6
line wrap: on
line diff
--- a/lisp/fill.el	Mon Aug 13 11:06:08 2007 +0200
+++ b/lisp/fill.el	Mon Aug 13 11:07:10 2007 +0200
@@ -384,6 +384,7 @@
 	  ;;; 97/3/14 jhod: Kinsoku change
 	  ;; Spacing is not necessary for charcters of no word-separater.
 	  ;; The regexp word-across-newline is used for this check.
+	  (defvar word-across-newline)
 	  (if (not (and (featurep 'mule)
 			(stringp word-across-newline)))
 	      (subst-char-in-region from (point-max) ?\n ?\ )
@@ -782,7 +783,7 @@
 
 ;; 97/3/14 jhod: This functions are added for Kinsoku support
 (defun find-space-insertable-point ()
- "Search backward for a permissable point for inserting justification spaces"
+ "Search backward for a permissible point for inserting justification spaces"
  (if (boundp 'space-insertable)
      (if (re-search-backward space-insertable nil t)
 	 (progn (forward-char 1)