2016-01-29 02:07:20 -05:00
|
|
|
;;; core-completion.el --- auto completion backend (Company-mode)
|
2015-06-15 09:05:52 +02:00
|
|
|
|
|
|
|
|
(use-package company
|
2016-03-03 01:33:24 -05:00
|
|
|
:commands (global-company-mode company-complete company-complete-common company-dict
|
2015-08-13 12:11:53 -04:00
|
|
|
company-files company-tags company-ispell company-yasnippet
|
2016-02-22 15:24:22 -05:00
|
|
|
company-semantic company-dabbrev-code company-manual-begin)
|
2015-06-15 09:05:52 +02:00
|
|
|
:init
|
|
|
|
|
(setq company-idle-delay nil
|
2015-11-14 02:38:06 -05:00
|
|
|
company-minimum-prefix-length 2
|
|
|
|
|
company-tooltip-limit 10
|
2015-06-15 09:05:52 +02:00
|
|
|
company-dabbrev-downcase nil
|
|
|
|
|
company-dabbrev-ignore-case nil
|
2015-11-14 02:38:06 -05:00
|
|
|
company-dabbrev-code-other-buffers t
|
2015-06-15 09:05:52 +02:00
|
|
|
company-tooltip-align-annotations t
|
|
|
|
|
company-require-match 'never
|
2015-11-09 15:55:03 -05:00
|
|
|
company-global-modes '(not eshell-mode comint-mode erc-mode message-mode help-mode)
|
|
|
|
|
company-frontends '(company-pseudo-tooltip-frontend
|
|
|
|
|
company-echo-metadata-frontend)
|
2015-10-14 03:39:32 -04:00
|
|
|
company-backends '((company-capf
|
|
|
|
|
company-yasnippet
|
2015-12-27 02:55:58 -05:00
|
|
|
company-dabbrev-code)
|
2015-10-14 03:39:32 -04:00
|
|
|
company-dabbrev)
|
2016-03-26 01:19:31 -04:00
|
|
|
company-statistics-file (concat narf-temp-dir "/company-stats-cache.el")
|
2016-02-22 15:24:38 -05:00
|
|
|
company-quickhelp-delay nil)
|
2015-11-09 15:55:03 -05:00
|
|
|
|
2015-06-15 09:05:52 +02:00
|
|
|
:config
|
2016-03-03 15:04:14 -05:00
|
|
|
(use-package company-statistics)
|
2015-11-14 02:38:06 -05:00
|
|
|
|
2016-02-22 15:24:38 -05:00
|
|
|
;; NOTE: pos-tip.el in Emacs 25+ does not work
|
2016-03-03 15:04:14 -05:00
|
|
|
(use-package company-quickhelp :config (company-quickhelp-mode +1))
|
2015-11-09 15:55:03 -05:00
|
|
|
|
2016-02-20 17:09:46 -05:00
|
|
|
(use-package company-dict :defer t
|
|
|
|
|
:config
|
|
|
|
|
(setq company-dict-dir (concat narf-private-dir "dict")))
|
2015-11-09 15:55:03 -05:00
|
|
|
|
2016-03-03 15:04:14 -05:00
|
|
|
;; Rewrites evil-complete to use company-dabbrev
|
|
|
|
|
(setq evil-complete-next-func 'narf/company-evil-complete-next
|
|
|
|
|
evil-complete-previous-func 'narf/company-evil-complete-previous)
|
|
|
|
|
|
2015-10-14 03:39:32 -04:00
|
|
|
(add-to-list 'company-transformers 'company-sort-by-occurrence)
|
2015-06-15 09:05:52 +02:00
|
|
|
(setq-default company-backends (append '(company-keywords) company-backends))
|
|
|
|
|
|
2015-10-14 03:39:32 -04:00
|
|
|
(define-company-backend! nxml-mode (nxml yasnippet))
|
|
|
|
|
(define-company-backend! emacs-lisp-mode (elisp yasnippet))
|
|
|
|
|
|
2015-11-09 15:55:03 -05:00
|
|
|
(define-key company-active-map "\C-w" nil)
|
2015-08-13 12:11:53 -04:00
|
|
|
|
2015-11-09 15:55:03 -05:00
|
|
|
(global-company-mode +1)
|
2015-11-14 02:38:06 -05:00
|
|
|
(company-statistics-mode +1))
|
2015-08-13 12:11:53 -04:00
|
|
|
|
2016-01-29 02:07:20 -05:00
|
|
|
(provide 'core-completion)
|
|
|
|
|
;;; core-completion.el ends here
|
