Minor reformatting

It's no big deal. Really.
This commit is contained in:
Henrik Lissner 2018-06-23 22:22:42 +02:00
parent 618358413b
commit 4c4a35ae86
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 6 additions and 9 deletions

View file

@ -7,7 +7,8 @@
"A hash table of enabled modules. Set by `doom-initialize-modules'.") "A hash table of enabled modules. Set by `doom-initialize-modules'.")
(defvar doom-modules-dirs (defvar doom-modules-dirs
(list (expand-file-name "modules/" doom-private-dir) doom-modules-dir) (list (expand-file-name "modules/" doom-private-dir)
doom-modules-dir)
"A list of module root directories. Order determines priority.") "A list of module root directories. Order determines priority.")
(defconst doom-obsolete-modules (defconst doom-obsolete-modules

View file

@ -7,9 +7,9 @@
:definition #'crystal-def-jump :definition #'crystal-def-jump
:references #'crystal-tool-imp) :references #'crystal-tool-imp)
(set-eval-handler! 'crystal-mode (set-eval-handler! 'crystal-mode
'((:command . "crystal") '((:command . "crystal")
(:exec . "%c %s") (:exec . "%c %s")
(:description . "Run Crystal script")))) (:description . "Run Crystal script"))))
(def-package! flycheck-crystal (def-package! flycheck-crystal

View file

@ -76,7 +76,7 @@
;; `rjsx-electric-gt' relies on js2's parser to tell it when the cursor is in ;; `rjsx-electric-gt' relies on js2's parser to tell it when the cursor is in
;; a self-closing tag, so that it can insert a matching ending tag at point. ;; a self-closing tag, so that it can insert a matching ending tag at point.
;; However, the parser doesn't run immediately, so a fast typist can outrun ;; However, the parser doesn't run immediately, so a fast typist can outrun
;; it, causing issues, so force it to parse. ;; it, causing tags to stay unclosed, so force it to parse.
(defun +javascript|reparse (n) (defun +javascript|reparse (n)
;; if n != 1, rjsx-electric-gt calls rjsx-maybe-reparse itself ;; if n != 1, rjsx-electric-gt calls rjsx-maybe-reparse itself
(if (= n 1) (rjsx-maybe-reparse))) (if (= n 1) (rjsx-maybe-reparse)))
@ -134,23 +134,19 @@
:config :config
(setq tide-completion-detailed t (setq tide-completion-detailed t
tide-always-show-documentation t) tide-always-show-documentation t)
;; code completion ;; code completion
(after! company (after! company
;; tide affects the global `company-backends', undo this so doom can handle ;; tide affects the global `company-backends', undo this so doom can handle
;; it buffer-locally ;; it buffer-locally
(setq-default company-backends (delq 'company-tide (default-value 'company-backends)))) (setq-default company-backends (delq 'company-tide (default-value 'company-backends))))
(set-company-backend! 'tide-mode 'company-tide) (set-company-backend! 'tide-mode 'company-tide)
;; navigation ;; navigation
(set-lookup-handlers! 'tide-mode (set-lookup-handlers! 'tide-mode
:definition #'tide-jump-to-definition :definition #'tide-jump-to-definition
:references #'tide-references :references #'tide-references
:documentation #'tide-documentation-at-point) :documentation #'tide-documentation-at-point)
;; resolve to `doom-project-root' if `tide-project-root' fails ;; resolve to `doom-project-root' if `tide-project-root' fails
(advice-add #'tide-project-root :override #'+javascript*tide-project-root) (advice-add #'tide-project-root :override #'+javascript*tide-project-root)
;; cleanup tsserver when no tide buffers are left ;; cleanup tsserver when no tide buffers are left
(add-hook! 'tide-mode-hook (add-hook! 'tide-mode-hook
(add-hook 'kill-buffer-hook #'+javascript|cleanup-tide-processes nil t)) (add-hook 'kill-buffer-hook #'+javascript|cleanup-tide-processes nil t))