1 files changed, 0 insertions, 95 deletions
diff --git a/.emacs.d/modules/thanos-yeetube.el b/.emacs.d/modules/thanos-yeetube.el
deleted file mode 100644
index 517d245..0000000
--- a/.emacs.d/modules/thanos-yeetube.el
+++ /dev/null
@@ -1,95 +0,0 @@
-;;; thanos-yeetube.el ---                            -*- lexical-binding: t; -*-
-
-;; Copyright (C) 2023  Thanos Apollo
-
-;; Author: Thanos Apollo <[email protected]>
-;; Keywords: 
-
-;; This program is free software; you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation, either version 3 of the License, or
-;; (at your option) any later version.
-
-;; 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:
-
-;; 
-
-;;; Code:
-
-(require 'yeetube)
-
-
-(defun yeetube-download-vimeo-videos ()
-  (interactive)
-  (let ((url "")
-	(name "")
-	(download-counter 1))
-    (while (not (string= url "q"))
-      (setf url (read-string "Enter URL (q to quit): "))
-      (unless (string= url "q")
-	(setf name (read-string (format "Custom name (download counter: %d) " download-counter)))
-	(setf download-counter (1+ download-counter))
-	(call-process-shell-command
-	 (format
-	  "yt-dlp '%s' -o '%s'"
-	  (replace-regexp-in-string "\\.json" ".m3u8" url) name)
-	 nil 0)))))
-
-(defun yeetube-download-videos-ffmpeg ()
-  "Download one or multiple videos using yt-dlp.
-  This command is not meant to be used in the *Yeetube Search* buffer.
-
-  Usage Example:
-  Open a Dired buffer and navigate where you want to download your videos,
-  then run this command interactively.  You can leave the 'Custom name:'
-  prompt blank to keep the default name."
-  (interactive)
-  (let ((url "")
-	(name "")
-	(download-counter 1)
-	(stored-contents nil))
-    ;; Read links and names until "q" is entered
-    (while (not (string= url "q"))
-      (setf url (read-string "Enter URL (q to quit): "))
-      (unless (string= url "q")
-	(setf name (read-string (format "Custom name (download counter: %d) " download-counter)))
-	(push (cons url name) stored-contents)
-	(setf download-counter (1+ download-counter))))
-    ;; Process the collected links and names
-    (dolist (pair stored-contents)
-      (let ((url (car pair))
-	    (name (cdr pair)))
-	(async-shell-command
-	 (format
-	  "ffmpeg -protocol_whitelist file,crypto,data,https,tls,tcp -stats -i '%s' -codec copy '%s.mp4'"
-	  url name))))))
-
-(when is-zeus
-  (load-file "~/Developer/yeetube.el/yeetube.el"))
-(require 'yeetube)
-
-(setf yeetube-results-limit 30
-      yeetube-mpv-disable-video t)
-
-(define-prefix-command 'thanos/yeetube)
-(global-set-key (kbd "C-c y") 'thanos/yeetube)
-(define-key thanos/yeetube (kbd "s") 'yeetube-search)
-(define-key thanos/yeetube (kbd "b") 'yeetube-play-saved-video)
-(define-key thanos/yeetube (kbd "d") 'yeetube-download-videos)
-(define-key thanos/yeetube (kbd "p") 'yeetube-mpv-toggle-pause)
-(define-key thanos/yeetube (kbd "C-p") 'yeetube-mpv-toggle-video)
-(define-key thanos/yeetube (kbd "k") 'yeetube-remove-saved-video)
-(define-key thanos/yeetube (kbd "u") 'yeetube-change-platform)
-(define-key thanos/yeetube (kbd "C-d") 'yeetube-download-vimeo-videos)
-(define-key yeetube-mode-map (kbd "c") 'yeetube-switch-mpv)
-
-(provide 'thanos-yeetube)
-;;; thanos-yeetube.el ends here