>>>>> Jochen K�pper writes:

> Baed on a recent thread I have the following
> ,----
> | (defun jk/bbdb-normalize-tmda-addresses (addr)
> |   "Removes TMDA-related strings from addresses.
> | 
> | For an email-address ala 
> |    [EMAIL PROTECTED]
> | return
> |    [EMAIL PROTECTED]"
> |   ;; Originally from the bbdb-info mailing list,
> |   ;; Subject: bbdb and tmda addresses
> |   ;;   From: Andras BALI <[EMAIL PROTECTED]>
> |   ;;     Date: Mon, 13 May 2002 20:24:07 +0200
> |   ;;     Message-ID: <[EMAIL PROTECTED]>
> |   ;;   From: Matt Armstrong <[EMAIL PROTECTED]>
> |   ;;     Date: Mon, 13 May 2002 12:58:15 -0600
> |   ;;     Message-ID: <[EMAIL PROTECTED]>
> |   (when addr
> |     (cond ((string-match
> |             "^\\(.+?\\)\\(.\\)dated\\2[0-9]+\\.[0-9a-fA-F]+\\(@.*\\)" addr)
> |            (concat (match-string 1 addr) (match-string 3 addr)))
> |           (t addr))))
> `----

Is it possible to add these strings to a separate field in the BBDB
record?  That way, a proper address can be constructed at a later
time.  It's only necessary to keep the last "dated" string.

> And then
> ,----
> | (setq bbdb-canonicalize-net-hook '(lambda (addr)
> |                                     (bbdb-obsolete-net-canonicalize-net-hook
> |                                      (jk/bbdb-normalize-tmda-addresses addr))))
> `----

-- 
David Masterson
[EMAIL PROTECTED]




-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to