diff options
| author | benj <benj@rse8.com> | 2026-03-25 21:30:48 -0700 |
|---|---|---|
| committer | benj <benj@rse8.com> | 2026-03-25 21:30:48 -0700 |
| commit | b33d3e30ca469c473155deb7494882df1c9cb8ee (patch) | |
| tree | d32143f01d155b8f1a4066aedd2eceb588514ffc /init.el | |
| parent | f4b4849d82861225134982c031cd591280ebb344 (diff) | |
| download | emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar.gz emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar.bz2 emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar.lz emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar.xz emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.tar.zst emacs-b33d3e30ca469c473155deb7494882df1c9cb8ee.zip | |
some mu4e hotkey updates
Diffstat (limited to 'init.el')
| -rw-r--r-- | init.el | 17 |
1 files changed, 14 insertions, 3 deletions
@@ -41,7 +41,6 @@ (use-package emacs :after solarized-theme :init - (global-visual-line-mode) 1 (setq is-mac (equal system-type 'darwin)) (setq enable-recursive-minibuffers t) @@ -50,7 +49,7 @@ (set-fontset-font t 'symbol (font-spec :family "JetBrainsMono Nerd Font") nil 'append) ;; 3. Explicitly map the Unicode Private Use Area (where Nerd Font icons live) ;; Range #xE000 to #xF8FF covers Font Awesome, Material, etc. - (set-fontset-font t '(#xE000 . #xF8FF) (font-spec :family "JetBrainsMono Nerd Font") nil 'append)) + (set-fontset-font t '(#xE000 . #xF8FF) (font-spec :family "JetBrainsMono Nerd Font") nil 'append) (setq create-lockfiles nil) (setq backup-directory-alist @@ -304,7 +303,12 @@ (use-package magit :ensure t - :bind ("C-x g" . 'magit-status)) + :bind ("C-x g" . 'magit-status) + :init + (setq ediff-split-window-function #'split-window-horizontally + ediff-window-setup-function #'ediff-setup-windows-plain + ediff-scroll-vertically t + ediff-scroll-horizontally t)) (use-package marginalia :ensure t @@ -360,6 +364,8 @@ (use-package mu4e :ensure nil + :bind (("C-c M" . mu4e) + ("C-x m" . )) :init (let ((first-account (car (directory-files "~/.mail" nil "^[^.]")))) (when first-account @@ -367,7 +373,12 @@ mu4e-drafts-folder (concat "/" first-account "/Drafts") mu4e-trash-folder (concat "/" first-account "/Trash") mu4e-refile-folder (concat "/" first-account "/Archive")))) + :hook (mu4e-compose-mode . (lambda () (use-hard-newlines -1))) :config + (setq mu4e-compose-format-flowed t) + (setq message-citation-line-function 'message-insert-formatted-citation-line) + (setq message-citation-line-format "On %a, %d %b %Y at %R, %f wrote:\n") + (setq mu4e-maildir "~/.mail" mu4e-get-mail-command "mbsync -a" mu4e-update-interval 300 |