Some random changes

This commit is contained in:
Alexander Rosenberg 2024-10-08 16:35:45 -07:00
parent e79ade8554
commit 7d01b9791f
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730
2 changed files with 19 additions and 30 deletions

View File

@ -160,3 +160,15 @@
;; " " quoted-name))))
;; :config
;; (add-to-list 'auto-mode-alist '("/\\.latexmkrc\\'" . perl-mode)))
;; flyspell
;; (use-package flyspell
;; :hook
;; (((text-mode message-mode tex-mode) . flyspell-mode)
;; (prog-mode . flyspell-prog-mode))
;; :config
;; (setq ispell-program-name "hunspell"
;; flyspell-issue-message-flag nil
;; flyspell-issue-welcome-flag nil)
;; (define-key flyspell-mode-map (kbd "C-;") nil t)
;; (define-key flyspell-mode-map (kbd "C-,") nil t))

35
init.el
View File

@ -67,6 +67,7 @@
;; Increase responsiveness
(setq gc-cons-threshold 80000000
read-process-output-max (* 1024 1024)) ;; 1mb
(global-so-long-mode 1)
;; Terminal mouse support
(xterm-mouse-mode 1)
@ -207,18 +208,6 @@ Interactively, force the recompile if called with a prefix."
icon-preference '(symbol text image emoji))
(tab-bar-mode 1))
;; flyspell
;; (use-package flyspell
;; :hook
;; (((text-mode message-mode tex-mode) . flyspell-mode)
;; (prog-mode . flyspell-prog-mode))
;; :config
;; (setq ispell-program-name "hunspell"
;; flyspell-issue-message-flag nil
;; flyspell-issue-welcome-flag nil)
;; (define-key flyspell-mode-map (kbd "C-;") nil t)
;; (define-key flyspell-mode-map (kbd "C-,") nil t))
;; jinx (better flyspell)
(use-package jinx
:hook (emacs-startup . global-jinx-mode)
@ -734,7 +723,7 @@ to `posframe-show' if the display is graphical."
:after (project evil)
:bind (:map project-prefix-map
("U" . my/project-gdb))
:init
:config
(setq gdb-debuginfod-enable-setting t)
(defvar my/project-gdb-command nil
"Command to use in `my/project-gdb'.")
@ -940,8 +929,6 @@ entry, return nil."
(error
(and
(= ?\{ (char-after last-valid))
;; up-point moves to the char after the last brace, so if the point
;; started there, we aren't in the entry
(or (not exclude-braces)
(not (= start-pos last-valid)))))))))
(defvar my/bibtex-indent-width 4
@ -1010,6 +997,7 @@ otherwise, call `bibtex-find-text'."
TeX-parse-self t
reftex-plug-into-AUCTeX t)
(setq-default TeX-master nil)
(require 'tex)
(TeX-global-PDF-mode 1))
;; blueprint
@ -1281,8 +1269,7 @@ If BUFFER is nil, the current buffer is used."
(unless (zerop prec)
(concat ": " (number-to-string prec))))))
(doom-modeline-def-segment calc
"Display calculator icons and info.
Take directly from doom-modeline."
"Display calculator icons and info."
(concat
(doom-modeline-spc)
(when-let ((icon (doom-modeline-icon 'faicon "nf-fa-calculator" "🖩" "")))
@ -1731,7 +1718,8 @@ buffers `helpful--sym' to `my/helpful-symbol-history'."
(when-let ((entry (cons (buffer-local-value 'helpful--sym helpful-buf)
(buffer-local-value 'helpful--callable-p
helpful-buf)))
((not (seq-contains-p my/helpful-symbol-history entry 'equal))))
((not (seq-contains-p my/helpful-symbol-history entry
'equal))))
(when last-index
(setq my/helpful-symbol-history
(seq-drop my/helpful-symbol-history last-index)))
@ -1833,17 +1821,6 @@ one of the normal rainbow-delimiters-depth-N-face faces."
(use-package nerd-icons)
(use-package nerd-icons-completion
:config
;; Temp. fix rainstormstudio/nerd-icons-completion#11
(define-minor-mode nerd-icons-completion-mode
"Add icons to completion candidates."
:global t
(if nerd-icons-completion-mode
(progn
(advice-add #'completion-metadata-get :around #'nerd-icons-completion-completion-metadata-get)
(advice-add (compat-function completion-metadata-get) :around #'nerd-icons-completion-completion-metadata-get))
(progn
(advice-remove #'completion-metadata-get #'nerd-icons-completion-completion-metadata-get)
(advice-remove (compat-function completion-metadata-get) #'nerd-icons-completion-completion-metadata-get))))
(nerd-icons-completion-mode))
(use-package nerd-icons-dired
:hook (dired-mode . nerd-icons-dired-mode))