1 files changed, 12 insertions, 7 deletions

diff --git a/.gnus b/.gnus
index 8bca6a2..271e2c6 100644
--- a/.gnus
+++ b/.gnus
@@ -56,16 +56,21 @@
 ;; setting its global value causes message mode to elide stuff it
 ;; shouldn't.  Therefore, chase down the best Gnus hook for the job,
 ;; and set the regexp locally.
+(setq my/gnus-summary-normalize-subject
+      (rx bol (+ (* space)
+                 (or "re" "Re" "RE"
+                     "aw" "Aw" "AW"
+                     "sv" "Sv" "SV"
+                     "fw" "Fw" "FW"
+                     "fwd" "Fwd" "FWD"
+                     (seq "bug#" (+ digit))
+                     "[External]")
+                 (* space) ":" (* space))))
+
 (add-hook 'gnus-summary-generate-hook
           (lambda ()
             (setq-local message-subject-re-regexp
-                        (rx bol (+ (* space)
-                                   (or "re" "Re" "RE"
-                                       "aw" "Aw" "AW"
-                                       "sv" "Sv" "SV"
-                                       (seq "bug#" (+ digit))
-                                       "[External]")
-                                   (* space) ":" (* space))))))
+                        my/gnus-summary-normalize-subject)))
 
 (gnus-add-configuration
  '(summary