From ddd097bfc1c91c9cc277cfc4b82645cfb918780f Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 17 May 2004 23:19:38 +0000 Subject: [PATCH] Synch to No Gnus 200405172312. --- lisp/ChangeLog | 6 ++++++ lisp/gnus-art.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 02ca1d5..9c557bf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2004-05-18 Jesper Harder + + * gnus-art.el (gnus-article-followup-with-original) + (gnus-article-reply-with-original): gnus-mark-active-p -> + gnus-region-active-p. + 2004-05-17 Teodor Zlatanov * spam.el (spam-summary-prepare-exit): fix messages, so they show diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 1709871..e698658 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -5620,7 +5620,7 @@ the entire article will be yanked." (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))) @@ -5639,7 +5639,7 @@ the entire article will be yanked." (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))) -- 1.7.10.4