*** gnus-sum.el	6 May 2003 00:43:56 -0000	6.343
--- gnus-sum.el	9 Jun 2003 21:01:08 -0000
***************
*** 1463,1471 ****
  
  (defsubst gnus-simplify-subject-re (subject)
    "Remove \"Re:\" from subject lines."
!   (if (string-match message-subject-re-regexp subject)
!       (substring subject (match-end 0))
!     subject))
  
  (defun gnus-simplify-subject (subject &optional re-only)
    "Remove `Re:' and words in parentheses.
--- 1463,1472 ----
  
  (defsubst gnus-simplify-subject-re (subject)
    "Remove \"Re:\" from subject lines."
!   (let ((case-fold-search t))
!     (if (string-match message-subject-re-regexp subject)
! 	(substring subject (match-end 0))
!       subject)))
  
  (defun gnus-simplify-subject (subject &optional re-only)
    "Remove `Re:' and words in parentheses.