aboutsummaryrefslogtreecommitdiff
path: root/Emacs/.config/emacs/elisp/yt-dlp.el
diff options
context:
space:
mode:
authorAryadev Chavali <aryadev@aryadevchavali.com>2024-09-08 02:58:11 +0100
committerAryadev Chavali <aryadev@aryadevchavali.com>2024-09-08 02:58:26 +0100
commitfa543ada1f9dc52ddfccea2bb111bf60401a668e (patch)
tree9b3411db8b94c0b8a4d3607da1e3300b09c36eb6 /Emacs/.config/emacs/elisp/yt-dlp.el
parent511961af87313173ba381112a21d90f04b1cdd92 (diff)
downloaddotfiles-fa543ada1f9dc52ddfccea2bb111bf60401a668e.tar.gz
dotfiles-fa543ada1f9dc52ddfccea2bb111bf60401a668e.tar.bz2
dotfiles-fa543ada1f9dc52ddfccea2bb111bf60401a668e.zip
(Emacs/elisp)~moving stuff around, deleting some old stuff
Diffstat (limited to 'Emacs/.config/emacs/elisp/yt-dlp.el')
-rw-r--r--Emacs/.config/emacs/elisp/yt-dlp.el46
1 files changed, 0 insertions, 46 deletions
diff --git a/Emacs/.config/emacs/elisp/yt-dlp.el b/Emacs/.config/emacs/elisp/yt-dlp.el
deleted file mode 100644
index 051ab5b..0000000
--- a/Emacs/.config/emacs/elisp/yt-dlp.el
+++ /dev/null
@@ -1,46 +0,0 @@
-;;; yt-dlp.el --- Using yt-dlp through Emacs -*- lexical-binding: t; -*-
-
-;; Copyright (C) 2024 Aryadev Chavali
-
-;; Author: Aryadev Chavali <aryadev@aryadevchavali.com>
-;; Keywords:
-
-;; This program is free software; you can redistribute it and/or
-;; modify it under the terms of the GNU General Public License Version
-;; 2 as published by the Free Software Foundation.
-
-;; This program is distributed in the hope that it will be useful,
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-;; GNU General Public License for more details.
-
-;; You should have received a copy of the GNU General Public License
-;; along with this program. If not, see <https://www.gnu.org/licenses/>.
-
-;;; Commentary:
-
-;; Please for the love of god have a yt-dlp config. We're not dealing with that
-;; for you.
-
-;;; Code:
-
-(autoload #'ansi-color-for-comint-mode-on "ansi-color")
-(autoload #'comint-mode "comint")
-(autoload #'comint-output-filter "comint")
-
-(defun yt-dlp-download-video (&optional url)
- (interactive)
- (let ((url (if (stringp url)
- url
- (read-string "Enter URL: "))))
- (message "[yt-dlp]: Downloading video `%s'" url)
- (with-current-buffer (get-buffer-create "*yt-dlp*")
- (ansi-color-for-comint-mode-on))
- (set-process-filter (start-process-shell-command
- "yt-dlp" "*yt-dlp*"
- (concat "yt-dlp " "\"" url "\""))
- #'comint-output-filter)
- (switch-to-buffer "*yt-dlp*")))
-
-(provide 'yt-dlp)
-;;; yt-dlp.el ends here