From 7d01b9791f0a02e321f68a72e7f238a7c4678c3b Mon Sep 17 00:00:00 2001
From: Alexander Rosenberg <zanderpkg@pm.me>
Date: Tue, 8 Oct 2024 16:35:45 -0700
Subject: [PATCH] Some random changes

---
 disabled.el | 12 ++++++++++++
 init.el     | 37 +++++++------------------------------
 2 files changed, 19 insertions(+), 30 deletions(-)

diff --git a/disabled.el b/disabled.el
index 708c038..7500ce1 100644
--- a/disabled.el
+++ b/disabled.el
@@ -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))
diff --git a/init.el b/init.el
index 5bc18ed..fdd36f9 100644
--- a/init.el
+++ b/init.el
@@ -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
@@ -1212,7 +1200,7 @@ line in the block and manually deal with indentation."
 (use-package sly
   :hook (lisp-mode . my/-lisp-mode-autoconnect-sly)
   :bind (:map sly-mode-map
-         ("C-c e" . my/sly-show-notes-at-point)) ; noindent
+              ("C-c e" . my/sly-show-notes-at-point)) ; noindent
   :autoload sly-connected-p
   :init
   (defun my/-lisp-mode-autoconnect-sly ()
@@ -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))