From 5fe7d70d08118381c21f68122f509d43281a8e5c Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 17 Jan 2022 01:10:01 -0600
Subject: Add ytdious

---
 lisp/+ytdious.el | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 lisp/+ytdious.el

(limited to 'lisp')

diff --git a/lisp/+ytdious.el b/lisp/+ytdious.el
new file mode 100644
index 0000000..6124149
--- /dev/null
+++ b/lisp/+ytdious.el
@@ -0,0 +1,21 @@
+;;; +ytdious.el --- Ytdious customizations -*- lexical-binding: t; -*-
+
+;;; Commentary:
+
+;; https://github.com/spiderbit/ytdious
+
+;;; Code:
+
+(defun +ytdious-watch ()
+  "Stream video at point in mpv."
+  (interactive)
+  (let* ((video (ytdious-get-current-video))
+         (id    (ytdious-video-id-fun video)))
+    (start-process "ytdious mpv" nil
+                   "mpv"
+                   (concat "https://www.youtube.com/watch?v=" id))
+    "--ytdl-format=bestvideo[height<=?720]+bestaudio/best")
+  (message "Starting streaming..."))
+
+(provide '+ytdious)
+;;; +ytdious.el ends here
-- 
cgit 1.4.1-21-gabe81