Added sly

This commit is contained in:
Alexander Rosenberg 2023-09-21 16:02:36 -07:00
parent 1b72441d14
commit 69b6aac6c7
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730

16
init.el
View File

@ -99,7 +99,8 @@
(cpp "https://github.com/tree-sitter/tree-sitter-cpp") (cpp "https://github.com/tree-sitter/tree-sitter-cpp")
(java "https://github.com/tree-sitter/tree-sitter-java") (java "https://github.com/tree-sitter/tree-sitter-java")
(python "https://github.com/tree-sitter/tree-sitter-python") (python "https://github.com/tree-sitter/tree-sitter-python")
(rust "https://github.com/tree-sitter/tree-sitter-rust"))) (rust "https://github.com/tree-sitter/tree-sitter-rust")
(json "https://github.com/tree-sitter/tree-sitter-json")))
;; Tree sitter major mode conversions ;; Tree sitter major mode conversions
(setq major-mode-remap-alist (setq major-mode-remap-alist
'((c-mode . c-ts-mode) '((c-mode . c-ts-mode)
@ -107,7 +108,8 @@
(c-or-c++-mode . c-or-c++-ts-mode) (c-or-c++-mode . c-or-c++-ts-mode)
(objc-mode . objc-ts-mode) (objc-mode . objc-ts-mode)
(java-mode . java-ts-mode) (java-mode . java-ts-mode)
(rust-mode . rust-ts-mode)))) (rust-mode . rust-ts-mode)
(json-mode . json-ts-mode))))
;; c-ts-mode ;; c-ts-mode
(use-package c-ts-mode (use-package c-ts-mode
@ -365,6 +367,16 @@ visual states."
;; json ;; json
(use-package json-mode) (use-package json-mode)
;; sly
(use-package sly
:hook (lisp-mode . my/common-lisp-autoconnect-sly)
:autoload sly-connected-p
:init
(defun my/common-lisp-autoconnect-sly ()
(unless (sly-connected-p)
(save-excursion (sly))))
(setq inferior-lisp-program "/usr/bin/sbcl"))
;; vterm ;; vterm
(use-package vterm (use-package vterm
:bind ("C-x C-a" . vterm)) :bind ("C-x C-a" . vterm))