diff options
| -rw-r--r-- | emacs/init.el | 27 |
1 files changed, 25 insertions, 2 deletions
diff --git a/emacs/init.el b/emacs/init.el index 840b580..6769252 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -159,6 +159,7 @@ (use-package orderless :after minibuffer + :ensure t :custom (completion-styles '(orderless basic)) (completion-category-overrides '((file (styles basic partial-completion))))) @@ -168,7 +169,7 @@ ;; :commands (consult-complete-in-region) :bind ( - ;; ([remap switch-to-buffer] . consult-buffer) + ([remap switch-to-buffer] . consult-buffer) ([remap yank-pop] . consult-yank-pop) ([remap goto-line] . consult-goto-line) ;; ([remap imenu] . consult-imenu) @@ -273,6 +274,7 @@ :custom (compilation-scroll-output 'first-error)) + ;;; Writing prose ;; Use abbrev as a simple autocorrect mode. M-x list-abbrevs for stats. @@ -282,6 +284,7 @@ (use-package flyspell :hook (text-mode . flyspell-mode) + :hook (prog-mode . flyspell-prog-mode) :custom (flyspell-abbrev-p t)) @@ -298,6 +301,9 @@ ([remap downcase-word] . downcase-dwim) ([remap upcase-word] . upcase-dwim))) +(use-package wc-goal-mode) + + ;;; Reading mail ;; I keep coming back to rmail, despite its many, many warts. @@ -477,6 +483,7 @@ ;; Markdown (use-package markdown-mode + :ensure t :mode ("\\.\\(?:md\\|markdown\\|mkd\\|mdown\\|mkdn\\|mdwn\\)\\'" . markdown-mode) :custom (markdown-disable-tooltip-prompt t) ; When inserting a link, only prompt for url and link text @@ -533,6 +540,7 @@ (use-package saveplace :hook (after-init . save-place-mode)) + ;;; Window and buffer navigation (use-package isearch @@ -553,6 +561,7 @@ (isearch-wrap-pause 'no)) (use-package avy + :ensure t :bind (("M-j" . avy-goto-char-timer) :map isearch-mode-map ("M-j" . avy-isearch)) @@ -562,6 +571,7 @@ ;; Make window management commands easier to press (use-package ace-window + :ensure t :bind ([remap other-window] . ace-window)) ;; Better buffer naming @@ -572,9 +582,11 @@ (uniquify-ignore-buffers-re "^\\*") (uniquify-separator "/")) + ;;; Embark (use-package embark + :ensure t :bind (("C-." . embark-act) ([remap describe-bindings] . embark-bindings)) @@ -583,18 +595,22 @@ (setq prefix-help-command #'embark-prefix-help-command)) (use-package embark-consult + :ensure t :after (embark consult) :hook (embark-collect-mode . consult-preview-at-point-mode)) + ;;; Reading pdfs and epub files (use-package pdf-tools + :ensure t :when (display-graphic-p) :magic ("%PDF" . pdf-view-mode) :config (pdf-tools-install :no-query)) + ;;; Music (use-package emms @@ -617,6 +633,7 @@ (global-set-key (kbd "C-c e r") 'emms-toggle-repeat-playlist) (global-set-key (kbd "C-c e s") 'emms-toggle-random-playlist)) + ;;; Useful functions (defun noa/yank-buffer-file-name () (interactive) @@ -653,6 +670,7 @@ With prefix argument TIME, also add the current time." " " (shell-quote-argument url)))) + ;;; Tramp (use-package tramp :defer t @@ -661,7 +679,9 @@ With prefix argument TIME, also add the current time." (tramp-verbose 3)) ;; (add-to-list 'tramp-remote-path 'tramp-own-remote-path) + ;;; Window management + ;; Don't override display actions when i manually initiate a buffer switch. (use-package window :custom @@ -695,12 +715,14 @@ With prefix argument TIME, also add the current time." ;; Squeeze text into a more legible sliver. (use-package visual-fill-column + :ensure t :custom (visual-fill-column-enable-sensible-window-split t) (visual-fill-column-fringes-outside-margins nil) ; Keep fringes on the inside so relevant icons are in the right place (visual-fill-column-center-text t) :hook - ((text-mode . visual-fill-column-mode) + ( + ;; (text-mode . visual-fill-column-mode) (eww-after-render . visual-line-fill-column-mode)) ) @@ -800,6 +822,7 @@ With prefix argument TIME, also add the current time." (setenv "NO_COLOR") (setenv "GPG_AGENT_INFO" nil) + ;;; Cleanup ;; (profiler-stop) |