branch: externals/eev commit d9ea4aa72711d5496f5abd5f8098ad99eadd1322 Author: Eduardo Ochs <eduardoo...@gmail.com> Commit: Eduardo Ochs <eduardoo...@gmail.com>
Added find-2022eevwconfigpt1video and find-2022eevwconfigpt2video. --- ChangeLog | 7 +++++++ VERSION | 4 ++-- eev-intro.el | 4 +++- eev-videolinks.el | 52 +++++++++++++++++++++++++++++++++++++++++++++++++++- eev-wconfig.el | 13 +++++++++++-- 5 files changed, 74 insertions(+), 6 deletions(-) diff --git a/ChangeLog b/ChangeLog index 6aef55c237..9f5d40e77e 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2022-05-05 Eduardo Ochs <eduardoo...@gmail.com> + + * eev-videolinks.el (find-2022eevwconfigpt1video) + (find-2022eevwconfigpt2video): new functions. + (ee-1stclassvideos-info): added entries for "2022eevwconfigpt1" + and "2022eevwconfigpt2". + 2022-05-02 Eduardo Ochs <eduardoo...@gmail.com> * eev-intro.el (find-video-links-intro): new section: "5.1. diff --git a/VERSION b/VERSION index f77b848ca5..2306878839 100644 --- a/VERSION +++ b/VERSION @@ -1,2 +1,2 @@ -Mon May 2 09:27:35 GMT 2022 -Mon May 2 06:27:35 -03 2022 +Fri May 6 01:14:21 GMT 2022 +Thu May 5 22:14:21 -03 2022 diff --git a/eev-intro.el b/eev-intro.el index 207197d412..a9ccc29bb8 100644 --- a/eev-intro.el +++ b/eev-intro.el @@ -13644,7 +13644,7 @@ rewrite lots of things. This is my N-th attempt to rewrite this tutorial. -Version of these instructions: 2021nov13. +Version of these instructions: 2022may03. @@ -13758,6 +13758,7 @@ There's a video about these basic steps here: \"How to install eev with M-x list-packages and how to navigate its tutorials\" http://angg.twu.net/eev-videos/2020-list-packages-eev-nav.mp4 http://angg.twu.net/2020-list-packages-eev-nav.html + http://angg.twu.net/.emacs.videos.html#eevnav http://www.youtube.com/watch?v=kxBjiUo88_U @@ -14809,6 +14810,7 @@ This tutorial here is what I would have liked to have had access to when I started learning Emacs Lisp. The ideas behind the style of this tutorial are explained here: http://angg.twu.net/find-elisp-intro.html + (find-1stclassvideo-links \"2022findelispintro\") TODO: integrate this with these older intros: (find-eval-intro) diff --git a/eev-videolinks.el b/eev-videolinks.el index 3328f40608..a6e8baf0f9 100644 --- a/eev-videolinks.el +++ b/eev-videolinks.el @@ -19,7 +19,7 @@ ;; ;; Author: Eduardo Ochs <eduardoo...@gmail.com> ;; Maintainer: Eduardo Ochs <eduardoo...@gmail.com> -;; Version: 20220502 +;; Version: 20220505 ;; Keywords: e-scripts ;; ;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el> @@ -64,6 +64,8 @@ ;; «.find-2022findeevanggvideo» (to "find-2022findeevanggvideo") ;; «.find-2022findelispintrovideo» (to "find-2022findelispintrovideo") ;; «.find-2022pict2eluavideo» (to "find-2022pict2eluavideo") +;; «.find-2022eevwconfigpt1video» (to "find-2022eevwconfigpt1video") +;; «.find-2022eevwconfigpt2video» (to "find-2022eevwconfigpt2video") ;; «.more-info» (to "more-info") ;; «.ee-1stclassvideos-info» (to "ee-1stclassvideos-info") ;; «.eev2019» (to "eev2019") @@ -90,6 +92,8 @@ ;; «.2022findeevangg» (to "2022findeevangg") ;; «.2022findelispintro» (to "2022findelispintro") ;; «.2022pict2elua» (to "2022pict2elua") +;; «.2022eevwconfigpt1» (to "2022eevwconfigpt1") +;; «.2022eevwconfigpt2» (to "2022eevwconfigpt2") ;; «.ee-1stclassvideos-field» (to "ee-1stclassvideos-field") ;; «.second-class-videos» (to "second-class-videos") ;; «.code-eevvideo» (to "code-eevvideo") @@ -561,6 +565,26 @@ For more info on this particular video, run: (interactive) (find-eev-video "2022-pict2e-lua" "hiHsUhGVLGM" time)) +;; «find-2022eevwconfigpt1video» (to ".find-2022eevwconfigpt1video") +;; Info: (find-1stclassvideo-links "2022eevwconfigpt1") +;; Play: (find-2022eevwconfigpt1video "0:00") +(defun find-2022eevwconfigpt1video (&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 \"2022eevwconfigpt1\")" + (interactive) + (find-eev-video "2022-eev-wconfig-pt-1" "bdLbocmo3r8" time)) + +;; «find-2022eevwconfigpt2video» (to ".find-2022eevwconfigpt2video") +;; Info: (find-1stclassvideo-links "2022eevwconfigpt2") +;; Play: (find-2022eevwconfigpt2video "0:00") +(defun find-2022eevwconfigpt2video (&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 \"2022eevwconfigpt2\")" + (interactive) + (find-eev-video "2022-eev-wconfig-pt-2" "ZAAxrJX-Am8" time)) + @@ -890,6 +914,32 @@ For more info on this particular video, run: :subs ".vtt" :comment "A very good demo of test blocks.") ;; + ;; «2022eevwconfigpt1» (to ".2022eevwconfigpt1") + ;; Play: (find-2022eevwconfigpt1video "0:00") + ;; Index: (find-1stclassvideoindex "2022eevwconfigpt1") + ("2022eevwconfigpt1" + :title "Configuração sem mágica: um experimento com o eev (versão em Português)" + :mp4 "http://angg.twu.net/eev-videos/2022-eev-wconfig-pt-1.mp4" + :yt "http://www.youtube.com/watch?v=bdLbocmo3r8" + :page "http://angg.twu.net/eev-wconfig.html" + :lang "portuguese" + :date "2022may02" + :length "29:20" + :comment "A video in Portuguese about eev-wconfig.el.") + ;; + ;; «2022eevwconfigpt2» (to ".2022eevwconfigpt2") + ;; Play: (find-2022eevwconfigpt2video "0:00") + ;; Index: (find-1stclassvideoindex "2022eevwconfigpt2") + ("2022eevwconfigpt2" + :title "Configuração sem mágica: um experimento com o eev (versão em Português, parte 2)" + :mp4 "http://angg.twu.net/eev-videos/2022-eev-wconfig-pt-2.mp4" + :yt "http://www.youtube.com/watch?v=ZAAxrJX-Am8" + :page "http://angg.twu.net/eev-wconfig.html" + :lang "portuguese" + :date "2022may02" + :length "46:00" + :comment "A video in Portuguese about eev-wconfig.el - second part.") + ;; )) diff --git a/eev-wconfig.el b/eev-wconfig.el index 414a924d1e..240cf4cebc 100644 --- a/eev-wconfig.el +++ b/eev-wconfig.el @@ -221,6 +221,7 @@ 'find-elinks-elisp `((find-wconfig-browser-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-browser-links) "" ,(ee-template0 "\ @@ -303,6 +304,7 @@ 'find-elinks-elisp `((find-wconfig-wget-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-wget-links) "" ,(ee-template0 "\ @@ -470,6 +472,7 @@ cd ~/eev-wconfig/ 'find-elinks-elisp `((find-wconfig-shell-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-shell-links) "" ,(ee-template0 "\ @@ -581,6 +584,7 @@ wget --version 'find-elinks-elisp `((find-wconfig-lua-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-lua-links) "" ,(ee-template0 "\ @@ -668,6 +672,7 @@ for k,v in pairs(_G) do print(k) end 'find-elinks-elisp `((find-wconfig-mpv-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-mpv-links) "" ,(ee-template0 "\ @@ -704,12 +709,15 @@ for k,v in pairs(_G) do print(k) end ;; (find-video \"~/eev-wconfig/2022dragABC.mp4\" -;; 3. Saving... +;; 3. Saving +;; ========= +;; This is similar to: (find-wconfig-browser-links 2 \"4. Save\") +;; Save the block below - including the comment - to your ~/.emacs: +;; See: (find-wconfig-mpv-links) (setq ee-mpv-program \"{ee-mpv-program}\") - ") ) pos-spec-list))) @@ -736,6 +744,7 @@ for k,v in pairs(_G) do print(k) end 'find-elinks-elisp `((find-wconfig-magic-links ,@pos-spec-list) ;; Convention: the first sexp always regenerates the buffer. + (find-wconfig-links) (find-efunction 'find-wconfig-magic-links) "" ,(ee-template0 "\