28 Oct 2022 01:43:56

.doom.d/abbrevs.el

@@ -0,0 +1,6 @@
+;;-*-coding: utf-8;-*-
+(define-abbrev-table 'emacs-lisp-mode-abbrev-table
+  '(
+    ("blah" "blaz" nil :count 1)
+   ))
+

.doom.d/config.org

@@ -202,6 +202,7 @@ returned by `request`."
 ** Magic Vars
 #+BEGIN_SRC elisp
 (defun $file () buffer-file-name)
+(defun $ext () (f-ext ($file)))
 (defun $cwd (&optional dir)
   (if dir
       dir
@@ -1226,15 +1227,15 @@ Setup: run =M-x dap-go-setup=
 #+END_SRC
 
 #+BEGIN_SRC elisp
-(defun my/lsp-root (lsp--calculate-root session file)
+(defun my/lsp-find-root (lsp--find-root-interactively &rest args)
   (or
-   (and (ts/repo/p file)
+   (and (ts/repo/p)
-        (pcase (f-ext file t)
+        (pcase (f-ext ($file) t)
-          (".rs" (my/rust/workspace-root file))
+          (".rs" (my/rust/workspace-root))
           (_ nil)))
-   (lsp--calculate-root session file)))
+   (apply lsp--find-root-interactively args)))
 
-((advice-add 'lsp--calculate-root :around #'my/lsp-root)
+(advice-add 'lsp--find-root-interactively :around #'my/lsp-find-root)
 #+END_SRC
 
 ** Counsel Search

.doom.d/custom.el

@@ -0,0 +1,12 @@
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(safe-local-variable-values '((org-src-preserve-indentation . t))))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ )