From: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Date: Fri, 10 Nov 2017 13:59:37 +0000 (-0500)
Subject: EUDC: Print multiple BBDB addresses properly
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6e680a78442e7586b4ea2d5f14a49786a8780552;p=emacs.git

EUDC: Print multiple BBDB addresses properly

* lisp/net/eudcb-bbdb.el (eudc-bbdb-extract-addresses): Reset
val to nil on each mapcar lambda invocation.
---

diff --git a/lisp/net/eudcb-bbdb.el b/lisp/net/eudcb-bbdb.el
index 7370225c041..d606766158b 100644
--- a/lisp/net/eudcb-bbdb.el
+++ b/lisp/net/eudcb-bbdb.el
@@ -144,6 +144,7 @@ BBDB < 3 used `net'; BBDB >= 3 uses `mail'."
   (let (s c val)
     (nreverse
      (mapcar (lambda (address)
+	       (setq val nil)
 	       (setq c (bbdb-address-streets address))
 	       (dotimes (n 3)
 		 (unless (zerop (length (setq s (nth n c))))