]> code.delx.au - gnu-emacs-elpa/commitdiff
Remove company-bbdb-records, it was unused
authorDmitry Gutov <dgutov@yandex.ru>
Thu, 20 Feb 2014 04:14:33 +0000 (06:14 +0200)
committerDmitry Gutov <dgutov@yandex.ru>
Thu, 20 Feb 2014 04:14:33 +0000 (06:14 +0200)
company-bbdb.el

index fb665cb96c950bc2976d525c698707a5651742ac..8e4705f73910437c958d04e50d5a659c42def25b 100644 (file)
@@ -27,8 +27,6 @@
 (declare-function bbdb-dwim-mail "bbdb-com")
 (declare-function bbdb-search "bbdb-com")
 
-(defvar company-bbdb-records (make-hash-table :test 'equal))
-
 ;;;###autoload
 (defun company-bbdb (command &optional arg &rest ignore)
   "`company-mode' completion back-end for `bbdb'."
                                (line-beginning-position))
                  (company-grab-symbol)))
     (candidates (mapcan (lambda (record)
-                          (mapcar (lambda (mail)
-                                    (let ((full-mail (bbdb-dwim-mail record mail)))
-                                      (puthash full-mail record company-bbdb-records)
-                                      full-mail))
+                          (mapcar (lambda (mail) (bbdb-dwim-mail record mail))
                                   (bbdb-record-get-field record 'mail)))
                         (bbdb-search (bbdb-records) arg nil arg)))
     (sorted t)