diff options
-rw-r--r-- | init.el | 18 | ||||
-rw-r--r-- | lisp/+elfeed.el | 10 |
2 files changed, 27 insertions, 1 deletions
diff --git a/init.el b/init.el index 1a39f3c..f4d6533 100644 --- a/init.el +++ b/init.el | |||
@@ -915,6 +915,9 @@ See also `crux-reopen-as-root-mode'." | |||
915 | :repo "davep/discord.el" | 915 | :repo "davep/discord.el" |
916 | :fork (:repo "duckwork/discord.el")))) | 916 | :fork (:repo "duckwork/discord.el")))) |
917 | 917 | ||
918 | (setup (:straight dumb-jump) | ||
919 | (add-hook 'xref-backend-functions #'dumb-jump-xref-activate)) | ||
920 | |||
918 | (setup (:straight electric-cursor) | 921 | (setup (:straight electric-cursor) |
919 | (:option electric-cursor-alist '((overwrite-mode . hbar) | 922 | (:option electric-cursor-alist '((overwrite-mode . hbar) |
920 | (god-local-mode . box))) | 923 | (god-local-mode . box))) |
@@ -941,13 +944,15 @@ See also `crux-reopen-as-root-mode'." | |||
941 | ) | 944 | ) |
942 | (:+key "C-x w" #'elfeed) | 945 | (:+key "C-x w" #'elfeed) |
943 | (:with-mode elfeed-search-mode | 946 | (:with-mode elfeed-search-mode |
947 | (:bind "&" #'+elfeed-search-browse-generic) | ||
944 | (:hook #'hl-line-mode) | 948 | (:hook #'hl-line-mode) |
945 | ;; https://old.reddit.com/r/emacs/comments/rlli0u/whats_your_favorite_defadvice/hphfh4e/ | 949 | ;; https://old.reddit.com/r/emacs/comments/rlli0u/whats_your_favorite_defadvice/hphfh4e/ |
946 | (advice-add #'elfeed-search-update--force :after #'elfeed-db-save) | 950 | (advice-add #'elfeed-search-update--force :after #'elfeed-db-save) |
947 | (advice-add #'elfeed :before #'elfeed-db-load)) | 951 | (advice-add #'elfeed :before #'elfeed-db-load)) |
948 | (:with-mode elfeed-show-mode | 952 | (:with-mode elfeed-show-mode |
949 | (:bind "SPC" #'+elfeed-scroll-up-command | 953 | (:bind "SPC" #'+elfeed-scroll-up-command |
950 | "S-SPC" #'+elfeed-scroll-down-command) | 954 | "S-SPC" #'+elfeed-scroll-down-command |
955 | "&" #'+elfeed-show-browse-generic) | ||
951 | (:hook #'reading-mode) | 956 | (:hook #'reading-mode) |
952 | ;; (define-advice elfeed-show-entry (:after (&rest _)) | 957 | ;; (define-advice elfeed-show-entry (:after (&rest _)) |
953 | ;; "Re-flow the entry a short time after showing it." | 958 | ;; "Re-flow the entry a short time after showing it." |
@@ -1221,6 +1226,9 @@ See also `crux-reopen-as-root-mode'." | |||
1221 | org-visibility-include-regexps '("\\.org\\'")) | 1226 | org-visibility-include-regexps '("\\.org\\'")) |
1222 | (org-visibility-enable-hooks)) | 1227 | (org-visibility-enable-hooks)) |
1223 | 1228 | ||
1229 | (setup (:straight orglink) | ||
1230 | (global-orglink-mode +1)) | ||
1231 | |||
1224 | (setup (:straight package-lint | 1232 | (setup (:straight package-lint |
1225 | package-lint-flymake) | 1233 | package-lint-flymake) |
1226 | (add-hook 'emacs-mode-hook #'package-lint-flymake-setup) | 1234 | (add-hook 'emacs-mode-hook #'package-lint-flymake-setup) |
@@ -1395,6 +1403,8 @@ See also `crux-reopen-as-root-mode'." | |||
1395 | (vertico-mouse-mode +1) | 1403 | (vertico-mouse-mode +1) |
1396 | (vertico-multiform-mode +1) | 1404 | (vertico-multiform-mode +1) |
1397 | (:option vertico-multiform-commands '((execute-extended-command flat) | 1405 | (:option vertico-multiform-commands '((execute-extended-command flat) |
1406 | (helpful-function) | ||
1407 | (helpful-macro) | ||
1398 | (helpful-callable) | 1408 | (helpful-callable) |
1399 | (helpful-variable)) | 1409 | (helpful-variable)) |
1400 | ;; This is applied /after/ the above, so default is at the end of | 1410 | ;; This is applied /after/ the above, so default is at the end of |
@@ -1447,6 +1457,12 @@ See also `crux-reopen-as-root-mode'." | |||
1447 | (:hook-into org-mode | 1457 | (:hook-into org-mode |
1448 | latex-mode)) | 1458 | latex-mode)) |
1449 | 1459 | ||
1460 | (setup (:straight yasnippet) | ||
1461 | (:option yas-snippet-dirs (list | ||
1462 | (expand-file-name "snippets" user-emacs-directory) | ||
1463 | (sync/ "emacs/snippets" t))) | ||
1464 | (yas-global-mode +1)) | ||
1465 | |||
1450 | (setup (:straight zoom-frm)) | 1466 | (setup (:straight zoom-frm)) |
1451 | 1467 | ||
1452 | (setup (:straight zzz-to-char) | 1468 | (setup (:straight zzz-to-char) |
diff --git a/lisp/+elfeed.el b/lisp/+elfeed.el index 4ee7581..9e5f787 100644 --- a/lisp/+elfeed.el +++ b/lisp/+elfeed.el | |||
@@ -21,5 +21,15 @@ | |||
21 | (scroll-down-command arg) | 21 | (scroll-down-command arg) |
22 | (error (elfeed-show-prev))))) | 22 | (error (elfeed-show-prev))))) |
23 | 23 | ||
24 | (defun +elfeed-search-browse-generic () | ||
25 | "Browse a url with `browse-url-generic-browser'." | ||
26 | (interactive) | ||
27 | (elfeed-search-browse-url t)) | ||
28 | |||
29 | (defun +elfeed-show-browse-generic () | ||
30 | "Browse a url with `browse-url-generic-browser'." | ||
31 | (interactive) | ||
32 | (elfeed-show-visit t)) | ||
33 | |||
24 | (provide '+elfeed) | 34 | (provide '+elfeed) |
25 | ;;; +elfeed.el ends here | 35 | ;;; +elfeed.el ends here |