diff options
| author | Dave Love | 1999-07-20 15:56:11 +0000 |
|---|---|---|
| committer | Dave Love | 1999-07-20 15:56:11 +0000 |
| commit | 4ea1d5dd95ff5e9e003481dd31215df27197a35c (patch) | |
| tree | 9419063c5e12f38cbee5f47407a15c094cd8d7ab | |
| parent | 8371c2f27d045c111fdb286286f216c890ece26d (diff) | |
| download | emacs-4ea1d5dd95ff5e9e003481dd31215df27197a35c.tar.gz emacs-4ea1d5dd95ff5e9e003481dd31215df27197a35c.zip | |
(kill-paragraph, backward-kill-paragraph, kill-sentence)
(backward-kill-sentence): Add * to interactive spec.
| -rw-r--r-- | lisp/textmodes/paragraphs.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index d1ff1450ec8..0c9c2e0c702 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el | |||
| @@ -315,14 +315,14 @@ The paragraph marked is the one that contains point or follows point." | |||
| 315 | "Kill forward to end of paragraph. | 315 | "Kill forward to end of paragraph. |
| 316 | With arg N, kill forward to Nth end of paragraph; | 316 | With arg N, kill forward to Nth end of paragraph; |
| 317 | negative arg -N means kill backward to Nth start of paragraph." | 317 | negative arg -N means kill backward to Nth start of paragraph." |
| 318 | (interactive "p") | 318 | (interactive "*p") |
| 319 | (kill-region (point) (progn (forward-paragraph arg) (point)))) | 319 | (kill-region (point) (progn (forward-paragraph arg) (point)))) |
| 320 | 320 | ||
| 321 | (defun backward-kill-paragraph (arg) | 321 | (defun backward-kill-paragraph (arg) |
| 322 | "Kill back to start of paragraph. | 322 | "Kill back to start of paragraph. |
| 323 | With arg N, kill back to Nth start of paragraph; | 323 | With arg N, kill back to Nth start of paragraph; |
| 324 | negative arg -N means kill forward to Nth end of paragraph." | 324 | negative arg -N means kill forward to Nth end of paragraph." |
| 325 | (interactive "p") | 325 | (interactive "*p") |
| 326 | (kill-region (point) (progn (backward-paragraph arg) (point)))) | 326 | (kill-region (point) (progn (backward-paragraph arg) (point)))) |
| 327 | 327 | ||
| 328 | (defun transpose-paragraphs (arg) | 328 | (defun transpose-paragraphs (arg) |
| @@ -386,13 +386,13 @@ See `forward-sentence' for more information." | |||
| 386 | (defun kill-sentence (&optional arg) | 386 | (defun kill-sentence (&optional arg) |
| 387 | "Kill from point to end of sentence. | 387 | "Kill from point to end of sentence. |
| 388 | With arg, repeat; negative arg -N means kill back to Nth start of sentence." | 388 | With arg, repeat; negative arg -N means kill back to Nth start of sentence." |
| 389 | (interactive "p") | 389 | (interactive "*p") |
| 390 | (kill-region (point) (progn (forward-sentence arg) (point)))) | 390 | (kill-region (point) (progn (forward-sentence arg) (point)))) |
| 391 | 391 | ||
| 392 | (defun backward-kill-sentence (&optional arg) | 392 | (defun backward-kill-sentence (&optional arg) |
| 393 | "Kill back from point to start of sentence. | 393 | "Kill back from point to start of sentence. |
| 394 | With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." | 394 | With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." |
| 395 | (interactive "p") | 395 | (interactive "*p") |
| 396 | (kill-region (point) (progn (backward-sentence arg) (point)))) | 396 | (kill-region (point) (progn (backward-sentence arg) (point)))) |
| 397 | 397 | ||
| 398 | (defun mark-end-of-sentence (arg) | 398 | (defun mark-end-of-sentence (arg) |