summary refs log tree commit diff stats
path: root/init.el
diff options
context:
space:
mode:
authorCase Duckworth2021-08-30 08:51:46 -0500
committerCase Duckworth2021-08-30 08:51:46 -0500
commit8e3d3480f13c986397ef33fb5651557882b91f29 (patch)
tree02c23fab5b04708d4bfd555b232a0d20b1f892e4 /init.el
parentAdd toggle bindings (diff)
downloademacs-8e3d3480f13c986397ef33fb5651557882b91f29.tar.gz
emacs-8e3d3480f13c986397ef33fb5651557882b91f29.zip
Make mastodon-mode better
Diffstat (limited to 'init.el')
-rw-r--r--init.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/init.el b/init.el index e17687f..aaa6c13 100644 --- a/init.el +++ b/init.el
@@ -1020,8 +1020,7 @@ like a dumbass."
1020 kill-read-only-ok t 1020 kill-read-only-ok t
1021 load-prefer-newer t 1021 load-prefer-newer t
1022 native-comp-async-report-warnings-errors nil 1022 native-comp-async-report-warnings-errors nil
1023 set-mark-command-repeat-pop t 1023 set-mark-command-repeat-pop t)
1024 )
1025 1024
1026 (when (fboundp 'command-completion-default-include-p) 1025 (when (fboundp 'command-completion-default-include-p)
1027 (setq read-extended-command-predicate 1026 (setq read-extended-command-predicate
@@ -1118,6 +1117,8 @@ like a dumbass."
1118 (define-key gnus-article-mode-map key #'ace-link-gnus)) 1117 (define-key gnus-article-mode-map key #'ace-link-gnus))
1119 (with-eval-after-load 'ert 1118 (with-eval-after-load 'ert
1120 (define-key ert-results-mode-map "o" #'ace-link-help)) 1119 (define-key ert-results-mode-map "o" #'ace-link-help))
1120 (with-eval-after-load 'mastodon
1121 (define-key mastodon-mode-map "o" #'ace-link-addr))
1121 ;; And still everything else 1122 ;; And still everything else
1122 (setq ace-link-fallback-function #'ace-link-addr) 1123 (setq ace-link-fallback-function #'ace-link-addr)
1123 (global-set-key key #'ace-link))) 1124 (global-set-key key #'ace-link)))
@@ -1579,7 +1580,9 @@ successive invocations."
1579 (:straight request) 1580 (:straight request)
1580 (:option mastodon-instance-url "https://writing.exchange" 1581 (:option mastodon-instance-url "https://writing.exchange"
1581 mastodon-auth-source-file (car auth-sources) 1582 mastodon-auth-source-file (car auth-sources)
1582 mastodon-client--token-file (acdw/dir "mastodon.plstore"))) 1583 mastodon-client--token-file (acdw/dir "mastodon.plstore"))
1584 (:hook hl-line-mode
1585 olivetti-mode))
1583 1586
1584(setup (:straight (modus-themes 1587(setup (:straight (modus-themes
1585 :host gitlab 1588 :host gitlab