Refactor to allow combined name mappings, expecting only 1 to be valid

diff --git a/bbdb3-csv-import.el b/bbdb3-csv-import.el
index 3a9f4b04c1dfa19f7abb2f27019ce579a014aca2..8b66c73668ded8d729569ae0bb1d991921485307 100644 (file)
--- a/bbdb3-csv-import.el
+++ b/bbdb3-csv-import.el
@@ -304,7 +304,7 @@ Defaults to current buffer."
                         (replace-regexp-in-string "[0-9]+" (number-to-string num) string))
            (map-assoc (field)
                       ;; For mappings with just 1 simple csv-field, get it's data
-                      (assoc-plus (car (map-bbdb3 field)) csv-record)))
+                      (car (rd-assoc field))))
 
         (let ((name (let ((first (map-assoc "firstname"))
                           (middle (map-assoc "middlename"))