# HG changeset patch
# User David Kastrup <dak@gnu.org>
# Date 1191186192 0
# Node ID d7862063d437c2c49051527ba480c7caf82af25e
# Parent  2e9aec8f7126939d08b72a822947b4a91bcbcddd
(gnus-article-reply-with-original)
(gnus-article-followup-with-original): When `transient-mark-mode' is
off, refrain from active-region behavior for followups.

diff -r 2e9aec8f7126 -r d7862063d437 lisp/gnus/ChangeLog
--- 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.
diff -r 2e9aec8f7126 -r d7862063d437 lisp/gnus/gnus-art.el
--- 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)))