diff options
| -rwxr-xr-x | emacs.org | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -814,8 +814,8 @@ Generate a random password between 20 and 40 characters Create function to watch videos using ~mpv~ #+begin_src emacs-lisp (defun elfeed-v-mpv (url) - "Watch a video from URL in MPV" - (call-process-shell-command (format "mpv \"%s\"" url) nil 0)) + "Watch a video from URL in MPV" + (start-process-shell-command "elfeed-video" nil (format "mpv \"%s\"" url))) (defun elfeed-view-mpv (&optional use-generic-p) "Youtube-feed link" @@ -823,9 +823,9 @@ Create function to watch videos using ~mpv~ (let ((entries (elfeed-search-selected))) (cl-loop for entry in entries do (elfeed-untag entry 'unread) - when (elfeed-entry-link entry) - do (elfeed-v-mpv it)) - (mapc #'elfeed-search-update-entry entries) + when (elfeed-entry-link entry) + do (elfeed-v-mpv it)) + (mapc #'elfeed-search-update-entry entries) (unless (use-region-p) (forward-line)))) #+end_src ** Settings & Keys |