dot/emacs: Squish Debbugs-style email addresses to the submission address.

diff --git a/dot/emacs b/dot/emacs
index d6b437063228abcaed1adf69c4907b6f08542502..0ec4931fe8f2e17d1ab276006f5b7475209928b5 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -207,6 +207,12 @@
                                     "@\\(nationwide-communications\\.co\\.uk\\)")
                             addr)
               (concat "nationwide@" (match-string 1 addr)))
                                     "@\\(nationwide-communications\\.co\\.uk\\)")
                             addr)
               (concat "nationwide@" (match-string 1 addr)))

+             ((string-match (concat "^[0-9]+@bugs\\."
+                                    "\\(" "debian\\.org"
+                                    "\\|" "distorted\\.org\\.uk"
+                                    "\\)")
+                            addr)
+              (concat "submit@bugs." (match-string 1 addr)))

              (t addr))))
 
 ;; Customization.
              (t addr))))
 
 ;; Customization.