From: ueno <ueno>
Date: Tue, 30 Apr 2002 04:27:04 +0000 (+0000)
Subject: * bbdb-to-lsdb.el: Verify bbdb-record-name is non-nil.
X-Git-Tag: lsdb-0_4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=794ec217920643d02631e9057b4f4e4e64021fc9;p=elisp%2Flsdb.git

* bbdb-to-lsdb.el: Verify bbdb-record-name is non-nil.
---

diff --git a/bbdb-to-lsdb.el b/bbdb-to-lsdb.el
index fd72dc3..d2e9a0c 100644
--- a/bbdb-to-lsdb.el
+++ b/bbdb-to-lsdb.el
@@ -38,7 +38,8 @@
   (while bbdb-records
     (when (setq value (bbdb-record-net (car bbdb-records)))
       (lsdb-update-record
-       (list (bbdb-record-name (car bbdb-records))
+       (list (or (bbdb-record-name (car bbdb-records))
+		 (car value))
 	     (car value))
        (nconc
 	(if (cdr value)