From 0f755cffbd470508e4e8aea70e3253aaa5a61a5f Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 12 Nov 2021 02:53:53 +0000
Subject: browse-url handler for sound urls (mpc)

---
 gnus.org | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

(limited to 'gnus.org')

diff --git a/gnus.org b/gnus.org
index 017261d..c9cabed 100644
--- a/gnus.org
+++ b/gnus.org
@@ -749,8 +749,8 @@
                 (jao-browse-with-external-browser)
               (browse-url (jao-url-around-point))))))
 
-      (defun jao-gnus-open-enclosure (&optional playp)
-        (interactive "P")
+      (defun jao-gnus-open-enclosure ()
+        (interactive)
         (save-window-excursion
           (gnus-summary-select-article-buffer)
           (save-excursion
@@ -758,10 +758,7 @@
             (when (search-forward "Enclosure:")
               (forward-char 2)
               (when-let ((url (thing-at-point-url-at-point)))
-                (message "%s %s ..." (if playp "Playing" "Adding") url)
-                (when playp (jao-mpc-clear))
-                (jao-mpc-add-url url)
-                (when playp (jao-mpc-play)))))))
+                (jao-browse-add-url-to-mpc url))))))
     #+end_src
 * Keyboard shortcuts
   #+begin_src emacs-lisp
-- 
cgit v1.2.3