diff options
| -rw-r--r-- | completion.org | 2 | ||||
| -rw-r--r-- | init.org | 1 |
2 files changed, 3 insertions, 0 deletions
diff --git a/completion.org b/completion.org index 3c552ef..b7ebbcb 100644 --- a/completion.org +++ b/completion.org @@ -419,6 +419,8 @@ (define-key embark-url-map (kbd "f") #'browse-url-firefox) (define-key embark-url-map (kbd "x") #'jao-rss-subscribe) (define-key embark-url-map (kbd "m") 'jao-browse-with-external-browser) + (define-key embark-url-map (kbd "p") 'jao-browse-add-url-to-mpc) + #+end_src *** video url targets #+begin_src emacs-lisp @@ -1539,6 +1539,7 @@ (format "^https?://.*/.*\\.%s" (regexp-opt '("mp4" "mp3" "flv")))) (defun jao-browse-add-url-to-mpc (url &rest _) + "Add the given URL to mpc's playing list, or just play it." (let ((p (yes-or-no-p (format "Play %s right now?" url)))) (when p (jao-mpc-clear)) (jao-mpc-add-url url) |