diff options
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 37 |
1 files changed, 19 insertions, 18 deletions
@@ -540,9 +540,7 @@ (use-package jao-tracking :demand t - :init (setq jao-tracking-bkg - (if (jao-colors-scheme-dark-p) "grey20" "grey93") - jao-tracking-use-scratch t) + :init (setq jao-tracking-bkg (if (jao-colors-scheme-dark-p) "grey20" "grey93")) :config (jao-tracking-setup)) ;;;; tmr @@ -1038,6 +1036,7 @@ ("C-c g" . 'jao-afio-goto-mail) ("C-c w" . 'jao-afio-goto-www) ("C-c z" . 'jao-afio-goto-docs) + ("C-c t" . 'jao-afio-goto-chats) ("C-c 0" . 'jao-afio-goto-scratch) ("M-o" . 'jao-afio-toggle))) (add-hook 'jao-afio-switch-hook 'jao-minibuffer-refresh t) @@ -2546,7 +2545,7 @@ (defun jao-telega () (interactive) - (when jao-tracking-use-scratch (jao-afio-goto-scratch)) + (jao-tracking-go-to-chats) (if (get-buffer telega-root-buffer-name) (pop-to-buffer telega-root-buffer-name) (telega))) @@ -2584,18 +2583,19 @@ (setq mastodon-instance-url "https://mastodon.social" mastodon-active-user "jao@gnu.org") :config - (defun jao-mastodon-toot-url () - (interactive) - (when-let (url (jao-url-around-point t)) - (jao-afio-goto-scratch) - (mastodon-toot--compose-buffer nil nil nil url))) - - (defun jao-mastodon () - (interactive) - (jao-afio-goto-scratch) - (mastodon)) :bind (:map eww-mode-map ("T" . jao-mastodon-toot-url))) +(defun jao-mastodon-toot-url () + (interactive) + (when-let (url (jao-url-around-point t)) + (jao-tracking-go-to-chats) + (mastodon-toot--compose-buffer nil nil nil url))) + +(defun jao-mastodon () + (interactive) + (jao-afio-goto-scratch) + (mastodon)) + ;;;; startup (defun jao-chats (&optional p) (interactive "P") @@ -2613,7 +2613,7 @@ (defun jao-all-chats () (interactive) (when jao-tracking-use-scratch - (jao-afio-goto-scratch) + (jao-afio-goto-chats) (delete-other-windows)) (jao-chats t)) @@ -2793,7 +2793,6 @@ (use-package jao-spt :demand t :config - ;; (jao-spt-set-up) (defun jao-spt-setup-aliases () (setq espotify-play-uri-function #'jao-spt-play-uri) (defalias 'jao-streaming-list #'jao-term-spt) @@ -2810,10 +2809,10 @@ (defalias 'jao-streaming-dislike #'jao-spt-dislike) (defalias 'jao-streaming-toggle-shuffle #'jao-spt-toggle-shuffle))) -(defvar jao-spt-on t) +(defvar jao-spt-on nil) (defun jao-spt-on-p () jao-spt-on) -(jao-def-exec-in-term "spt" "spt" (jao-afio-goto-scratch t)) +(jao-def-exec-in-term "spt" "spt" (jao-afio-goto-scratch)) (defun jao-streaming-toggle-player () (interactive) @@ -2826,6 +2825,8 @@ (message "%s activated " (if (setq jao-spt-on (not jao-spt-on)) "spt" "mpris"))) +(jao-streaming-toggle-player) + ;;;; music transients (require 'jao-lyrics) (setq jao-lyrics-info-function #'jao-player-info) |