From: Mark Wooding <mdw@distorted.org.uk>
Date: Thu, 24 Mar 2016 11:06:41 +0000 (+0000)
Subject: dot/emacs: Squash away `blah+...@some.domain' suffixes for BBDB.
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/2d14c35371483621691ade4d71d16e3ea5e82a9b

dot/emacs: Squash away `blah+...@some.domain' suffixes for BBDB.

Some people have far too many suffixes.
---

diff --git a/dot/emacs b/dot/emacs
index fe857bc..31cfd15 100644
--- a/dot/emacs
+++ b/dot/emacs
@@ -213,6 +213,8 @@
 				     "\\)")
 			     addr)
 	       (concat "submit@bugs." (match-string 1 addr)))
+	      ((string-match "^\\([^@+]+\\)\\+[^@]*\\(@.*\\)$" addr)
+	       (concat (match-string 1 addr) (match-string 2 addr)))
 	      (t addr))))
 
 ;; Customization.