summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--early-init.el8
-rw-r--r--init.el12
2 files changed, 11 insertions, 9 deletions
diff --git a/early-init.el b/early-init.el index c7d4985..b020c52 100644 --- a/early-init.el +++ b/early-init.el
@@ -191,15 +191,19 @@ say, `tool-bar-mode' once to toggle the tool bar back on."
191 before-init-time))) 191 before-init-time)))
192 gcs-done)) 192 gcs-done))
193 193
194;;; `setup' 194;;; Early-loaded packages
195;; These packages are here because they need to be loaded /before/
196;; everything else in init.el.
197
195(straight-use-package '(setup :host nil :repo "https://git.sr.ht/~pkal/setup")) 198(straight-use-package '(setup :host nil :repo "https://git.sr.ht/~pkal/setup"))
196(require 'setup) 199(require 'setup)
197(require 'acdw-setup) 200(require 'acdw-setup)
198 201
199;;; `no-littering'
200(setup (:straight no-littering) 202(setup (:straight no-littering)
201 (:option no-littering-etc-directory (acdw/dir) 203 (:option no-littering-etc-directory (acdw/dir)
202 no-littering-var-directory (acdw/dir)) 204 no-littering-var-directory (acdw/dir))
203 (require 'no-littering)) 205 (require 'no-littering))
204 206
207(setup (:straight el-patch))
208
205;;; early-init.el ends here 209;;; early-init.el ends here
diff --git a/init.el b/init.el index 67b0969..b0d9d77 100644 --- a/init.el +++ b/init.el
@@ -502,8 +502,6 @@ In short, DO NOT USE THIS FUNCTION!!!"
502 (defun edit-server@set-a-variable (&rest _) 502 (defun edit-server@set-a-variable (&rest _)
503 (setq-local edit-server-frame-p t)))) 503 (setq-local edit-server-frame-p t))))
504 504
505(setup (:straight el-patch))
506
507(setup eldoc 505(setup eldoc
508 (:option eldoc-idle-delay 0.1 506 (:option eldoc-idle-delay 0.1
509 eldoc-echo-area-use-multiline-p nil)) 507 eldoc-echo-area-use-multiline-p nil))
@@ -1417,8 +1415,8 @@ specific to most general, they are these:
1417 (crux-reopen-as-root-mode +1)) 1415 (crux-reopen-as-root-mode +1))
1418 1416
1419(setup (:straight-if (define-repeat-map 1417(setup (:straight-if (define-repeat-map
1420 :host nil 1418 :host nil
1421 :repo "https://tildegit.org/acdw/define-repeat-map.el") 1419 :repo "https://tildegit.org/acdw/define-repeat-map.el")
1422 (acdw/system :home)) 1420 (acdw/system :home))
1423 1421
1424 (defun acdw/other-window-or-switch-buffer-backward () 1422 (defun acdw/other-window-or-switch-buffer-backward ()
@@ -1798,7 +1796,7 @@ specific to most general, they are these:
1798 w3m-message-link)) 1796 w3m-message-link))
1799 (link-hint-define-type type 1797 (link-hint-define-type type
1800 :open-secondary browse-url-secondary-browser-function 1798 :open-secondary browse-url-secondary-browser-function
1801 :open-secondary-multiple t)) 1799 :open-secondary-multiple t))
1802 1800
1803 (defun acdw/link-hint-open-all-links (prefix) 1801 (defun acdw/link-hint-open-all-links (prefix)
1804 "Open all visible links. 1802 "Open all visible links.
@@ -1806,7 +1804,7 @@ When PREFIX is non-nil, open links with
1806`browse-url-secondary-browser-function'." 1804`browse-url-secondary-browser-function'."
1807 (interactive "P") 1805 (interactive "P")
1808 (avy-with link-hint-open-all-links 1806 (avy-with link-hint-open-all-links
1809 (link-hint--all (if prefix :open-secondary :open)))) 1807 (link-hint--all (if prefix :open-secondary :open))))
1810 1808
1811 (defun acdw/link-hint-open-multiple-links (prefix) 1809 (defun acdw/link-hint-open-multiple-links (prefix)
1812 "Use `avy' to open multiple visible links at once. 1810 "Use `avy' to open multiple visible links at once.
@@ -1814,7 +1812,7 @@ When PREFIX is non-nil, open links with
1814`browse-url-secondary-browser-function'." 1812`browse-url-secondary-browser-function'."
1815 (interactive "P") 1813 (interactive "P")
1816 (avy-with link-hint-open-multiple-links 1814 (avy-with link-hint-open-multiple-links
1817 (link-hint--multiple (if prefix :open-secondary :open)))) 1815 (link-hint--multiple (if prefix :open-secondary :open))))
1818 1816
1819 (:option link-hint-avy-style 'post) 1817 (:option link-hint-avy-style 'post)
1820 (:global "C-;" 1818 (:global "C-;"