[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/mpv 0a02225f4e 30/50: autoload all interactive functions
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/mpv 0a02225f4e 30/50: autoload all interactive functions |
Date: |
Tue, 28 Dec 2021 00:58:42 -0500 (EST) |
branch: elpa/mpv
commit 0a02225f4ef23eea3af8ccf251d740b5d0fb8bb7
Author: Johann Klähn <kljohann@gmail.com>
Commit: Johann Klähn <kljohann@gmail.com>
autoload all interactive functions
---
mpv.el | 9 +++++++++
1 file changed, 9 insertions(+)
diff --git a/mpv.el b/mpv.el
index 7b91bb4f16..4d6a270705 100644
--- a/mpv.el
+++ b/mpv.el
@@ -197,6 +197,7 @@ See `mpv-start' if you need to pass further arguments and
(interactive "fFile: ")
(start path))
+:autoload
(defun kill ()
"Kill the mpv process."
(interactive)
@@ -207,11 +208,13 @@ See `mpv-start' if you need to pass further arguments and
(setq -process nil)
(setq -queue nil))
+:autoload
(defun pause ()
"Pause or unpause playback."
(interactive)
(-enqueue '("cycle" "pause") #'ignore))
+:autoload
(defun insert-playback-position (&optional arg)
"Insert the current playback position at point.
@@ -249,6 +252,7 @@ See `org-timer-item' which this is based on."
(org-indent-line)
(insert (concat "- " time-string " :: "))))))
+:autoload
(defun seek-to-position-at-point ()
"Jump to playback position as inserted by `mpv-insert-playback-position'.
@@ -261,11 +265,13 @@ This can be used with the `org-open-at-point-functions'
hook."
(when (> secs 0)
(-enqueue `("seek" ,secs "absolute") #'ignore))))))
+:autoload
(defun speed-set (factor)
"Set playback speed to FACTOR."
(interactive "nFactor: ")
(-enqueue `("set" "speed" ,(abs factor)) #'ignore))
+:autoload
(defun speed-increase (steps)
"Increase playback speed by STEPS factors of `mpv-speed-step'."
(interactive "p")
@@ -275,6 +281,7 @@ This can be used with the `org-open-at-point-functions'
hook."
(/ 1 mpv-speed-step)))))
(-enqueue `("multiply" "speed" ,factor) #'ignore)))
+:autoload
(defun speed-decrease (steps)
"Decrease playback speed by STEPS factors of `mpv-speed-step'."
(interactive "p")
@@ -290,6 +297,7 @@ Numeric arguments will be treated as seconds, repeated use
(cl-signum (or (car arg) 1))
(log (abs (or (car arg) 4)) 4))))
+:autoload
(defun seek-forward (arg)
"Seek forward ARG seconds.
If ARG is numeric, it is used as the number of seconds. Else each use
@@ -297,6 +305,7 @@ of \\[universal-argument] will add another `mpv-seek-step'
seconds."
(interactive "P")
(-enqueue `("seek" ,(-raw-prefix-to-seconds arg) "relative") #'ignore))
+:autoload
(defun seek-backward (arg)
"Seek backward ARG seconds.
If ARG is numeric, it is used as the number of seconds. Else each use
- [nongnu] branch elpa/mpv created (now 9bd6d36cc7), ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 899559ae77 04/50: some fixes, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv ee505feff0 16/50: add .gitignore, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 0a02225f4e 30/50: autoload all interactive functions,
ELPA Syncer <=
- [nongnu] elpa/mpv 27b98410e5 45/50: Fix decreasing volume or speed by multiple steps, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 8da5b19f3d 07/50: cleanup, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 91b094c966 02/50: initial import, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv f0da905fd3 06/50: implement pausing and inserting playback position, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 6338f0d6b5 12/50: rename to mpv.el, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv e3fad297cd 18/50: add README.md, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv c6b3fa013c 36/50: Add mpv-run-command function to synchronously run commands, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 9dedf3b7c1 34/50: Monkey-patch org-timer-item instead of reimplementing, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 174cd4b68b 31/50: call expand-file-name on files passed to mpv-play, ELPA Syncer, 2021/12/28
- [nongnu] elpa/mpv 3849da1e45 01/50: root commit, ELPA Syncer, 2021/12/28