]> code.delx.au - gnu-emacs-elpa/blobdiff - company-bbdb.el
company-bbdb: Use the whole line content after `: ' as prefix
[gnu-emacs-elpa] / company-bbdb.el
index 22741a2051664a3c01c48b2238de652aa2c802fe..b2760b2906634b20e80cde6f8f229f890e4d8cac 100644 (file)
@@ -41,9 +41,9 @@
     (interactive (company-begin-backend 'company-bbdb))
     (prefix (and (eq major-mode 'message-mode)
                  (featurep 'bbdb-com)
-                 (looking-back "^\\(To\\|Cc\\|Bcc\\):.*"
+                 (looking-back "^\\(To\\|Cc\\|Bcc\\): *\\(.*\\)"
                                (line-beginning-position))
-                 (company-grab-symbol)))
+                 (match-string-no-properties 2)))
     (candidates (company-bbdb--candidates arg))
     (sorted t)
     (no-cache t)))