chiark
/
gitweb
/
~mdw
/
profile
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
dot/emacs: Squash away `blah+...@some.domain' suffixes for BBDB.
[profile]
/
dot
/
emacs
diff --git
a/dot/emacs
b/dot/emacs
index fe857bc9675cd0f9f5b2e82b1905cf3b2761d316..31cfd159d203a9dc2c8ba86bbef2b78d2fe8c877 100644
(file)
--- 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.