From 627cca264366f2151bd84ed473f229b093bf4195 Mon Sep 17 00:00:00 2001
From: akr <akr>
Date: Thu, 23 Apr 1998 17:00:04 +0000
Subject: [PATCH] Sync up with main trunc.

---
 lisp/gnus-art.el |   13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 02fc34c..360bcb9 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -641,6 +641,7 @@ always hide."
       (save-excursion
 	(save-restriction
 	  (let ((buffer-read-only nil)
+		(case-fold-search t)
 		(props (nconc (list 'article-type 'headers)
 			      gnus-hidden-properties))
 		(max (1+ (length gnus-sorted-header-list)))
@@ -3280,6 +3281,18 @@ It is registered to variable `mime-view-content-header-filter-alist'."
 	   'gnus-original-article-mode
 	   #'mime-preview-quitting-method-for-gnus)
 
+(defun gnus-following-method (buf)
+  (set-buffer buf)
+  (message-followup)
+  (message-yank-original)
+  (kill-buffer buf)
+  (goto-char (point-min))
+  )
+
+(set-alist 'mime-view-following-method-alist
+	   'gnus-original-article-mode
+	   #'gnus-following-method)
+
 
 ;;; @ end
 ;;;
-- 
1.7.10.4