X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Ffill.el;h=780d6e601a7a236ff8e16919b771da8d0aac7623;hp=f76a017c20946e8d3ce98ed0ec36d459b4e083d3;hb=a5f466de30a3e927ed1146b0c7e3870e71465c8f;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910

diff --git a/lisp/fill.el b/lisp/fill.el
index f76a017..780d6e6 100644
--- a/lisp/fill.el
+++ b/lisp/fill.el
@@ -384,6 +384,7 @@ space does not end a sentence, so don't break a line there."
 	  ;;; 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 @@ If the mark is not active, this applies to the current paragraph."
 
 ;; 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)