This commit is contained in:
Mars 2024-10-02 00:16:50 -04:00
parent 44737fec37
commit ca2a287911
Signed by: pupbrained
GPG key ID: 874E22DF2F9DFCB5

View file

@ -38,10 +38,10 @@
(setq initial-scratch-message nil) (setq initial-scratch-message nil)
(setq initial-buffer-choice nil) (setq initial-buffer-choice nil)
(add-hook 'emacs-startup-hook (add-hook 'emacs-startup-hook
(lambda () (lambda ()
(when (and (get-buffer "*scratch*") (when (and (get-buffer "*scratch*")
(not (eq (current-buffer) (get-buffer "*scratch*")))) (not (eq (current-buffer) (get-buffer "*scratch*"))))
(kill-buffer "*scratch*")))) (kill-buffer "*scratch*"))))
#+end_src #+end_src
** Fix Indents + Enable Autopairs ** Fix Indents + Enable Autopairs
@ -85,8 +85,8 @@
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq scroll-step 3 (setq scroll-step 3
scroll-margin 3 scroll-margin 3
scroll-conservatively 9999) scroll-conservatively 9999)
#+end_src #+end_src
** System-Specific Settings ** System-Specific Settings
@ -97,10 +97,10 @@
(cond (cond
((eq system-type 'darwin) ((eq system-type 'darwin)
(setq default-frame-alist '((font . "Maple Mono NF-14")))) (setq default-frame-alist '((font . "Iosevka Comfy-14"))))
((eq system-type 'gnu/linux) ((eq system-type 'gnu/linux)
(setq default-frame-alist '((font . "Maple Mono NF-12") (setq default-frame-alist '((font . "Maple Mono NF-12")
(undecorated . t))))) (undecorated . t)))))
#+end_src #+end_src
** Use Short Answers ** Use Short Answers
@ -186,32 +186,32 @@
:ensure nil :ensure nil
:config :config
(mapc #'exordium--add-forward-ts-hook (mapc #'exordium--add-forward-ts-hook
'( '(
LaTeX LaTeX
bash bash
c c
c++ c++
cmake cmake
csharp csharp
css css
elisp elisp
go go
go-mod go-mod
haskell haskell
java java
js js
json json
lua lua
markdown markdown
python python
ruby ruby
rust rust
scala scala
toml toml
typescript typescript
vue vue
yaml yaml
)) ))
(setq treesit-font-lock-level 4)) (setq treesit-font-lock-level 4))
(use-package tree-sitter-langs) (use-package tree-sitter-langs)
@ -225,11 +225,11 @@
(font-lock-maximum-decoration t) (font-lock-maximum-decoration t)
:config :config
(when-let ((language-name (alist-get 'ruby-mode (when-let ((language-name (alist-get 'ruby-mode
tree-sitter-major-mode-language-alist))) tree-sitter-major-mode-language-alist)))
(add-to-list 'tree-sitter-major-mode-language-alist (add-to-list 'tree-sitter-major-mode-language-alist
(cons 'enh-ruby-mode language-name))) (cons 'enh-ruby-mode language-name)))
(add-to-list 'tree-sitter-major-mode-language-alist (add-to-list 'tree-sitter-major-mode-language-alist
(cons 'forge-post-mode 'markdown)) (cons 'forge-post-mode 'markdown))
(global-tree-sitter-mode)) (global-tree-sitter-mode))
#+end_src #+end_src
@ -380,9 +380,9 @@
#+begin_src emacs-lisp #+begin_src emacs-lisp
;; Inhibits autopairs from running for <> in org mode ;; Inhibits autopairs from running for <> in org mode
(add-hook 'org-mode-hook (add-hook 'org-mode-hook
(lambda () (lambda ()
(setq-local electric-pair-inhibit-predicate (setq-local electric-pair-inhibit-predicate
`(lambda (c) (if (char-equal c ?<) t (,electric-pair-inhibit-predicate c)))))) `(lambda (c) (if (char-equal c ?<) t (,electric-pair-inhibit-predicate c))))))
(require 'org-tempo) (require 'org-tempo)
(add-to-list 'org-modules 'org-tempo t) (add-to-list 'org-modules 'org-tempo t)