emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/subed 961e5eb 343/389: More subed-vtt fixes: require subed


From: ELPA Syncer
Subject: [nongnu] elpa/subed 961e5eb 343/389: More subed-vtt fixes: require subed-vtt, validate better
Date: Fri, 3 Dec 2021 11:00:54 -0500 (EST)

branch: elpa/subed
commit 961e5eb280f2066697ff29337d3a5c46ead3177c
Author: Sacha Chua <sacha@sachachua.com>
Commit: Random User <rndusr@posteo.de>

    More subed-vtt fixes: require subed-vtt, validate better
    
    * subed/subed-vtt.el (subed-vtt--validate): Look for timestamps.
    * subed/subed.el: Load subed-vtt.
---
 subed/subed-vtt.el | 3 +--
 subed/subed.el     | 1 +
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/subed/subed-vtt.el b/subed/subed-vtt.el
index 20e30ea..76db4d7 100644
--- a/subed/subed-vtt.el
+++ b/subed/subed-vtt.el
@@ -483,8 +483,7 @@ Return new point."
       (save-match-data
         (let ((orig-point (point)))
           (goto-char (point-min))
-          (while (and (re-search-forward (format "\\(%s[[^\\']]\\|\\`\\)" 
subed-vtt--regexp-separator) nil t)
-                      (looking-at "[[:alnum:]]"))
+          (while (and (re-search-forward (format "\\(%s[[^\\']]\\|\\`\\)%s" 
subed-vtt--regexp-separator subed-vtt--regexp-timestamp) nil t) (goto-char 
(match-beginning 2)))
             ;; This regex is stricter than `subed-vtt--regexp-timestamp'
             (unless (looking-at 
"^[0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\}\\.[0-9]\\{3\\}")
               (error "Found invalid start time: %S"  (substring (or 
(thing-at-point 'line :no-properties) "\n") 0 -1)))
diff --git a/subed/subed.el b/subed/subed.el
index 738597a..43a1e1d 100644
--- a/subed/subed.el
+++ b/subed/subed.el
@@ -36,6 +36,7 @@
 (require 'subed-debug)
 (require 'subed-common)
 (require 'subed-srt)
+(require 'subed-vtt)
 (require 'subed-mpv)
 
 (setq subed-mode-map



reply via email to

[Prev in Thread] Current Thread [Next in Thread]