[elpa] externals/eev fc9ba324c5: Added better support for videos that have indexes.

[ELPA Syncer]

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

    Added better support for videos that have indexes.
---
 ChangeLog         |  5 +++++
 VERSION           |  4 ++--
 eev-tlinks.el     | 14 +++++++-------
 eev-videolinks.el | 24 ++++++++++++++++++++++--
 4 files changed, 36 insertions(+), 11 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d34f6786c4..4c2ad20167 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -3,6 +3,11 @@
        * eev-tlinks.el (ee-find-1stclassvideo-links): removed the "super
        technical things".
        (ee-let*-macro-1stclassvideo-c): added `hsubsinit'.
+       (ee-let*-macro-1stclassvideo-c, ee-find-1stclassvideo-links):
+       added `hasindex' and links to the index.
+
+       * eev-videolinks.el (ee-1stclassvideos-info): added ':index t' to
+       several entries.
 
 2024-02-04  Eduardo Ochs  <eduardoochs@gmail.com>
 
diff --git a/VERSION b/VERSION
index f5313531e9..4bf96203d2 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Mon Feb  5 14:51:00 GMT 2024
-Mon Feb  5 11:51:00 -03 2024
+Mon Feb  5 15:27:28 GMT 2024
+Mon Feb  5 12:27:28 -03 2024
diff --git a/eev-tlinks.el b/eev-tlinks.el
index db65397e34..127cb918a0 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3418,6 +3418,7 @@ This function is used by `ee-0x0-upload-region'."
          (comment   (ee-1stclassvideos-field c :comment))
          (lang      (ee-1stclassvideos-field c :lang))
          (exts      (ee-1stclassvideos-field c :subs))
+         (hasindex  (ee-1stclassvideos-field c :index))
          (mp4stem   (ee-1stclassvideos-mp4stem c))
           (mp4found  (ee-1stclassvideos-mp4found c))
          (hash      (ee-1stclassvideos-hash c))
@@ -3433,11 +3434,14 @@ This function is used by `ee-0x0-upload-region'."
   (ee-let*-macro-1stclassvideo-c
    c
    (let* ((hsubsurl (if hsubs (ee-template0 ";; HSubs: {hsubs}\n") ""))
+         (hsubs    (if hsubs
+                       (ee-template0 ";; HSubs: (find-{c}hsubs 
\"{subsinit}\")\n")
+                     ""))
          (lsubs    (if hassubs
                        (ee-template0 ";; LSubs: (find-{c}lsubs 
\"{subsinit}\")\n")
                      ""))
-         (hsubs    (if hsubs
-                       (ee-template0 ";; HSubs: (find-{c}hsubs 
\"{subsinit}\")\n")
+         (index    (if hasindex
+                       (ee-template0 ";; Index: (find-1stclassvideo-index 
\"{c}\")\n")
                      ""))
          (dlsubs   (ee-1stclassvideos-dlsubs c))
          )
@@ -3454,13 +3458,9 @@ This function is used by `ee-0x0-upload-region'."
 ;; Play:  (find-{c}video \"00:00\")
 {hsubs}\
 {lsubs}\
+{index}\
 ;; Info:  (find-1stclassvideo-links \"{c}\")
 ;;        (find-1stclassvideo-def   \"{c}\")
-;;
-;; Index: (find-1stclassvideoindex             \"{c}\")
-;;        http://anggtwu.net/.emacs.videos.html#{c}
-;;        (find-angg        \".emacs.videos\"    \"{c}\")
-;;        (find-angg-es-links)
 {dlsubs}\
 
 ;; See:
diff --git a/eev-videolinks.el b/eev-videolinks.el
index cc04186121..72fb851913 100644
--- a/eev-videolinks.el
+++ b/eev-videolinks.el
@@ -755,6 +755,7 @@ For more info on this particular video, run:
      :date    "2019nov02"
      :length  "19:21"
      :subs    ".vtt"
+     :index   t
      :comment "A good non-technical introduction to eev.")
     ;;
     ;; «eev2020»  (to ".eev2020")
@@ -769,6 +770,7 @@ For more info on this particular video, run:
      :date    "2020nov28"
      :length  "47:08"
      :subs    ".vtt"
+     :index   t
      :comment "A good technical introduction to eev.")
     ;;
     ;; «eev2021»  (to ".eev2021")
@@ -783,6 +785,7 @@ For more info on this particular video, run:
      :date    "2021nov21"
      :length  "6:04"
      :subs    ".vtt"
+     :index   t
      :comment "START BY THIS VIDEO!!!")
     ;;
     ;; «eev2021b»  (to ".eev2021b")
@@ -797,6 +800,7 @@ For more info on this particular video, run:
      :date    "2021nov28"
      :length  "8:11"
      :subs    ".vtt"
+     :index   t
      :comment "How I use test blocks (see above) in real life.")
     ;;
     ;; «eevnav»  (to ".eevnav")
@@ -811,6 +815,7 @@ For more info on this particular video, run:
      :date    "2020oct04"
      :length  "12:41"
      :subs    ".vtt"
+     :index   t
      :comment "If you are learning Emacs start by this video!")
     ;;
     ;; «eevtempl»  (to ".eevtempl")
@@ -825,7 +830,8 @@ For more info on this particular video, run:
      :date    "2020dec24"
      :length  "33:11"
      :subs    ".vtt"
-     :comment "")
+     :index   t
+     :comment "This is a follow-up to my presentation at the EmacsConf2020.")
     ;;
     ;; «eevfherel»  (to ".eevfherel")
     ;; Play: (find-eevfherelvideo "0:00")
@@ -837,6 +843,7 @@ For more info on this particular video, run:
      :page  "http://anggtwu.net/2020-find-here-links.html";
      :date    "2020dec26"
      :length  "24:08"
+     :index   t
      :comment "A badly-rehearsed tutorial on an advanced feature.")
     ;;
     ;; «eevtestbls»  (to ".eevtestbls")
@@ -849,6 +856,7 @@ For more info on this particular video, run:
      :page  "http://anggtwu.net/2021-test-blocks.html";
      :date    "2021jan24"
      :length  "4:45"
+     :index   t
      :comment "My first video on test blocks. Watch the video `eev2021' 
instead.")
     ;;
     ;; «eevvlinks»  (to ".eevvlinks")
@@ -861,6 +869,7 @@ For more info on this particular video, run:
      :page  "http://anggtwu.net/2021-video-links.html";
      :date    "2021may10"
      :length  "14:56"
+     :index   t
      :comment "A very good tutorial on how the `(find-*video)' links work.")
     ;;
     ;; «oficina20210»  (to ".oficina20210")
@@ -874,6 +883,7 @@ For more info on this particular video, run:
      :lang  "portuguese"
      :date    "2021sep05"
      :length  "1:27:01"
+     :index   t
      :comment "A (long) non-technical introduction to Free Software, Emacs, 
and eev.")
     ;;
     ;; «oficina2021a»  (to ".oficina2021a")
@@ -889,6 +899,7 @@ For more info on this particular video, run:
      :subs   ".vtt"
      :date    "2021nov05"
      :length  "14:58"
+     :index   t
      :comment "A very good introduction in Portuguese for beginners.")
     ;;
     ;; «oficina2021b»  (to ".oficina2021b")
@@ -927,6 +938,7 @@ For more info on this particular video, run:
      :date    "2021dec01"
      :length  "2:26"
      :subs    ".vtt"
+     :index   t
      :comment "An advanced video about (find-saving-links-intro).")
     ;;
     ;; «2021workshop2»  (to ".2021workshop2")
@@ -953,6 +965,7 @@ For more info on this particular video, run:
      :date    "2021dec03"
      :length  "18:22"
      :subs    ".vtt"
+     :index   t
      :comment "A video on \"saving links to everything interesting\".")
     ;;
     ;; «2021workshop4»  (to ".2021workshop4")
