[elpa] externals/eev 9019554599: Added `find-2022eevwconfigvideo'.

[ELPA Syncer]

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

    Added `find-2022eevwconfigvideo'.
---
 ChangeLog         | 13 +++++++++++++
 VERSION           |  4 ++--
 eev-audiovideo.el |  2 +-
 eev-elinks.el     |  4 ++++
 eev-tlinks.el     |  2 +-
 eev-videolinks.el | 27 ++++++++++++++++++++++++++-
 eev-wconfig.el    | 47 +++++++++++++++++++++++++++++++++++++++++------
 eev.el            |  2 +-
 8 files changed, 89 insertions(+), 12 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6b76169691..d57e745212 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,16 @@
+2022-05-18  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-audiovideo.el (ee-time-to-youtube-time): fixed a bug.
+
+2022-05-15  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (find-2022eevwconfigvideo): new function.
+       (ee-1stclassvideos-info): added an entry for "2022eevwconfig".
+
+2022-05-14  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-elinks.el (find-eface-links): added some items.
+
 2022-05-12  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eev-videolinks.el (find-eev2019video, find-eev2020video)
diff --git a/VERSION b/VERSION
index 93b8cd4a69..abb38c22af 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Thu May 12 07:56:36 GMT 2022
-Thu May 12 04:56:36 -03 2022
+Wed May 18 06:39:49 GMT 2022
+Wed May 18 03:39:49 -03 2022
diff --git a/eev-audiovideo.el b/eev-audiovideo.el
index 0ebdd94e28..aa0cd96aa6 100644
--- a/eev-audiovideo.el
+++ b/eev-audiovideo.el
@@ -255,7 +255,7 @@ default is \"#\", but in some situations we need \"&\" 
instead."
           (format "%st=%sm%ss" c (match-string 1 str) (match-string 2 str)))
           ((string-match "^\\([0-9]+\\):\\([0-9][0-9]\\):\\([0-9][0-9]\\)$" 
str)
           (format "%st=%sh%sm%ss" c (match-string 1 str) (match-string 2 str)
-                  (match-string 2 str))))))
+                  (match-string 3 str))))))
 
 ;; Tests: (ee-time-to-arg "")
 ;;        (ee-time-to-arg nil)
diff --git a/eev-elinks.el b/eev-elinks.el
index a5bf30db5a..dc93a2eade 100644
--- a/eev-elinks.el
+++ b/eev-elinks.el
@@ -1113,6 +1113,7 @@ means."
        (find-efacedescr     ',face-symbol)
        (find-efaces         ',face-symbol)
        (find-eface          ',face-symbol)
+       (describe-face       ',face-symbol)
        (customize-face      ',face-symbol)
        (set-face-foreground ',face-symbol ,fg)
        (set-face-background ',face-symbol ,bg)
@@ -1121,6 +1122,9 @@ means."
        (find-ecolor-links ,bg)
        (find-ecolors)
        ""
+       (face-all-attributes ',face-symbol (selected-frame))
+       (find-epp (face-all-attributes ',face-symbol (selected-frame)))
+       ""
        (face-id ',face-symbol)
        (find-epp (mapcar (lambda (face) (cons (face-id face) face)) 
(face-list)))
        )
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 649742b595..d1b3e00a6c 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3213,7 +3213,7 @@ This function is used by `ee-0x0-upload-region'."
 For more info on this particular video, run:
   (find-1stclassvideo-links \\\"{c}\\\")\"
   (interactive)
-  (find-eev-video \"{mp4stem}\" \"{hash}\" time))
+  (find-1stclassvideo-video \"{c}\" time))
 "))
 
 ;; Tests: (ee-1stclassvideos-dlsubs "2022pict2elua")
diff --git a/eev-videolinks.el b/eev-videolinks.el
index 260224f82b..0a89c3b36e 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:    20220512
+;; Version:    20220518
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el>
@@ -66,6 +66,7 @@
 ;;   «.find-2022pict2eluavideo»                (to "find-2022pict2eluavideo")
 ;;   «.find-2022eevwconfigpt1video»    (to "find-2022eevwconfigpt1video")
 ;;   «.find-2022eevwconfigpt2video»    (to "find-2022eevwconfigpt2video")
+;;   «.find-2022eevwconfigvideo»       (to "find-2022eevwconfigvideo")
 ;; «.more-info»                                (to "more-info")
 ;; «.ee-1stclassvideos-info»           (to "ee-1stclassvideos-info")
 ;;   «.eev2019»                                (to "eev2019")
@@ -94,6 +95,7 @@
 ;;   «.2022pict2elua»                  (to "2022pict2elua")
 ;;   «.2022eevwconfigpt1»              (to "2022eevwconfigpt1")
 ;;   «.2022eevwconfigpt2»              (to "2022eevwconfigpt2")
+;;   «.2022eevwconfig»                 (to "2022eevwconfig")
 ;; «.ee-1stclassvideos-field»          (to "ee-1stclassvideos-field")
 ;; «.second-class-videos»              (to "second-class-videos")
 ;;   «.code-eevvideo»                  (to "code-eevvideo")
@@ -594,6 +596,16 @@ For more info on this particular video, run:
   (interactive)
   (find-1stclassvideo-video "2022eevwconfigpt2" time))
 
+;; «find-2022eevwconfigvideo»  (to ".find-2022eevwconfigvideo")
+;; Info: (find-1stclassvideo-links "2022eevwconfig")
+;; Play: (find-2022eevwconfigvideo "0:00")
+(defun find-2022eevwconfigvideo (&optional time &rest rest)
+  "Play one of the first-class videos of eev starting at TIME.
+For more info on this particular video, run:
+  (find-1stclassvideo-links \"2022eevwconfig\")"
+  (interactive)
+  (find-1stclassvideo-video "2022eevwconfig" time))
+
 
 
 
@@ -957,6 +969,19 @@ For more info on this particular video, run:
      :length  "46:00"
      :comment "A video in Portuguese about eev-wconfig.el - second part.")
     ;;
+    ;; «2022eevwconfig»  (to ".2022eevwconfig")
+    ;; Play: (find-2022eevwconfigvideo "0:00")
+    ;; Index: (find-1stclassvideoindex "2022eevwconfig")
+    ("2022eevwconfig"
+     :title "Eev-config.el: a way without \"magic\" to configure eev on M$ 
Windows"
+     :mp4   "http://angg.twu.net/eev-videos/2022-eev-wconfig.mp4";
+     :yt    "http://www.youtube.com/watch?v=Rm29XSdGCXw";
+     :page  "http://angg.twu.net/eev-wconfig.html";
+     :date    "2022may15"
+     :length  "1:15:48"
+     :subs    ".vtt"
+     :comment "This is mainly for beginners who use Windows.")
+    ;;
     ))
 
 
diff --git a/eev-wconfig.el b/eev-wconfig.el
index a705ad93c4..113d318a26 100644
--- a/eev-wconfig.el
+++ b/eev-wconfig.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20220501
+;; Version:    20220516
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-wconfig.el>
@@ -47,6 +47,7 @@
 ;;   (find-psne-intro "1. Local copies of files from the internet" "wget")
 ;;   (find-video-links-intro "1. Introduction")
 ;;   (find-video-links-intro "1. Introduction" "[Video links:]")
+;;   (find-video-links-intro "5.1. Subtitles")
 ;;   (find-audiovideo-intro "4.3. A demo")
 ;;   (find-audiovideo-intro "4.3. A demo" "mpv")
 ;;   (find-pdf-like-intro "3. Hyperlinks to PDF files")
@@ -72,9 +73,13 @@
 ;;     "Any sufficiently advanced technology
 ;;      is indistinguishable from magic"
 ;;
-;; Here I will use the term "magic" as a shorthand for "black box".
-;; A black box that is hard to open, and hard to look inside, is an
-;; "advanced technology that is indistinguishable from magic".
+;; Here I will use the term "magic" as a shorthand for a "sufficiently
+;; advanced technology", i.e., something complex and non-obvious,
+;; "that is indistinguishable from magic", in the sense of being
+;; almost impossible to understand. I will also use "black box" as a
+;; near-synonym for "magic"; "black box" has more letters than
+;; "magic", but it invites us to use expressions like "opening the
+;; black box".
 ;;
 ;; In dec/2021 I recorded a video, called "Org for Non-Users",
 ;;
@@ -199,6 +204,11 @@
 
 (find-wconfig-magic-links)
 
+
+;; Exercise: Learn Org!
+
+(find-wconfig-exercises-links)
+
 ")
        )
      pos-spec-list)))
@@ -883,16 +893,41 @@ See the variable `ee-wconfig-magic-code'."
        (find-efunction 'find-wconfig-exercises-links)
        ""
        ,(ee-template0 "\
+;; Exercise: learn Org!
+;; See: http://angg.twu.net/eev-wconfig.html
+;;      http://angg.twu.net/eev-wconfig.html#learn-org
+
+
 ;; 1. Understand `code-c-d'
 ;; ========================
+;; (find-eev-quick-intro \"9. Shorter hyperlinks\")
+;; (find-eev-quick-intro \"9. Shorter hyperlinks\" \"[Video links:]\")
+;; (find-eev-quick-intro \"9.1. `code-c-d'\")
 
 ;; 2. Download the .zip
+;; ====================
+;; From:
+;;   http://angg.twu.net/eev-wconfig.html#learn-org
+;; and unpack it.
+
+;; 3. Create a link to the directory
+;; =================================
+;; Something like:
+;;   (find-fline \"C:/I/unpacked/the/videos/here/\")
+;; This may help:
+;;   (find-enode \"Dired\")
 
 ;; 3. Understand `M-h M-e'
 ;; =======================
+;; See: (find-audiovideo-intro \"4.1. `find-extra-file-links'\")
+;; and use that to create links like these:
+
+(code-c-d \"rainerkoenig\" \"C:/I/unpacked/the/videos/here/\")
+;; (find-rainerkoenigfile \"\")
+(code-video \"E02S01video\" \".../OrgMode_E02S01_-_Tags-GcUVvlClo9k.webm\")
+;; (find-E02S01video \"0:00\")
+
 
-;; Exercise: learn Org!
-;; See: http://angg.twu.net/eev-wconfig.el#learn-org
 
 ")
        )
diff --git a/eev.el b/eev.el
index 83252aeda1..fedbbd3443 100644
--- a/eev.el
+++ b/eev.el
@@ -6,7 +6,7 @@
 ;; Package-Requires: ((emacs "24.4"))
 ;; Keywords: lisp e-scripts
 ;; URL: http://angg.twu.net/#eev
-;; Version: 20220416
+;; Version: 20220518
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by