Mercurial > emacs
changeset 58919:ee363a1523f3
* textmodes/paragraphs.el (mark-paragraph):
Extend the region when mark is active in transient-mark-mode,
regardless of the last command. Doc fix.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Mon, 13 Dec 2004 03:11:09 +0000 |
| parents | 2ee970dcd072 |
| children | 83b92481d956 |
| files | lisp/textmodes/paragraphs.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/paragraphs.el Mon Dec 13 03:09:59 2004 +0000 +++ b/lisp/textmodes/paragraphs.el Mon Dec 13 03:11:09 2004 +0000 @@ -357,13 +357,15 @@ If ARG is negative, point is put at end of this paragraph, mark is put at beginning of this or a previous paragraph. -If this command is repeated, it marks the next ARG paragraphs after (or -before, if arg is negative) the ones already marked." +If this command is repeated or mark is active in Transient Mark mode, +it marks the next ARG paragraphs after (or before, if arg is negative) +the ones already marked." (interactive "p") (unless arg (setq arg 1)) (when (zerop arg) (error "Cannot mark zero paragraphs")) - (cond ((and (eq last-command this-command) (mark t)) + (cond ((or (and (eq last-command this-command) (mark t)) + (and transient-mark-mode mark-active)) (set-mark (save-excursion (goto-char (mark))