@@ -1018,6 +1031,7 @@ For more info on this particular video, run:
      :page  "http://anggtwu.net/2021-ffll.html";
      :date    "2021dec25"
      :length  "1:15:46"
+     :index   t
      :comment "A tutorial on a very advanced feature.")
     ;;
     ;; «2022eevmake0»  (to ".2022eevmake0")
@@ -1046,6 +1060,7 @@ For more info on this particular video, run:
      :date    "2022jan16"
      :length  "17:59"
      :subs    ".vtt"
+     :index   t
      :comment "A very good video on a very useful trick.")
     ;;
     ;; «2022findelispintro»  (to ".2022findelispintro")
@@ -1060,6 +1075,7 @@ For more info on this particular video, run:
      :date    "2022jan23"
      :length  "21:12"
      :subs    ".vtt"
+     :index   t
      :comment "A very good video on the design decisions behind 
`(find-elisp-intro)'.")
     ;;
     ;; «2022pict2elua»  (to ".2022pict2elua")
@@ -1074,6 +1090,7 @@ For more info on this particular video, run:
      :date    "2022apr18"
      :length  "8:13"
      :subs    ".vtt"
+     :index   t
      :comment "A very good demo of test blocks.")
     ;;
     ;; «2022eevwconfigpt1»  (to ".2022eevwconfigpt1")
@@ -1114,6 +1131,7 @@ For more info on this particular video, run:
      :date    "2022may15"
      :length  "1:15:48"
      :subs    ".vtt"
+     :index   t
      :comment "This is mainly for beginners who use Windows.")
     ;;
     ;; «2022yttranscript»  (to ".2022yttranscript")
@@ -1128,6 +1146,7 @@ For more info on this particular video, run:
      :date    "2022oct20"
      :length  "28:28"
      :subs    ".vtt"
+     :index   t
      :comment "A video about `find-yttranscript-links'.")
     ;;
     ;; «2022tikz»  (to ".2022tikz")
@@ -1140,8 +1159,9 @@ For more info on this particular video, run:
      :page  "http://anggtwu.net/eev-tikz.html";
      :hsubs "http://anggtwu.net/2022-eev-tikz.html#00:01";
      :date    "2022nov02"
-     :subs    ".vtt"
      :length  "1:36:27"
+     :subs    ".vtt"
+     :index   t
      :comment "A way to learn TikZ using examples from the manual.")
     ;;
     ;; «eev2022kla»  (to ".eev2022kla")