Mercurial > emacs
changeset 84989:d7862063d437
(gnus-article-reply-with-original)
(gnus-article-followup-with-original): When `transient-mark-mode' is
off, refrain from active-region behavior for followups.
| author | David Kastrup <dak@gnu.org> |
|---|---|
| date | Sun, 30 Sep 2007 21:03:12 +0000 |
| parents | 2e9aec8f7126 |
| children | b9d2d3d3b819 |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-art.el |
| diffstat | 2 files changed, 8 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sun Sep 30 20:43:14 2007 +0000 +++ b/lisp/gnus/ChangeLog Sun Sep 30 21:03:12 2007 +0000 @@ -1,3 +1,9 @@ +2007-09-30 David Kastrup <dak@gnu.org> + + * gnus-art.el (gnus-article-reply-with-original) + (gnus-article-followup-with-original): When `transient-mark-mode' is + off, refrain from active-region behavior for followups. + 2007-08-23 Katsumi Yamaoka <yamaoka@jpl.org> * mml.el (mml-generate-mime): Make sure it uses multibyte temp buffer.
--- a/lisp/gnus/gnus-art.el Sun Sep 30 20:43:14 2007 +0000 +++ b/lisp/gnus/gnus-art.el Sun Sep 30 21:03:12 2007 +0000 @@ -5749,7 +5749,7 @@ (interactive "P") (let ((article (cdr gnus-article-current)) contents) - (if (not (gnus-mark-active-p)) + (if (not (gnus-region-active-p)) (with-current-buffer gnus-summary-buffer (gnus-summary-reply (list (list article)) wide)) (setq contents (buffer-substring (point) (mark t))) @@ -5768,7 +5768,7 @@ (interactive) (let ((article (cdr gnus-article-current)) contents) - (if (not (gnus-mark-active-p)) + (if (not (gnus-region-active-p)) (with-current-buffer gnus-summary-buffer (gnus-summary-followup (list (list article)))) (setq contents (buffer-substring (point) (mark t)))