emacs: use the experimental d-ts-mode

<https://git.sr.ht/~jeremy/d-ts-mode/>
This commit is contained in:
Jeremy Baxter 2024-05-06 09:03:28 +12:00
parent 3df8de1ec7
commit f6f9d1d7b3

View file

@ -1,5 +1,6 @@
(setq gc-cons-threshold 100000000) (setq gc-cons-threshold 100000000)
(add-to-list 'load-path "~/.emacs.d/lisp/") (add-to-list 'load-path "~/.emacs.d/lisp/")
(add-to-list 'load-path "~/git/d-ts-mode/")
(require 'package) (require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t) (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
@ -45,7 +46,7 @@ One will be created if none exist."
;; modes ;; modes
(require 'cc-mode) (require 'cc-mode)
(package-install 'd-mode) (require 'd-ts-mode)
(package-install 'git-modes) (package-install 'git-modes)
(package-install 'json-mode) (package-install 'json-mode)
(package-install 'lua-mode) (package-install 'lua-mode)
@ -137,7 +138,7 @@ One will be created if none exist."
(require 'eglot) (require 'eglot)
(add-hook 'after-init-hook 'global-company-mode) (add-hook 'after-init-hook 'global-company-mode)
(add-hook 'prog-mode-hook 'eglot-ensure) (add-hook 'prog-mode-hook 'eglot-ensure)
(add-to-list 'eglot-server-programs `(d-mode . ("~/.local/bin/serve-d"))) (add-to-list 'eglot-server-programs `(d-ts-mode . ("serve-d")))
(setq company-begin-commands '(self-insert-command) (setq company-begin-commands '(self-insert-command)
company-idle-delay .1 company-idle-delay .1
company-minimum-prefix-length 2 company-minimum-prefix-length 2