From e80a2fef9627c95186ac2068cc58f082b6ca0729 Mon Sep 17 00:00:00 2001 From: jao Date: Wed, 2 Feb 2022 03:54:52 +0000 Subject: tweaks for interaction with deezer --- exwm.org | 34 +++++++++++++++++++++++++++------- 1 file changed, 27 insertions(+), 7 deletions(-) (limited to 'exwm.org') diff --git a/exwm.org b/exwm.org index c25c45e..cb08b0c 100644 --- a/exwm.org +++ b/exwm.org @@ -253,9 +253,6 @@ (jao-def-exwm-runner jao-exwm-vlc 4 "VLC" "vlc") - (jao-def-exwm-runner jao-exwm-deezer 5 "Deezer" "deezer-desktop") - (defalias 'jao-streaming-list #'jao-exwm-deezer) - (jao-def-exwm-runner jao-exwm-slack 0 "Slack" "slack") (jao-def-exwm-runner jao-exwm-signal 0 "Signal" "signal-desktop") @@ -301,6 +298,33 @@ "/tmp/screenshot/$(date +'%g%m%d-%H%M%S').png"))) (start-process-shell-command "import" "* exwm - console *" c))) + (defun jao-exwm--send-str (str) + (dolist (k (string-to-list (kbd str))) + (exwm-input--fake-key k))) + + #+end_src +* Deezer support + #+begin_src emacs-lisp + (jao-def-exwm-runner jao-exwm-deezer-1 5 "Deezer" "deezer-desktop") + + (defun jao-exwm-deezer () + (interactive) + (jao-exwm-deezer-1) + (delete-other-windows)) + + (defalias 'jao-streaming-list #'jao-exwm-deezer) + (jao-mpris-setup-aliases) + + (defun jao-exwm--with-deezer (fun) + (jao-exwm-deezer) + (funcall fun)) + + (defun jao-exwm-deezer-like () + (interactive) + (jao-exwm-deezer) + (exwm-input--update-focus (selected-window)) + (jao-exwm--send-str "L")) + #+end_src * Zathura support #+begin_src emacs-lisp @@ -319,10 +343,6 @@ (string-to-number (match-string 4 exwm-title)) (match-string 2 exwm-title))))) - (defun jao-exwm--send-str (str) - (dolist (k (string-to-list (kbd str))) - (exwm-input--fake-key k))) - (defun jao-zathura-goto-page (page-no) (jao-exwm--send-str (format "%sg" page-no))) -- cgit v1.2.3