Commit f43a0b98 authored by Kenichi Handa's avatar Kenichi Handa

(fill-delete-newlines): Don't add a space if a

setence ends with one of a character in
sentence-end-without-space.
parent 21a3e657
2004-01-27 Kenichi Handa <handa@m17n.org>
* textmodes/paragraphs.el (sentence-end-without-space): New variable.
(sentence-end): Define using sentence-end-without-space.
* textmodes/fill.el (fill-delete-newlines): Don't add a space if a
setence ends with one of a character in
sentence-end-without-space.
2004-01-26 Stefan Monnier <monnier@iro.umontreal.ca>
* font-lock.el (font-lock): Add jit-lock as explicit group member.
......
......@@ -423,9 +423,13 @@ Point is moved to just past the fill prefix on the first line."
((string-match "\\[[^][]*\\(\\.\\)[^][]*\\]" sentence-end)
(concat (replace-match ".:" nil nil sentence-end 1) "$"))
;; Can't find the right spot to insert the colon.
(t "[.?!:][])}\"']*$"))))
(t "[.?!:][])}\"']*$")))
(sentence-end-without-space-list
(string-to-list sentence-end-without-space)))
(while (re-search-forward eol-double-space-re to t)
(or (>= (point) to) (memq (char-before) '(?\t ?\ ))
(memq (char-after (match-beginning 0))
sentence-end-without-space-list)
(insert-and-inherit ?\ ))))
(goto-char from)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment