From f640e7f2ced63fca7f01eb7a9f8a2fa6ad62db9c Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Fri, 18 Aug 2023 16:13:19 +0300 Subject: remove old send-socket-command --- yeetube.el | 15 --------------- 1 file changed, 15 deletions(-) (limited to 'yeetube.el') diff --git a/yeetube.el b/yeetube.el index 38366f2..2336c99 100644 --- a/yeetube.el +++ b/yeetube.el @@ -214,8 +214,6 @@ Example Usage: (when clear-saved (setq yeetube-saved-videos nil)))) -(defun yeetube-disable-video-mpv () - "Toggle video on/off for mpv player." (defun yeetube--mpv-play (url) "Use mpv to play URL." (let ((mpv (executable-find "mpv")) @@ -244,19 +242,6 @@ Example Usage: (concat mpv no-video socket))) (message (format "Yeetube Player: %s" yeetube-player)))) -(defun yeetube-send-command-to-socket (socket json-data) - "Send command with JSON-DATA to SOCKET." - (let* ((proc (make-network-process :name "yeet-socket" - :family 'local - :service socket))) - (process-send-string proc (concat json-data "\n")) - (accept-process-output proc))) - -(defun yeetube--send-command (property value) - "Send command with PROPERTY and VALUE as json-data to mpv socket." - (let ((json-data (format "{ \"command\": [\"%s\", \"%s\"]}" property value))) - (yeetube-send-command-to-socket yeetube-mpv-socket json-data))) - (defun yeetube-toggle-pause-mpv () "Toggle play/pause mpv." (interactive) -- cgit v1.2.3