emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Lazy-load company (experiment)

Browse source
This commit is contained in:
Henrik Lissner 2015-08-13 12:11:53 -04:00
parent 27abc76320
commit 20403b23c9
1 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

13
core/core-company.el
View file

@ -4,8 +4,10 @@
(eval-when-compile (require 'core)) (eval-when-compile (require 'core))
(use-package company (use-package company
:diminish company-mode :diminish (company-mode . "=")
:commands global-company-mode :commands (global-company-mode company-complete-common company-dict
company-files company-tags company-ispell company-yasnippet
company-semantic company-dabbrev-code)
:init :init
(after! abbrev (diminish 'abbrev-mode "A")) (after! abbrev (diminish 'abbrev-mode "A"))
(setq company-idle-delay nil (setq company-idle-delay nil
@ -22,7 +24,7 @@
company-echo-metadata-frontend company-echo-metadata-frontend
company-preview-if-just-one-frontend) company-preview-if-just-one-frontend)
company-dict-dir (concat narf-private-dir "dict/")) company-dict-dir (concat narf-private-dir "dict/"))
(add-hook! after-init 'global-company-mode) ;; (add-hook! after-init 'global-company-mode)
:config :config
;; (use-package company-dict :defer t) ;; (use-package company-dict :defer t)
;; (setq-default company-backends (append '(company-dict company-keywords) company-backends)) ;; (setq-default company-backends (append '(company-dict company-keywords) company-backends))
@ -46,7 +48,10 @@
(shut-up! (shut-up!
(setq company-statistics-file (! (concat narf-temp-dir "company-statistics-cache.el"))) (setq company-statistics-file (! (concat narf-temp-dir "company-statistics-cache.el")))
(require 'company-statistics) (require 'company-statistics)
(company-statistics-mode))) (company-statistics-mode))
(global-company-mode +1))
(provide 'core-company) (provide 'core-company)
;;; core-company.el ends here ;;; core-company.el ends here