about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2022-05-01 09:24:44 -0500
committerCase Duckworth2022-05-01 09:24:44 -0500
commit02b8882f546c67a3a337e99616933d5d76e02591 (patch)
tree2f47bba7cb5d076532a2ab6a9ff2e2318a5741c7
parentAdd +compile-dispatch (diff)
downloademacs-02b8882f546c67a3a337e99616933d5d76e02591.tar.gz
emacs-02b8882f546c67a3a337e99616933d5d76e02591.zip
Indentation
-rw-r--r--init.el22
1 files changed, 11 insertions, 11 deletions
diff --git a/init.el b/init.el index 524fdce..4ca4c3c 100644 --- a/init.el +++ b/init.el
@@ -860,7 +860,7 @@
860 (with-eval-after-load 'tramp 860 (with-eval-after-load 'tramp
861 (el-patch-defun tramp-debug-buffer-command-completion-p (_symbol buffer) 861 (el-patch-defun tramp-debug-buffer-command-completion-p (_symbol buffer)
862 "A predicate for Tramp interactive commands. 862 "A predicate for Tramp interactive commands.
863They are completed by \"M-x TAB\" only in Tramp debug buffers." 863 They are completed by \"M-x TAB\" only in Tramp debug buffers."
864 (with-current-buffer buffer 864 (with-current-buffer buffer
865 (el-patch-wrap 2 865 (el-patch-wrap 2
866 (save-restriction 866 (save-restriction
@@ -1361,8 +1361,8 @@ They are completed by \"M-x TAB\" only in Tramp debug buffers."
1361 (el-patch-defun crux-reopen-as-root () 1361 (el-patch-defun crux-reopen-as-root ()
1362 "Find file as root if necessary. 1362 "Find file as root if necessary.
1363 1363
1364Meant to be used as `find-file-hook'. 1364 Meant to be used as `find-file-hook'.
1365See also `crux-reopen-as-root-mode'." 1365 See also `crux-reopen-as-root-mode'."
1366 (unless (or 1366 (unless (or
1367 ;; This helps fix for `nov-mode', and possibly others. 1367 ;; This helps fix for `nov-mode', and possibly others.
1368 (el-patch-add (null buffer-file-name)) 1368 (el-patch-add (null buffer-file-name))
@@ -1518,7 +1518,7 @@ See also `crux-reopen-as-root-mode'."
1518 :repo "alphapapa/ement.el") 1518 :repo "alphapapa/ement.el")
1519 ;; `plz' is a requirement, but isn't on an elpa. 1519 ;; `plz' is a requirement, but isn't on an elpa.
1520 (setup (:straight (plz :host github 1520 (setup (:straight (plz :host github
1521 :repo "alphapapa/plz.el")) 1521 :repo "alphapapa/plz.el"))
1522 t))) 1522 t)))
1523 1523
1524(setup (:straight epithet) 1524(setup (:straight epithet)
@@ -1598,19 +1598,19 @@ See also `crux-reopen-as-root-mode'."
1598 (:require) 1598 (:require)
1599 (add-hook 'modus-themes-after-load-theme-hook 1599 (add-hook 'modus-themes-after-load-theme-hook
1600 (defun focus-update@after-modus-load () 1600 (defun focus-update@after-modus-load ()
1601 (modus-themes-with-colors 1601 (modus-themes-with-colors
1602 (:face 'focus-unfocused `((t ( :foreground ,fg-inactive 1602 (:face 'focus-unfocused `((t ( :foreground ,fg-inactive
1603 :background ,bg-inactive 1603 :background ,bg-inactive
1604 :weight normal 1604 :weight normal
1605 :slant normal 1605 :slant normal
1606 :extend t))))))) 1606 :extend t)))))))
1607 ;; XXX: This doesn't work, because notmuch overlays shit on the buffer 1607 ;; XXX: This doesn't work, because notmuch overlays shit on the buffer
1608 (setf (alist-get 'notmuch-show-mode focus-mode-to-thing) 1608 (setf (alist-get 'notmuch-show-mode focus-mode-to-thing)
1609 'notmuch-message) 1609 'notmuch-message)
1610 (:hook-into notmuch-show-mode)) 1610 (:hook-into notmuch-show-mode))
1611 1611
1612(setup (:straight (forge 1612(setup (:straight (forge
1613 :host github :repo "magit/forge") 1613 :host github :repo "magit/forge")
1614 (eq system-type 'gnu/linux)) 1614 (eq system-type 'gnu/linux))
1615 (require 'forge) 1615 (require 'forge)
1616 (add-to-list 'forge-alist 1616 (add-to-list 'forge-alist