Add narf/company-dict-or-keywords

This commit is contained in:
Henrik Lissner 2016-02-22 12:41:45 -05:00
parent 7cbeb4325e
commit 3760c7bcdf
2 changed files with 7 additions and 1 deletions

View file

@ -44,5 +44,11 @@
(prefix (company-grab-line "^[\t\s]*\\(.+\\)" 1))
(candidates (all-completions arg lines)))))
;;;###autoload
(defun narf/company-dict-or-keywords ()
(interactive)
(let ((company-backends '((company-keywords company-dict))))
(call-interactively 'company-complete-common)))
(provide 'defuns-company)
;;; defuns-company.el ends here