With the help of a few lines of Lisp glue:
(elt address-entry 1) ", ") ", "
(elt address-entry 2) ", "
(elt address-entry 3) ", "
(elt address-entry 4) ", "
(elt address-entry 5)))))
;; We need to copy the returned list, because mapcan will modify it later
(copy-list (bbdb-record-addresses record)))
we can make that:
It's really simplistic, but I did not need more to have fun. :-) This could be extended to set a specific marker and/or color for each contact, with a legend. I'll let that as an exercise for my readers.