blob: 7cd0704ddf7a65915cf656414e07a0ac4f976102 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
;;; init-company.el --- .Emacs Configuration -*- lexical-binding: t -*-
;;; Commentary:
;; Company es un famework de Emacs para el completado de texto.
;;; code:
(use-package company
:defer 5
:diminish
:bind
(:map company-mode-map
("<tab>" . company-complete)
("<backtab>" . company-select-previous))
:config
;; Global
(setq company-idle-delay 1
company-minimum-prefix-length 1
company-show-numbers nil
company-tooltip-limit 20)
;; Facing
(unless (face-attribute 'company-tooltip :background)
(set-face-attribute 'company-tooltip nil :background "black" :foreground "gray40")
(set-face-attribute 'company-tooltip-selection nil :inherit 'company-tooltip :background "gray15")
(set-face-attribute 'company-preview nil :background "black")
(set-face-attribute 'company-preview-common nil :inherit 'company-preview :foreground "gray40")
(set-face-attribute 'company-scrollbar-bg nil :inherit 'company-tooltip :background "gray20")
(set-face-attribute 'company-scrollbar-fg nil :background "gray40"))
;; Activating globally
(global-company-mode t))
(use-package company-quickhelp
:ensure t
:after company
:config
(company-quickhelp-mode 1))
(provide 'init-company)
;; Local Variables:
;; byte-compile-warnings: (not free-vars)
;; End:
;;; init-company.el ends here
|
