# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1082326134 0
# Node ID 8ecfbf14a036e6b7d4a5ae2e4fe3d73224367924
# Parent  4c4f4e6f6bbf3eabb0757529876d743ecd8722e4
(canonically-space-region, fill-nobreak-p, fill-delete-newlines):
Use function `sentence-end' instead of variable `sentence-end'.

diff -r 4c4f4e6f6bbf -r 8ecfbf14a036 lisp/textmodes/fill.el
--- a/lisp/textmodes/fill.el	Sun Apr 18 22:08:03 2004 +0000
+++ b/lisp/textmodes/fill.el	Sun Apr 18 22:08:54 2004 +0000
@@ -155,7 +155,7 @@
 and `sentence-end-without-period').
 Remove indentation from each line."
   (interactive "*r")
-  (let ((end-spc-re (concat "\\(" sentence-end "\\) *\\|  +")))
+  (let ((end-spc-re (concat "\\(" (sentence-end) "\\) *\\|  +")))
     (save-excursion
       (goto-char beg)
       ;; Nuke tabs; they get screwed up in a fill.
@@ -349,7 +349,7 @@
      (save-excursion
        (skip-chars-backward ". ")
        (and (looking-at "\\.")
-     	    (not (looking-at sentence-end))))
+     	    (not (looking-at (sentence-end)))))
      ;; Don't split a line if the rest would look like a new paragraph.
      (unless use-hard-newlines
        (save-excursion
@@ -424,10 +424,10 @@
   ;; loses on split abbrevs ("Mr.\nSmith")
   (let ((eol-double-space-re
 	 (cond
-	  ((not colon-double-space) (concat sentence-end "$"))
+	  ((not colon-double-space) (concat (sentence-end) "$"))
 	  ;; Try to add the : inside the `sentence-end' regexp.
-	  ((string-match "\\[[^][]*\\(\\.\\)[^][]*\\]" sentence-end)
-	   (concat (replace-match ".:" nil nil sentence-end 1) "$"))
+	  ((string-match "\\[[^][]*\\(\\.\\)[^][]*\\]" (sentence-end))
+	   (concat (replace-match ".:" nil nil (sentence-end) 1) "$"))
 	  ;; Can't find the right spot to insert the colon.
 	  (t "[.?!:][])}\"']*$")))
 	(sentence-end-without-space-list