[elpa] externals/eev 97288160f3 2/2: Added an "LSubs:" line after "Play:" in find-1stclassvideo-links.

[ELPA Syncer]

branch: externals/eev
commit 97288160f3077b3acfa966bbb10b436a5cda5950
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>

    Added an "LSubs:" line after "Play:" in find-1stclassvideo-links.
---
 ChangeLog     | 5 +++++
 VERSION       | 4 ++--
 eev-tlinks.el | 8 ++++++--
 3 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 1d3fc708f1..f41a9b0c39 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2024-01-07  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-tlinks.el (ee-find-1stclassvideo-links): added an "LSubs:"
+       line after "Play:".
+
 2024-01-06  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eev-tlinks.el (ee-find-1stclassvideo-do-with-c): new macro.
diff --git a/VERSION b/VERSION
index 084b49aa33..a4f3460d61 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Sun Jan  7 06:18:41 GMT 2024
-Sun Jan  7 03:18:41 -03 2024
+Sun Jan  7 06:30:21 GMT 2024
+Sun Jan  7 03:30:21 -03 2024
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 5257cdee4d..99ef872459 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3368,7 +3368,10 @@ This function is used by `ee-0x0-upload-region'."
   "An internal function used by `find-1stclassvideo-links'."
   (ee-find-1stclassvideo-do-with-c
    c
-   (let* ((dlsubs   (ee-1stclassvideos-dlsubs c))
+   (let* ((lsubs    (if hassubs
+                       (ee-template0 ";; LSubs: (find-{c}lsubs \"00:00\")\n")
+                     ""))
+         (dlsubs   (ee-1stclassvideos-dlsubs c))
          (defun    (ee-find-1stclassvideo-defun c mp4stem hash)))
      (ee-template0 "\
 ;; Title: {title}
@@ -3379,7 +3382,8 @@ This function is used by `ee-0x0-upload-region'."
 ;; Date:    {date}
 ;; Length:  {length}
 ;;
-;; Play:  (find-{c}video \"0:00\")
+;; Play:  (find-{c}video \"00:00\")
+{lsubs}\
 ;; Info:  (find-1stclassvideodef        \"{c}\")
 ;;        (find-eev \"eev-videolinks.el\" \"{c}\")
 ;;            (find-1stclassvideo-links \"{c}\")