mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 04:50:55 -07:00
Code Issues Projects Releases Wiki Activity

(repunctuate-sentences): New function.

Browse source
This commit is contained in:
Richard M. Stallman 2003-05-23 12:46:38 +00:00
parent a28fe04bbd
commit d320a41dbf
1 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/textmodes/paragraphs.el
View file

@ -420,6 +420,14 @@ sentences. Also, every paragraph boundary terminates sentences as well."
(setq arg (1- arg)))
(constrain-to-field nil opoint t)))
(defun repunctuate-sentences ()
(interactive)
"Put two spaces at the end of sentences from point to the end of buffer.
It works using `query-replace-regexp'."
(query-replace-regexp "\\([]\"')]?\\)\\([.?!]\\)\\([]\"')]?\\) +"
"\\1\\2\\3 "))
(defun backward-sentence (&optional arg)
"Move backward to start of sentence. With arg, do it arg times.
See `forward-sentence' for more information."