From: Dave Love Date: Tue, 20 Jul 1999 15:56:11 +0000 (+0000) Subject: (kill-paragraph, backward-kill-paragraph, kill-sentence) X-Git-Tag: emacs-pretest-21.0.90~7470 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4ea1d5dd95ff5e9e003481dd31215df27197a35c;p=emacs.git (kill-paragraph, backward-kill-paragraph, kill-sentence) (backward-kill-sentence): Add * to interactive spec. --- 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." "Kill forward to end of paragraph. With arg N, kill forward to Nth end of paragraph; negative arg -N means kill backward to Nth start of paragraph." - (interactive "p") + (interactive "*p") (kill-region (point) (progn (forward-paragraph arg) (point)))) (defun backward-kill-paragraph (arg) "Kill back to start of paragraph. With arg N, kill back to Nth start of paragraph; negative arg -N means kill forward to Nth end of paragraph." - (interactive "p") + (interactive "*p") (kill-region (point) (progn (backward-paragraph arg) (point)))) (defun transpose-paragraphs (arg) @@ -386,13 +386,13 @@ See `forward-sentence' for more information." (defun kill-sentence (&optional arg) "Kill from point to end of sentence. With arg, repeat; negative arg -N means kill back to Nth start of sentence." - (interactive "p") + (interactive "*p") (kill-region (point) (progn (forward-sentence arg) (point)))) (defun backward-kill-sentence (&optional arg) "Kill back from point to start of sentence. With arg, repeat, or kill forward to Nth end of sentence if negative arg -N." - (interactive "p") + (interactive "*p") (kill-region (point) (progn (backward-sentence arg) (point)))) (defun mark-end-of-sentence (arg)