diff -car mew-1.91.orig/Makefile mew-1.91/Makefile
*** mew-1.91.orig/Makefile	Fri Aug 29 16:08:07 1997
--- mew-1.91/Makefile	Sat Sep 27 00:00:00 1997
***************
*** 23,30 ****
  ##
  
  #EMACS = emacs
! EMACS = xemacs
! #EMACS = mule
  #EMACS = mule2
  #EMACS = mule19
  
--- 23,30 ----
  ##
  
  #EMACS = emacs
! #EMACS = xemacs
! EMACS = mule
  #EMACS = mule2
  #EMACS = mule19
  
diff -car mew-1.91.orig/mew-scan.el mew-1.91/mew-scan.el
*** mew-1.91.orig/mew-scan.el	Thu Sep 18 10:30:37 1997
--- mew-1.91/mew-scan.el	Sat Sep 27 00:00:00 1997
***************
*** 111,117 ****
  			    ((equal mode 'mew-summary-mode)
  			     (append
  			      (list (format "--thread=%s"
! 					    (if (mew-folder-newsp folder) 
  						"yes" "no")))
  			      (list (concat "--src=" folder))
  			      mew-prog-imls-arg-list
--- 111,117 ----
  			    ((equal mode 'mew-summary-mode)
  			     (append
  			      (list (format "--thread=%s"
! 					    (if (or mew-always-thread (mew-folder-newsp folder))
  						"yes" "no")))
  			      (list (concat "--src=" folder))
  			      mew-prog-imls-arg-list
diff -car mew-1.91.orig/mew-summary.el mew-1.91/mew-summary.el
*** mew-1.91.orig/mew-summary.el	Thu Sep 18 10:31:11 1997
--- mew-1.91/mew-summary.el	Sat Sep 27 00:00:00 1997
***************
*** 116,121 ****
--- 116,122 ----
    (define-key mew-summary-mode-map "p"    'mew-summary-display-up)
    (define-key mew-summary-mode-map "N"    'mew-summary-display-hop-down)
    (define-key mew-summary-mode-map "P"    'mew-summary-display-hop-up)
+   (define-key mew-summary-mode-map "t"    'mew-summary-toggle-thread-mode)
    (define-key mew-summary-mode-map "w"    'mew-summary-send)
    (define-key mew-summary-mode-map "B"    'mew-summary-burst)
    (define-key mew-summary-mode-map "Z"    'mew-status-update)
***************
*** 236,241 ****
--- 237,243 ----
  
  i	Get +inbox asynchronously.
  s	List this folder asynchronously. 
+ t	toggle scan mail with thread mode(after this, use s command with all)
  g	Go to the folder which you input.
  
  w	Write a message. A new draft is prepared in Draft mode.
***************
*** 1156,1161 ****
--- 1158,1168 ----
  	)
      (message "No message or part here")
      ))
+ 
+ (defun mew-summary-toggle-thread-mode ()
+   (interactive)
+   (setq mew-always-thread (if mew-always-thread nil t))
+   (message "%s" (if mew-always-thread "thread mode on" "thread mode off")))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
diff -car mew-1.91.orig/mew.el mew-1.91/mew.el
*** mew-1.91.orig/mew.el	Thu Sep 18 10:31:38 1997
--- mew-1.91/mew.el	Sat Sep 27 00:00:00 1997
***************
*** 117,122 ****
--- 117,124 ----
  (defvar mew-break-pages t)
  (defvar mew-page-delimiter "^\^L")
  
+ (defvar mew-always-thread nil)
+ 
  ;;
  ;; Highlight
  ;;