summaryrefslogtreecommitdiff
path: root/.emacs.d/init.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-04-30 09:53:00 +0300
committerThanos Apollo <[email protected]>2023-04-30 09:53:00 +0300
commitb87a798a9bc3349a2045d97bbf123773148580ab (patch)
tree0a133aaf77a3121ae2abdbadca01882254832d9e /.emacs.d/init.el
parentc9843bb6ba3aecf21ddd012bf15b7f08c96081e9 (diff)
emacs: add slime-fancy and binds for company
Diffstat (limited to '.emacs.d/init.el')
-rw-r--r--.emacs.d/init.el11
1 files changed, 9 insertions, 2 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index f1257c9..ecfba6e 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -539,6 +539,11 @@ Contains the list of packages that need to be installed.")
:config
(setq global-company-mode t))
+(define-key company-active-map (kbd "\C-n") 'company-select-next)
+(define-key company-active-map (kbd "\C-p") 'company-select-previous)
+(define-key company-active-map (kbd "\C-d") 'company-show-doc-buffer)
+(define-key company-active-map (kbd "M-.") 'company-show-location)
+
(use-package dap-mode
:custom
(lsp-enable-dap-auto-configure nil)
@@ -565,8 +570,10 @@ Contains the list of packages that need to be installed.")
(use-package slime-company
:after (slime company)
- :config (setq slime-company-completion 'fuzzy
- slime-company-after-completion 'slime-company-just-one-space))
+ :config
+ (setq slime-company-completion 'fuzzy
+ slime-company-after-completion 'slime-company-just-one-space)
+ (slime-setup '(slime-fancy slime-company)))
(add-hook 'lisp-mode-hook #'rainbow-delimiters-mode)