[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/subed 3bc609d 147/389: Make run-subtitle-time-adjusted-hoo
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/subed 3bc609d 147/389: Make run-subtitle-time-adjusted-hook not srt specific |
Date: |
Fri, 3 Dec 2021 11:00:15 -0500 (EST) |
branch: elpa/subed
commit 3bc609d9669a8543dbdab97e9d89d27012b94799
Author: Random User <rndusr@posteo.de>
Commit: Random User <rndusr@posteo.de>
Make run-subtitle-time-adjusted-hook not srt specific
---
subed/subed-config.el | 8 ++++++++
subed/subed-srt.el | 12 ++----------
2 files changed, 10 insertions(+), 10 deletions(-)
diff --git a/subed/subed-config.el b/subed/subed-config.el
index 010f229..a9887a8 100644
--- a/subed/subed-config.el
+++ b/subed/subed-config.el
@@ -231,6 +231,14 @@ hardcoded."
The functions are called with the relevant subtitle ID and the
subtitle's start time.")
+(defun subed--run-subtitle-time-adjusted-hook ()
+ "Run `subed-subtitle-time-adjusted-hook' functions with
+subtitle ID and start time of the adjusted subtitle."
+ (when subed-subtitle-time-adjusted-hook
+ (run-hook-with-args 'subed-subtitle-time-adjusted-hook
+ (subed--subtitle-id)
+ (subed--subtitle-msecs-start))))
+
(defvar-local subed-point-motion-hook nil
"Functions to call after point changed.")
diff --git a/subed/subed-srt.el b/subed/subed-srt.el
index 9f71320..81244c2 100644
--- a/subed/subed-srt.el
+++ b/subed/subed-srt.el
@@ -315,7 +315,7 @@ Return point or nil if there is no previous subtitle."
(subed-srt-jump-to-subtitle-time-start)
(when (looking-at subed-srt--regexp-timestamp)
(replace-match (subed-srt--msecs-to-timestamp msecs-new))))
- (subed-srt--run-subtitle-time-adjusted-hook))))
+ (subed--run-subtitle-time-adjusted-hook))))
(defun subed-srt--adjust-subtitle-stop-relative (msecs)
"Add MSECS milliseconds to stop time (use negative value to subtract)."
@@ -336,15 +336,7 @@ Return point or nil if there is no previous subtitle."
(subed-srt-jump-to-subtitle-time-stop)
(when (looking-at subed-srt--regexp-timestamp)
(replace-match (subed-srt--msecs-to-timestamp msecs-new))))
- (subed-srt--run-subtitle-time-adjusted-hook))))
-
-(defun subed-srt--run-subtitle-time-adjusted-hook ()
- "Run `subed-subtitle-time-adjusted-hook' functions with
-subtitle ID and start time of the adjusted subtitle."
- (when subed-subtitle-time-adjusted-hook
- (run-hook-with-args 'subed-subtitle-time-adjusted-hook
- (subed-srt--subtitle-id)
- (subed-srt--subtitle-msecs-start))))
+ (subed--run-subtitle-time-adjusted-hook))))
(defun subed-srt-increase-start-time (&optional arg)
"Add `subed-milliseconds-adjust' milliseconds to start time of current
subtitle.
- [nongnu] elpa/subed 382e83c 126/389: Add more tests for moving subtitles, (continued)
- [nongnu] elpa/subed 382e83c 126/389: Add more tests for moving subtitles, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed d1a0b2f 127/389: Remove unnecessary spy-on, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 61cf9ce 129/389: Remove garbage tests for point-to-player syncing, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 3aa9a71 131/389: Pause player by default when editing subtitle text, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed d85f988 136/389: Add keybindings for subed-shift-subtitle-forward/backward, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 5b90306 140/389: Round mpv's playback position to prevent float weirdness (n.99999...), ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 0f3add7 141/389: Temporarily disable point-to-player syncing when adjusting time, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 3081983 144/389: Add commentary section to header, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed c069e23 145/389: subed is named "subed", ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 522017e 146/389: Add packaging information to header, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 3bc609d 147/389: Make run-subtitle-time-adjusted-hook not srt specific,
ELPA Syncer <=
- [nongnu] elpa/subed f3fe9d8 148/389: Make increase/decrease-start/stop-time not srt specific, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 53bad4a 149/389: Explain what moving does in general in comment, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 800d4b3 150/389: Return new start/stop time when adjusting, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 6122de0 151/389: Rename adjust-subtitle-start/stop-relative to adjust-subtitle-start/stop, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 06a4681 153/389: Adjusting functions return milliseconds moved, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed c7d3fcb 156/389: Add autoloading, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 20c70e8 160/389: Make more functions public, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed af2004c 172/389: subed-mode-enable: Add autoload cookie, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed a5d750d 162/389: Inser empty line after section header comment, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed e22f4b7 157/389: Make subed-srt-* functions private, ELPA Syncer, 2021/12/03