rmail-summary-by-topic

rmail-summary-by-topic

[Alex Schroeder]

I think rmail-summary-by-topic should use the current subject as a
default -- this would quickly provide the kind of "conversation view"
that Gmail offers, without the need to do threading.

I therefore suggest the following patch.  If nobody objects, I can
apply it, too.

*** rmailsum.el	24 Sep 2005 15:43:58 +0200	1.139
--- rmailsum.el	07 Jan 2006 16:17:09 +0100	
***************
*** 132,138 ****
  but if WHOLE-MESSAGE is non-nil (prefix arg given),
   look in the whole message.
  SUBJECT is a string of regexps separated by commas."
!   (interactive "sTopics to summarize by: \nP")
    (rmail-new-summary
     (concat "about " subject)
     (list 'rmail-summary-by-topic subject whole-message)
--- 132,146 ----
  but if WHOLE-MESSAGE is non-nil (prefix arg given),
   look in the whole message.
  SUBJECT is a string of regexps separated by commas."
!   (interactive
!    (let* ((subject (with-current-buffer rmail-buffer
! 		     (mail-fetch-field "Subject")))
! 	  (prompt (concat "Topics to summarize by (regexp"
! 			  (if subject ", default current subject" "")
! 			  "): ")))
!      (when (string-match rmail-reply-regexp subject)
!        (setq subject (substring subject (match-end 0))))
!      (list (read-string prompt nil nil subject) current-prefix-arg)))
    (rmail-new-summary
     (concat "about " subject)
     (list 'rmail-summary-by-topic subject whole-message)


-- 
http://www.emacswiki.org/alex/