0xa/.emacs.d
1
0
Fork 0
Code Issues Pull requests Releases Activity

add sly and minor tweaks

Browse source
This commit is contained in:
Grigory Shipunov 2022-03-03 22:59:31 +01:00
parent bb64dc4e74
commit 8bd52f2622
Signed by: 0xa
GPG key ID: 91FA5E5BF9AA901C
1 changed files with 14 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

47
init.el
View file

@ -156,35 +156,17 @@
version-control t) version-control t)
;; completion framework ;; completion framework
(use-package ido (straight-use-package 'ivy)
:init (ivy-mode 1)
(setq ido-enable-flex-matching t) (diminish 'ivy-mode)
(setq ido-everywhere t) (straight-use-package 'counsel)
(setq ido-auto-merge-work-directories-length -1) (counsel-mode 1)
(setq ido-use-filename-at-point 'guess) (diminish 'counsel-mode)
(setq ido-create-new-buffer 'always) (global-set-key (kbd "M-s M-s") 'swiper)
(setq ido-file-extensions-order
'(".org" ".scm" ".rkt" ".py" ".jl" ".txt" ".tex" ".bib"))
:config
(ido-mode t)
(ido-everywhere t))
(use-package smex
:straight t
:commands (smex
emex-major-mode-commands)
:bind (("M-x" . smex)
("M-X" . smex-major-mode-commands))
:config (smex-initialize))
(use-package ido-completing-read+
:straight t
:after ido
:config (ido-ubiquitous-mode 1))
;; autocompletion by default ;; autocompletion by default
(straight-use-package 'company) (straight-use-package 'company)
(company-mode 1) (global-company-mode 1)
(diminish 'company-mode) (diminish 'company-mode)
;; better tree mode ;; better tree mode
@ -316,7 +298,6 @@
(use-package magit (use-package magit
:straight t :straight t
:init (setq magit-completing-read-function 'magit-ido-completing-read)
:bind (("C-x G" . magit-dispatch) :bind (("C-x G" . magit-dispatch)
("C-x g" . magit-status))) ("C-x g" . magit-status)))
@ -359,7 +340,7 @@
(use-package ess (use-package ess
:straight t :straight t
:init :init
(setq ess-use-ido t) (setq ess-use-company t)
(setq ess-use-flymake nil)) (setq ess-use-flymake nil))
(use-package poly-R (use-package poly-R
@ -383,7 +364,7 @@
(use-package scheme (use-package scheme
:init (setq scheme-program-name "petite")) :init (setq scheme-program-name "petite"))
(use-package slime (use-package sly
:straight t :straight t
:config :config
(setq inferior-lisp-program "sbcl")) (setq inferior-lisp-program "sbcl"))
@ -404,7 +385,10 @@
(setq lsp-keymap-prefix "C-z l") (setq lsp-keymap-prefix "C-z l")
:hook ((lsp-mode . lsp-enable-which-key-integration)) :hook ((lsp-mode . lsp-enable-which-key-integration))
:commands lsp) :commands lsp)
(use-package lsp-ui :straight t :commands lsp-ui-mode)
(use-package lsp-ui
:straight t
:commands lsp-ui-mode)
;; snippets ;; snippets
(straight-use-package 'yasnippet) (straight-use-package 'yasnippet)
@ -416,8 +400,5 @@
(setq custom-file "~/.emacs.d/custom.el") (setq custom-file "~/.emacs.d/custom.el")
(load custom-file 'noerror) (load custom-file 'noerror)
;; start server
(server-start)
(provide 'init) (provide 'init)
;;; init.el ends here ;;; init.el ends here