diff options
| author | Richard M. Stallman | 1994-09-28 04:46:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-09-28 04:46:02 +0000 |
| commit | b0e1e38fa97ce784a95382a5d8fb20440fac97c2 (patch) | |
| tree | e570e37a395ecac7b7d79e043d01cea4d9b7bd38 | |
| parent | 0cabaf31084d38c0e05f1873a7f0bd85b453b72a (diff) | |
| download | emacs-b0e1e38fa97ce784a95382a5d8fb20440fac97c2.tar.gz emacs-b0e1e38fa97ce784a95382a5d8fb20440fac97c2.zip | |
(backward-kill-sentence): Work in read-only buffers.
(kill-sentence): Work in read-only buffers.
| -rw-r--r-- | lisp/textmodes/paragraphs.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index a6a44fead8e..2a08bb21966 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el | |||
| @@ -224,13 +224,13 @@ See `forward-sentence' for more information." | |||
| 224 | (defun kill-sentence (&optional arg) | 224 | (defun kill-sentence (&optional arg) |
| 225 | "Kill from point to end of sentence. | 225 | "Kill from point to end of sentence. |
| 226 | With arg, repeat; negative arg -N means kill back to Nth start of sentence." | 226 | With arg, repeat; negative arg -N means kill back to Nth start of sentence." |
| 227 | (interactive "*p") | 227 | (interactive "p") |
| 228 | (kill-region (point) (progn (forward-sentence arg) (point)))) | 228 | (kill-region (point) (progn (forward-sentence arg) (point)))) |
| 229 | 229 | ||
| 230 | (defun backward-kill-sentence (&optional arg) | 230 | (defun backward-kill-sentence (&optional arg) |
| 231 | "Kill back from point to start of sentence. | 231 | "Kill back from point to start of sentence. |
| 232 | With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." | 232 | With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." |
| 233 | (interactive "*p") | 233 | (interactive "p") |
| 234 | (kill-region (point) (progn (backward-sentence arg) (point)))) | 234 | (kill-region (point) (progn (backward-sentence arg) (point)))) |
| 235 | 235 | ||
| 236 | (defun mark-end-of-sentence (arg) | 236 | (defun mark-end-of-sentence (arg) |