[nongnu] elpa/subed 0f3add7 141/389: Temporarily disable point-to-player syncing when adjusting time

[ELPA Syncer]

branch: elpa/subed
commit 0f3add70e2693acb5b09fb91c8258bf6a6006a28
Author: Random User <rndusr@posteo.de>
Commit: Random User <rndusr@posteo.de>

    Temporarily disable point-to-player syncing when adjusting time
    
    This seems to fix some race-condion-y or otherwise hard-to-debug false 
movement
    of point one subtitle backward or forward when moving subtitles.  Taking 
point
    motion control away from the player while it seeks to the new position 
seems to
    fix that.
---
 subed/subed-srt.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/subed/subed-srt.el b/subed/subed-srt.el
index 61a2d2b..372699e 100644
--- a/subed/subed-srt.el
+++ b/subed/subed-srt.el
@@ -298,6 +298,7 @@ Return point or nil if there is no previous subtitle."
 
 (defun subed-srt--adjust-subtitle-start-relative (msecs)
   "Add MSECS milliseconds to start time (use negative value to subtract)."
+  (subed-disable-sync-point-to-player-temporarily)
   (let* ((msecs-start (subed-srt--subtitle-msecs-start))
          (msecs-new (when msecs-start (+ msecs-start msecs))))
     (when msecs-new
@@ -309,6 +310,7 @@ Return point or nil if there is no previous subtitle."
 
 (defun subed-srt--adjust-subtitle-stop-relative (msecs)
   "Add MSECS milliseconds to stop time (use negative value to subtract)."
+  (subed-disable-sync-point-to-player-temporarily)
   (let* ((msecs-stop (subed-srt--subtitle-msecs-stop))
          (msecs-new (when msecs-stop (+ msecs-stop msecs))))
     (when msecs-new