[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/mpv 3a43c9e60a 14/50: reorder function definitions
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/mpv 3a43c9e60a 14/50: reorder function definitions |
Date: |
Tue, 28 Dec 2021 00:58:37 -0500 (EST) |
branch: elpa/mpv
commit 3a43c9e60abec315da803d645869e835eb8be1a8
Author: Johann Klähn <kljohann@gmail.com>
Commit: Johann Klähn <kljohann@gmail.com>
reorder function definitions
---
mpv.el | 44 +++++++++++++++++++++++++++-----------------
1 file changed, 27 insertions(+), 17 deletions(-)
diff --git a/mpv.el b/mpv.el
index 514843d5d8..3f2454281b 100644
--- a/mpv.el
+++ b/mpv.el
@@ -21,7 +21,17 @@
;;; Commentary:
+;; This package is a potpourri of helper functions to control a mpv
+;; process via its IPC interface. You might want to add the following
+;; to your init file:
;;
+;; (org-add-link-type "mpv" #'mpv-play)
+;; (defun org-mpv-complete-link (&optional arg)
+;; (replace-regexp-in-string
+;; "file:" "mpv:"
+;; (org-file-complete-link arg)
+;; t t))
+;; (add-hook 'org-open-at-point-functions #'mpv-seek-to-position-at-point)
;;; Code:
@@ -78,23 +88,6 @@ it will be killed."
(-tq-filter -queue string)))
t))
-(defun kill ()
- "Kill the mpv process."
- (interactive)
- (when -queue
- (tq-close -queue))
- (when (-alive-p)
- (kill-process -process))
- (setq -process nil)
- (setq -queue nil))
-
-(defun play (path)
- "Start an mpv process playing the file at PATH.
-
-You can use this with `org-add-link-type' or `org-file-apps'."
- (interactive "fFile: ")
- (-start path))
-
(defun -enqueue (command fn &optional delay-command)
"Add COMMAND to the transaction queue.
@@ -151,6 +144,23 @@ drops unsolicited event messages."
(tq-queue-pop tq)))
(-tq-process-buffer tq))))
+(defun play (path)
+ "Start an mpv process playing the file at PATH.
+
+You can use this with `org-add-link-type' or `org-file-apps'."
+ (interactive "fFile: ")
+ (-start path))
+
+(defun kill ()
+ "Kill the mpv process."
+ (interactive)
+ (when -queue
+ (tq-close -queue))
+ (when (-alive-p)
+ (kill-process -process))
+ (setq -process nil)
+ (setq -queue nil))
+
(defun pause ()
"Pause or unpause playback."
(interactive)
- [nongnu] elpa/mpv f0f61db3af 47/50: Add COPYING file following GPL, (continued)
- [nongnu] elpa/mpv f0f61db3af 47/50: Add COPYING file following GPL, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 4774d52c8c 48/50: Merge pull request #21 from sachac/master, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 604b32d7e6 11/50: add play command, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 15c51ddc5e 10/50: remove dependency on dash library, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 059135de39 28/50: version 0.1.0, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 9e1781249f 27/50: convert numbers to strings before encoding as JSON, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 79e01bf89b 35/50: Remove stale socket files when mpv process is gone, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 4dddd55c5e 41/50: Add mpv-version., ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 2d40c45505 38/50: Add mpv-seek and mpv-revert-seek commands, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv a5c6eed9ac 44/50: Add volume control commands, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 3a43c9e60a 14/50: reorder function definitions,
ELPA Syncer <=
- [nongnu] elpa/mpv 338af25d20 23/50: add mpv-on-event-hook, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 937bdf522a 17/50: implement seeking and changing of playback speed, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 0e4318b45f 13/50: improve docstrings, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 0579b5c707 09/50: support inserting org timer list items, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv ce3bbfac36 22/50: add mpv-default-options, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 9ef359d712 20/50: fix generation of autoloads, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 9ff4d5d80b 25/50: fix mpv-insert-playback-position, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 705e81b8a6 42/50: Make mpv-version more verbose and update its docstring as suggested, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv ed83369372 39/50: Fix mpv-seek-to-position-at-point for start-of-playback position, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 2d24187f7b 43/50: Merge pull request #9 from firmart/patch-mpv-version, ELPA Syncer, 2021/12/28