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

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

[elpa] externals/eev baa25581c2: Added the section "5.1. Subtitles" to `


From: ELPA Syncer
Subject: [elpa] externals/eev baa25581c2: Added the section "5.1. Subtitles" to `(find-video-links-intro)'.
Date: Mon, 2 May 2022 05:57:32 -0400 (EDT)

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

    Added the section "5.1. Subtitles" to `(find-video-links-intro)'.
---
 ChangeLog         |  6 ++++++
 VERSION           |  4 ++--
 eev-intro.el      | 50 +++++++++++++++++++++++++++++++++++++++++++++++++-
 eev-tlinks.el     |  1 +
 eev-videolinks.el |  3 ++-
 5 files changed, 60 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index bb0c54f4b2..6aef55c237 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
 2022-05-02  Eduardo Ochs  <eduardoochs@gmail.com>
 
+       * eev-intro.el (find-video-links-intro): new section: "5.1.
+       Subtitles".
+
+       * eev-videolinks.el (ee-1stclassvideos-info): indicate that the
+       video "2022findelispintro" has subtitles.
+
        * eev-blinks.el (find-customizeoption): new function.
        (find-customizevariable): new function.
        (find-customizeapropos): new function.
diff --git a/VERSION b/VERSION
index 0008e3c485..f77b848ca5 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Mon May  2 04:14:55 GMT 2022
-Mon May  2 01:14:55 -03 2022
+Mon May  2 09:27:35 GMT 2022
+Mon May  2 06:27:35 -03 2022
diff --git a/eev-intro.el b/eev-intro.el
index 07d7d43c25..207197d412 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -11516,6 +11516,52 @@ The local copy will be played with Mpv, with:
 
 
 
+5.1. Subtitles
+--------------
+Some video have subtitles. If you run this sexp
+
+  (find-wgeteevsubtitles-links \"2022-pict2e-lua\" \".vtt\")
+
+it will create a temporary buffer with this eepitch block:
+
+ (eepitch-shell2)
+ (eepitch-kill)
+ (eepitch-shell2)
+  mkdir -p $S/http/angg.twu.net/eev-videos/
+  cd       $S/http/angg.twu.net/eev-videos/
+  wget -nc  http://angg.twu.net/eev-videos/2022-pict2e-lua.mp4
+  wget -N   http://angg.twu.net/eev-videos/2022-pict2e-lua.vtt
+
+The \"-nc\" says to wget that if the .mp4 (the video) is already
+downloaded then it shouldn't try to download it again; the \"-N\" says
+to wget that if the version of the .vtt (the subtitles) at
+angg.twu.net is newer than the local copy then wget should download
+the newer version, and replace the local copy with the newer version.
+
+When a video has subtitles its `find-1stclassvideo-links' page
+contains a section titled \"Download subtitles:\". Compare:
+
+  (find-1stclassvideo-links \"2022pict2elua\")
+  (find-1stclassvideo-links \"2021workshop6\")
+
+The video \"2022pict2elua\" has subtitles, and \"2021workshop6\" doesn't.
+
+When both the .mp4 and .vtt files are present mpv plays the local copy
+with subtitles. Try:
+
+  (find-video \"$S/http/angg.twu.net/eev-videos/2022-pict2e-lua.mp4\")
+  (find-fline \"$S/http/angg.twu.net/eev-videos/\" \"2022-pict2e-lua\")
+  (find-2022pict2eluavideo \"7:12\")
+
+The process of downloading or updating subtitles is not well
+integrated in the rest of eev yet, and at this moment the \"right\" way
+to download subtitles is with `find-1stclassvideo-links' and with the
+link in its \"Download subtitles\" section.
+
+
+
+
+
 6. Configuring Mpv
 ==================
 After installing Mpv you may have to configure its path. On
@@ -11671,7 +11717,9 @@ videos is by running `M-x find-1stclassvideos', or:
 
 That function displays a temporary buffer with a list of all
 first-class videos, with a `find-1stclassvideo-links' sexp for
-each one.
+each one. Here is a screenshot:
+
+  http://angg.twu.net/IMAGES/2022find-1stclassvideos.png
 
 
 
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 3c8e3d4d48..16ddf5e7b4 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -1941,6 +1941,7 @@ http://angg.twu.net/ are newer than the local copy."
      `((find-wgeteevsubtitles-links ,stem ,exts ,@pos-spec-list)
        ;; Convention: the first sexp always regenerates the buffer.
        (find-efunction 'find-wgeteevsubtitles-links)
+       (find-video-links-intro "5.1. Subtitles")
        ""
        ,(ee-template0 "\
  (eepitch-shell2)
diff --git a/eev-videolinks.el b/eev-videolinks.el
index 497be53dc1..3328f40608 100644
--- a/eev-videolinks.el
+++ b/eev-videolinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20220501
+;; Version:    20220502
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el>
@@ -874,6 +874,7 @@ For more info on this particular video, run:
      :page  "http://angg.twu.net/find-elisp-intro.html";
      :date    "2022jan23"
      :length  "21:12"
+     :subs    ".vtt"
      :comment "A very good video on the design decisions behind 
`(find-elisp-intro)'.")
     ;;
     ;; «2022pict2elua»  (to ".2022pict2elua")



reply via email to

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