aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love1999-07-20 15:56:11 +0000
committerDave Love1999-07-20 15:56:11 +0000
commit4ea1d5dd95ff5e9e003481dd31215df27197a35c (patch)
tree9419063c5e12f38cbee5f47407a15c094cd8d7ab
parent8371c2f27d045c111fdb286286f216c890ece26d (diff)
downloademacs-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.el8
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.
316With arg N, kill forward to Nth end of paragraph; 316With arg N, kill forward to Nth end of paragraph;
317negative arg -N means kill backward to Nth start of paragraph." 317negative 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.
323With arg N, kill back to Nth start of paragraph; 323With arg N, kill back to Nth start of paragraph;
324negative arg -N means kill forward to Nth end of paragraph." 324negative 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.
388With arg, repeat; negative arg -N means kill back to Nth start of sentence." 388With 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.
394With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." 394With 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)