mirror of
https://github.com/lliding/ld-emacs.git
synced 2025-10-13 05:23:05 +00:00
24 lines
555 B
EmacsLisp
24 lines
555 B
EmacsLisp
;;; Require
|
|
(require 'company)
|
|
(require 'company-ctags)
|
|
|
|
;;; Code:
|
|
(global-company-mode)
|
|
|
|
(with-eval-after-load 'company
|
|
(company-ctags-auto-setup))
|
|
|
|
; remove company backend company-dabbrev-code
|
|
(setq company-backends
|
|
(mapcar (lambda (backend)
|
|
(cond
|
|
((eq backend 'company-dabbrev-code) nil)
|
|
((listp backend)
|
|
(remove 'company-dabbrev-code backend))
|
|
(t backend)))
|
|
company-backends))
|
|
|
|
(provide 'init-company-mode)
|
|
|
|
;;; init-company-mode.el ends here
|