[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eev 3306431 1/2: Several new sections in (find-eev-exer
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/eev 3306431 1/2: Several new sections in (find-eev-exercises-intro). |
|
Date: |
Sat, 4 Dec 2021 04:57:20 -0500 (EST) |
branch: externals/eev
commit 3306431c6ceff08d8db708a2f6614be7ab472b3a
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>
Several new sections in (find-eev-exercises-intro).
---
ChangeLog | 14 ++
VERSION | 4 +-
eev-compose-hash.el | 2 +-
eev-intro.el | 387 ++++++++++++++++++++++++++++++++++++----------------
eev-tlinks.el | 29 +++-
eev-videolinks.el | 149 +++++++++++++++++++-
6 files changed, 455 insertions(+), 130 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 63e6bee..5ca2804 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,19 @@
+2021-12-04 Eduardo Ochs <eduardoochs@gmail.com>
+
+ * eev-videolinks.el (find-2021workshop4video)
+ (find-2021workshop5video, find-2021workshop6video): new functions.
+
+ * eev-intro.el (find-eev-exercises-intro): several new sections.
+
+2021-12-03 Eduardo Ochs <eduardoochs@gmail.com>
+
+ * eev-videolinks.el (find-2021workshop2video)
+ (find-2021workshop3video): new functions.
+
2021-12-01 Eduardo Ochs <eduardoochs@gmail.com>
+ * eev-videolinks.el (find-2021workshop1video): new function.
+
* eev-intro.el (find-eev-exercises-intro): rewritten.
2021-11-28 Eduardo Ochs <eduardoochs@gmail.com>
diff --git a/VERSION b/VERSION
index fc366eb..ca2a1ee 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Wed Dec 1 06:27:08 GMT 2021
-Wed Dec 1 03:27:08 -03 2021
+Sat Dec 4 09:26:21 GMT 2021
+Sat Dec 4 06:26:21 -03 2021
diff --git a/eev-compose-hash.el b/eev-compose-hash.el
index 08f27df..567e5f4 100644
--- a/eev-compose-hash.el
+++ b/eev-compose-hash.el
@@ -438,7 +438,7 @@ instead of inserting."
⇐ <= \\Leftarrow
⇒ => \\funto
⇔ LR \\Leftrightarrow
- ⇝ s> \\squigglyarrow
+ ⇝ s> \\rightsquigarrow
∀ fa \\forall
∂ Pa \\partial
∃ ex \\exists
diff --git a/eev-intro.el b/eev-intro.el
index 2f173c4..d7d3e54 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20211130
+;; Version: 20211204
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-intro.el>
@@ -10463,8 +10463,9 @@ They contain links like these,
that are \"short links to eev video tutorials\". These functions
with names like `find-eev*video' are _sort of_ expanded to
functions that specify explicitly which video on youtube to play,
-or where is the file with the local copy of that video. For the
-general idea of how this expansion is implemented, see:
+and where the local copy of the video can be found if we prefer
+to play the local copy. For the general idea of how this
+expansion is implemented, see:
(find-eev-quick-intro \"9. Shorter hyperlinks\")
(find-eev-quick-intro \"9.1. `code-c-d'\")
@@ -13303,10 +13304,16 @@ this:
\(Re)generate: (find-eev-exercises-intro)
Source code: (find-efunction 'find-eev-exercises-intro)
More intros: (find-eev-quick-intro)
+ (find-here-links-intro)
+ (find-refining-intro)
+ (find-escripts-intro)
(find-eev-intro)
(find-eepitch-intro)
This buffer is _temporary_ and _editable_.
It is meant as both a tutorial and a sandbox.
+The quickest way to open or recreate this is with `M-x ex',
+but you will need to run this:
+ (defun ex () (interactive) (find-eev-exercises-intro))
@@ -13400,18 +13407,28 @@ I will suppose:
(find-refining-intro)
(find-refining-intro \"1. Pos-spec-lists\")
-
-..and just that. The previous workshop that I gave required
-installing external programs, but this one will not be like that.
-For more info on that previous workshop, see:
+The prerequisites are just the ones above. The previous workshop
+that I gave required installing external programs, but this one
+will not be like that. For more info on that previous workshop,
+see:
http://angg.twu.net/2021-workshop.html#november
+
1. The base cases
=================
+Watch this video first:
+
+ [Video links:]
+ (find-2021workshop1video \"0:22\" \"The base case 1 is described here\")
+ (find-2021workshop1video \"0:52\" \"The instructions are here\")
+ (find-2021workshop1video \"1:24\" \"The base case 2\")
+ (find-2021workshop1video \"1:39\" \"What I need to do is slightly\")
+ (find-2021workshop1video \"1:55\" \"This is not yet the link that I
want\")
+
1.1. The base case 1
--------------------
@@ -13459,6 +13476,11 @@ or:
create / select / copy / go back
+[Video links:]
+ (find-2021workshop1video \"0:22\" \"The base case 1 is described here\")
+ (find-2021workshop1video \"0:52\" \"The instructions are here\")
+
+
@@ -13492,11 +13514,11 @@ The diagram will be this one,
_______________ _____________________ ________________
| | | | | | |
- | | | | elinks | | |
- | | | | buffer | | |
- | | | | M-hy :: | | |
- | target | M-h M-3 | target |______::__| M-h M-1 | target |
- | buffer | ------> | buffer | \\/ | ------> | buffer |
+ | | | target | elinks | | |
+ | | | buffer | buffer | | |
+ | | | M-w | M-hy :: | | |
+ | target | M-h M-3 | |______::__| M-h M-1 | target |
+ | buffer | ------> | | \\/ | ------> | buffer |
| | | | | | buffer |
| | | | notes | | |
| | | | buffer | | |
@@ -13511,162 +13533,173 @@ an abbreviation for `M-h M-y' at some point; the
placement of the
(find-refining-intro \"2. Refining hyperlinks\")
(find-refining-intro \"2. Refining hyperlinks\" \"M-h M-y\")
+[Video links:]
+ (find-2021workshop1video \"1:24\" \"The base case 2\")
+ (find-2021workshop1video \"1:39\" \"What I need to do is slightly\")
+ (find-2021workshop1video \"1:55\" \"This is not yet the link that I want\")
+1.3. The base case 3
+--------------------
+The base case 3 will only make sense to people who understand
+anchors, short hyperlinks and anchors, using `M-1 M-h M-w' to
+copy the preceding tag to the kill ring, and using `M-h M--' to
+shrink a hyperlink to make it point to an anchor. You can learn
+these extra prerequisites here:
+ (find-eev-quick-intro \"8. Anchors\")
+ (find-eev-quick-intro \"8.1. Introduction: `to'\")
+ (find-eev-quick-intro \"8.5. Hyperlinks to anchors in other files\")
+ (find-eev-quick-intro \"9. Shorter hyperlinks\")
+ (find-eev-quick-intro \"9.1. `code-c-d'\")
+ (find-eev-quick-intro \"9.2. Extra arguments to `code-c-d'\")
+ (find-eev-quick-intro \"9.2. Extra arguments to `code-c-d'\" \":anchor\")
+ (find-eev-quick-intro \"9.2. Extra arguments to `code-c-d'\" \":anchor\"
\"3)\")
+ (find-anchors-intro \"2. Shrinking\")
+ (find-anchors-intro \"3. The preceding tag\")
- (find-here-links-intro \"4. `find-here-links-3'\")
- (find-here-links-intro \"5. `find-here-links-1'\")
- (find-here-links-intro \"5. `find-here-links-1'\" \"eevfherel\")
+ _______________ _____________________ ________________
+ | | | | | | |
+ | | | target | elinks | | |
+ | | | buffer | buffer | | |
+ | target | | M-1hw | M-h2 :: | | target |
+ | buffer | | | M-hy :: | | buffer |
+ | | | | M-h- :: | | |
+ | | M-h M-3 | |______::__| M-h M-1 | |
+ | | ------> | | \\/ | ------> | |
+ | | | | | | |
+ | | | | notes | | |
+ | | | | buffer | | |
+ |_______________| |__________|__________| |________________|
+Exercise: watch this video and try to reproduce what happens in it:
-2.1. Variants of `save'
------------------------
+ (find-2021workshop7video \"0:00\")
-2.2. Variants of `create'
--------------------------
+Use this to go to the target that appears in the video:
- (eek \"M-h M-k M-j ;; eejump\")
- M-2 M-j runs: (find-emacs-keys-intro)
- M-5 M-j runs: (find-eev-quick-intro)
- (eek \"M-h M-k M-h M-k ;; find-ekey-links\")
- (eek \"M-h M-k M-h M-f ;; find-efunction-links\")
- (eek \"M-h M-k M-h M-h ;; find-here-links\")
- (eek \"M-h M-k M-h M-3 ;; find-here-links-3\")
+ (find-eev \"eev-videolinks.el\" \"ee-1stclassvideos-field\")
-2.3. How to learn to `select'
------------------------------
-2.4. Variants of `refine'
--------------------------
- (find-refining-intro \"2. Refining hyperlinks\")
- (find-refining-intro \"2. Refining hyperlinks\" \"M-h M-y\")
- (find-anchors-intro \"2. Shrinking\")
- (find-anchors-intro \"2. Shrinking\" \"`M-h M--'\")
-2.5. Variants of `copy'
------------------------
- (find-here-links-intro \"6. Copying the hyperlink\" \"M-h M-w\")
+2. Copy from left to right
+==========================
-2.6. Variants of `go back'
---------------------------
- (eek \"M-h M-k M-h M-1 ;; find-here-links-1\")
- (find-eval-intro \"5. Going back\" \"`M-K' instead of `M-k'\")
+2.1. Two basic exercises
+------------------------
+In the diagrams below the names of the buffers are abbreviated:
+ [EX] - (find-eev-exercises-intro)
+ [J] - (find-eejumps)
+ [N] - notes, i.e., (find-fline \"~/TODO\")
+ [EK] - (find-emacs-keys-intro)
-1. Saving interesting links
-===========================
-The documentation of eev says at several places that people
-should \"save all interesting links to their notes\". It is
-easier to learn that if we split it into these tasks:
+ ________ _______ ______________ ________
+ | | | | | | | | |
+ | [EX] | M-j | [J] | M-21j | [J] | [N] | C-x 1 M-K* | [EX] |
+ | | ----> | | -----> | M-w ::> C-y | ----------> | |
+ |________| |_______| |_______|______| |________|
- a. save links to your notes
- b. test these links
- c. mark the links that you don't understand
- d. undestand what each link does (with M-h M-f)
- e. recognize which links are interesting
+ ________ _______ ______________ ________
+ | | | | | | | | |
+ | [EX] | M-2j | [EK] | M-21j | [EK] | [N] | C-x 1 M-K* | [EX] |
+ | | ----> | | -----> | M-w ::> C-y | ----------> | |
+ |________| |_______| |_______|______| |________|
+`M-21j' is `M-2 M-1 M-j' written in an abbreviated form -
+ mnemonic: \"hold the meta key, type 21j, lift meta\" - and
+ `M-K*' means \"type M-K as many times as needed\".
-2. Some abbreviations
-=====================
-Sequences of keys like `M-2 M-1 M-j' can be typed by keeping the meta
-key pressed and then typing `2', `1', and 'j'. We will sometimes write
-these keys sequences in an abbreviated form, like this: `M-21j'.
+Watch this video and try to reproduce what happens in it:
-Some intros, like this one,
+ (find-2021workshop5video \"0:00\")
- (find-here-links-intro \"4. `find-here-links-3'\")
-draw window configurations like this:
- _____________________
- | | |
- | | elinks |
- | | buffer |
- | target |__________|
- | buffer | |
- | | notes |
- | | buffer |
- |__________|__________|
-we will often use abbreviations like [T], [E], and [N] for the
-descriptions of the buffers in the windows.
+2.2. `find-extra-file-links'
+----------------------------
+Here you will need to understand `code-c-d' and
+`find-extra-file-links'. See:
+ (find-eev-quick-intro \"9. Shorter hyperlinks\")
+ (find-eev-quick-intro \"9.1. `code-c-d'\")
+ (find-audiovideo-intro \"4.1. `find-extra-file-links'\")
+The diagram will be this one:
-3. Copying existing links
-=========================
+ ________ _______ _______ ______________
________
+ | | | | | | | | |
| |
+ | [EX] | | [D] | M-he | [EH] | M-21j | [EH] | [N] | C-x 1 M-K*
| [EX] |
+ | | --> | | ----> | | -----> | M-w ::> C-y | ---------->
| |
+ |________| |_______| |_______| |_______|______|
|________|
+Where [D] is a dired buffer. Watch this video and try to
+reproduce what happens in it:
-3.1. Copy from the `M-j' buffer
--------------------------------
-If you type `M-j' you will \"jump\" to a temporary buffer that has a
-header that is beginner-friendly, then a blank line, and then a very
-technical part that all beginners should ignore. This is explained
-here:
+ (find-2021workshop6video \"0:00\")
- (find-eev-quick-intro \"7.2. The list of eejump targets\")
+Do this twice. In the first time you should create elisp
+hyperlinks pointing to this directory and this file,
- [Video links:]
- (find-eevnavvideo \"5:17\" \"1. Basic keys (eev)\")
- (find-eevnavvideo \"5:26\" \"M-e goes to the end of the line and...\")
- (find-eevnavvideo \"6:28\" \"M-j: you can forget practically
everything...\")
- (find-eevnavvideo \"6:41\" \"if you type just M-j\")
- (find-eevnavvideo \"6:48\" \"has a header that is beginner-friendly\")
- (find-eevnavvideo \"9:48\" \"M-j with numeric prefixes\")
+ (find-efile \"play/\")
+ (find-efile \"play/\" \"life.el\")
-Exercise: learn how to do copy and paste by reading this,
+and in the second time you should create elisp hyperlinks to a
+directory and a file that you find interesting.
- (find-eev-quick-intro \"5.2. Cutting and pasting\")
-then:
- 1. use `M-j' to jump to the (find-eejumps) buffer (\"[J]\"),
- 2. use `M-21j' or `M-31j' to open your ~/TODO file - your \"notes
- buffer\", \"[N]\" - in the right window,
- 3. use copy and paste to copy the header from [J] to [N].
-In a diagram:
- _________ _______________
- | | | | |
- M-j | [J] | M-21j | [J] | [N] |
- ----> | | ---------> | ::> |
- | | or M-31j | | |
- |_________| |_______|_______|
+2.3. Invisible text
+-------------------
+Run this sexp:
-The \"::>\" means \"copy the header from the left window to the right
-window\".
+ (eek \"3*<up> C-a C-SPC C-e\")
+and then use `M-w' to copy the region to the kill ring and `M-hy'
+to yank it into this sexp:
+ (insert \"\\n\")
+Instead of getting the first sexp below you will get the second
+one:
+
+ (insert \"\\n\" \"2.3. Invisible text\")
+ (insert \"\\n\" \"2.3. Invisible text\\n-------------------\")
+
+That's becase when you type `C-e' on the title of a section of an
+\"intro\" the `C-e' takes you to the right of the line _after_
+the invisible text. If you type `<left> <right>' there this moves
+the point to a position before the invisible text.
+
+Exercise: create a pair of elisp hyperlinks, the first one
+pointing to this intro and the second pointing to this section,
+and copy the pair to your notes. You'll have to watch the video
+to understand some tricky points and you will have to follow the
+diagram below.
+
+ ________ _______ _______________ ________
+ | | | | | | | | |
+ | [EX] | M-hh | [EH] | M-21j | [EH] | [N] | C-x 1 M-K* | [EX] |
+ | M-w | ----> | | -----> | M-h2 ::> C-y | ----------> | |
+ | | | | | M-hy | | | |
+ |________| |_______| |________|______| |________|
+
+[Video links:]
+ (find-2021workshop4video \"0:00\")
-3.2. Copy from (find-emacs-keys-intro)
---------------------------------------
-Now one of the lines in your notes buffer should be this one:
- ;; M-2 M-j runs: (find-emacs-keys-intro)
-Exercise:
- 1. Use `M-2j' to go to (find-emacs-keys-intro),
- 2. Mark the whole section `1. Basic keys (eev)'
- 3. Copy it (hint: `M-w'),
- 4. Use `M-21j' or `M-31j' to display your notes buffer in the right
- window,
- 5. Paste the section `1. Basic keys (eev)' to your notes buffer.
-In a diagram:
- __________ ________________
- | | | | |
- M-2j | [EK] | M-21j | [EK] | [N] |
- -----> | | ---------> | ::> |
- | | or M-31j | | |
- |__________| |________|_______|
+[The rest is old]
+
@@ -13740,6 +13773,120 @@ In a diagram:
| | | |
|___________| |___________|
+
+
+
+
+2.1. Variants of `save'
+-----------------------
+
+2.2. Variants of `create'
+-------------------------
+
+ (eek \"M-h M-k M-j ;; eejump\")
+ M-2 M-j runs: (find-emacs-keys-intro)
+ M-5 M-j runs: (find-eev-quick-intro)
+ (eek \"M-h M-k M-h M-k ;; find-ekey-links\")
+ (eek \"M-h M-k M-h M-f ;; find-efunction-links\")
+ (eek \"M-h M-k M-h M-h ;; find-here-links\")
+ (eek \"M-h M-k M-h M-3 ;; find-here-links-3\")
+
+2.3. How to learn to `select'
+-----------------------------
+
+2.4. Variants of `refine'
+-------------------------
+ (find-refining-intro \"2. Refining hyperlinks\")
+ (find-refining-intro \"2. Refining hyperlinks\" \"M-h M-y\")
+ (find-anchors-intro \"2. Shrinking\")
+ (find-anchors-intro \"2. Shrinking\" \"`M-h M--'\")
+
+2.5. Variants of `copy'
+-----------------------
+ (find-here-links-intro \"6. Copying the hyperlink\" \"M-h M-w\")
+
+2.6. Variants of `go back'
+--------------------------
+ (eek \"M-h M-k M-h M-1 ;; find-here-links-1\")
+ (find-eval-intro \"5. Going back\" \"`M-K' instead of `M-k'\")
+
+
+
+
+3. A two-window setting
+=======================
+Exercise: copy the diagram below to your notes,
+
+ ____________ _____________ ____________
_____________
+ | | | | | | | | | | |
|
+ | [EX] | [T] | M-hh | [EX] | [EH] | M-21j | [EH] | [N] | M-K* | [EH] |
[EX] |
+ | | M-w | ----> | | M-h2 | -----> | | C-y | ---> | |
|
+ | | | | | M-hy | | | | | |
|
+ | | | | | M-w | | | | | |
|
+ |______|_____| |______|______| |______|_____|
|______|______|
+
+then come back here and type `C-x 1 C-x 3' to split the window.
+In the window at the right, go this directory,
+
+ (find-efile \"\")
+
+find the subdirectory \"play\", enter it, find the file
+\"life.el\", and inside the file \"life.el\" find the line that
+starts with this string, with a space at its end:
+
+ \"(defun life \"
+
+Then follow the instructions in the diagram above to create a
+link to the file \"life.el\". Refine that link to make it point
+to the first occurrence of the string \"(defun life \" inside the
+file \"life.el\", and copy the original link and the refined one
+to your notes.
+
+[Video links:]
+ (find-2021workshop2video \"0:00\")
+
+
+
+
+
+1. Saving interesting links
+===========================
+The documentation of eev says at several places that people
+should \"save all interesting links to their notes\". It is
+easier to learn that if we split it into these tasks:
+
+ a. save links to your notes
+ b. test these links
+ c. mark the links that you don't understand
+ d. undestand what each link does (with M-h M-f)
+ e. recognize which links are interesting
+
+
+2. Some abbreviations
+=====================
+Sequences of keys like `M-2 M-1 M-j' can be typed by keeping the meta
+key pressed and then typing `2', `1', and 'j'. We will sometimes write
+these keys sequences in an abbreviated form, like this: `M-21j'.
+
+Some intros, like this one,
+
+ (find-here-links-intro \"4. `find-here-links-3'\")
+
+draw window configurations like this:
+
+ _____________________
+ | | |
+ | | elinks |
+ | | buffer |
+ | target |__________|
+ | buffer | |
+ | | notes |
+ | | buffer |
+ |__________|__________|
+
+we will often use abbreviations like [T], [E], and [N] for the
+descriptions of the buffers in the windows.
+
" pos-spec-list)))
;; (find-eev-exercises-intro)
diff --git a/eev-tlinks.el b/eev-tlinks.el
index c46716f..c8facb6 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -1838,6 +1838,8 @@ echo 'http://angg.twu.net/eev-videos/{anggstem}.mp4'
>> ~/.psne.log
(find-efunction 'find-eevshortvideo-links)
""
,(ee-template0 "\
+;; (find-1stclassvideo-links \"{c}\")
+
;; Skel: (find-eevshortvideo-links \"{c}\" \"{stem}\" \"{youtubeid}\")
;; See: (find-videos-intro \"1. Some videos\" \"{stem}\")
;; Index: http://angg.twu.net/.emacs.videos.html#{c}
@@ -2717,7 +2719,7 @@ This function is used by `ee-0x0-upload-region'."
(mp4stem (ee-1stclassvideos-mp4stem c))
(hash (ee-1stclassvideos-hash c)))
(apply
- 'find-elinks
+ 'find-elinks-elisp
`((find-1stclassvideo-links ,c ,@pos-spec-list)
;; Convention: the first sexp always regenerates the buffer.
(find-efunction 'find-1stclassvideo-links)
@@ -2737,11 +2739,6 @@ This function is used by `ee-0x0-upload-region'."
;; (find-eev \"eev-videolinks.el\" \"first-class-videos\")
;; (find-eev \"eev-videolinks.el\" \"second-class-videos\")
-;; Definition of the function:
-;; (find-eev \"eev-videolinks.el\" \"first-class-videos\")
-;; (find-eev \"eev-videolinks.el\" \"find-{c}video\")
-;; (find-efunction 'find-{c}video)
-
;; Play:
;; (find-{c}video \"0:00\")
@@ -2749,6 +2746,26 @@ This function is used by `ee-0x0-upload-region'."
;; (find-angg \".emacs.templates\" \"eev-videos-data\" \"{c}\")
;; http://angg.twu.net/.emacs.templates.html#eev-videos-data
;; (find-videos-intro \"1. Some videos\" \"{c}\")
+
+;; Definition of the function:
+;; (find-eev \"eev-videolinks.el\" \"first-class-videos\")
+;; (find-eev \"eev-videolinks.el\" \"find-{c}video\")
+;; (find-efunction 'find-{c}video)
+
+;; <find-{c}video>
+;; Skel: (find-1stclassvideo-links \"{c}\")
+;; Tests: (find-{c}video \"0:00\")
+;; (find-efunctiondescr 'find-{c}video)
+(defun find-{c}video (&optional time &rest rest)
+ \"Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \\\"eev-videolinks.el\\\" \\\"{c}\\\")
+ http://angg.twu.net/eev-current/eev-videolinks.el.html#eev2020
+ for more info on this particular video,
+and: (find-video-links-intro \\\"7. \\\" \\\"find-eev-video\\\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials.\"
+ (interactive)
+ (find-eev-video \"{mp4stem}\" \"{hash}\" time))
")
)
pos-spec-list)))
diff --git a/eev-videolinks.el b/eev-videolinks.el
index a8e2356..ff51aac 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: 20211127
+;; Version: 20211203
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el>
@@ -47,6 +47,12 @@
;; «.find-eevfherelvideo» (to "find-eevfherelvideo")
;; «.find-eevtestblsvideo» (to "find-eevtestblsvideo")
;; «.find-eevvlinksvideo» (to "find-eevvlinksvideo")
+;; «.find-2021workshop1video» (to "find-2021workshop1video")
+;; «.find-2021workshop2video» (to "find-2021workshop2video")
+;; «.find-2021workshop3video» (to "find-2021workshop3video")
+;; «.find-2021workshop4video» (to "find-2021workshop4video")
+;; «.find-2021workshop5video» (to "find-2021workshop5video")
+;; «.find-2021workshop6video» (to "find-2021workshop6video")
;; «.more-info» (to "more-info")
;; «.ee-1stclassvideos-info» (to "ee-1stclassvideos-info")
;; «.eev2019» (to "eev2019")
@@ -59,6 +65,12 @@
;; «.eevvlinks» (to "eevvlinks")
;; «.oficina2021a» (to "oficina2021a")
;; «.oficina2021b» (to "oficina2021b")
+;; «.2021workshop1» (to "2021workshop1")
+;; «.2021workshop2» (to "2021workshop2")
+;; «.2021workshop3» (to "2021workshop3")
+;; «.2021workshop4» (to "2021workshop4")
+;; «.2021workshop5» (to "2021workshop5")
+;; «.2021workshop6» (to "2021workshop6")
;; «.ee-1stclassvideos-field» (to "ee-1stclassvideos-field")
;; «.second-class-videos» (to "second-class-videos")
;; «.code-eevvideo» (to "code-eevvideo")
@@ -403,6 +415,99 @@ and: (find-video-links-intro \"7. `find-eev-video'\")
(interactive)
(find-eev-video "2021-video-links" "xQqWufQgzVY" time))
+;; «find-2021workshop1video» (to ".find-2021workshop1video")
+;; Skel: (find-eevshortvideo-links "2021workshop1" "2021-workshop-1"
"xQqWufQgzVY")
+;; See: (find-videos-intro "1. Some videos" "2021-workshop-1")
+;; Index: http://angg.twu.net/.emacs.videos.html#2021workshop1
+;; Test: (find-2021workshop1video "0:00")
+(defun find-2021workshop1video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-videos-intro \"1. Some videos\" \"2021-workshop-1\")
+ http://angg.twu.net/2021-workshop-1.html
+ for more info on this particular video,
+and: (find-video-links-intro \"7. `find-eev-video'\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-1" "HuqJFPD871E" time))
+
+;; «find-2021workshop2video» (to ".find-2021workshop2video")
+;; Skel: (find-eevshortvideo-links "2021workshop2" "2021-workshop-2"
"xQqWufQgzVY")
+;; See: (find-videos-intro "1. Some videos" "2021-workshop-2")
+;; Index: http://angg.twu.net/.emacs.videos.html#2021workshop2
+;; Test: (find-2021workshop2video "0:00")
+(defun find-2021workshop2video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-videos-intro \"1. Some videos\" \"2021-workshop-2\")
+ http://angg.twu.net/2021-workshop-2.html
+ for more info on this particular video,
+and: (find-video-links-intro \"7. `find-eev-video'\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-2" "hqqIlZBXNhk" time))
+
+;; «find-2021workshop3video» (to ".find-2021workshop3video")
+;; Skel: (find-1stclassvideo-links "2021workshop3")
+;; Tests: (find-2021workshop3video "0:00")
+;; (find-efunctiondescr 'find-2021workshop3video)
+(defun find-2021workshop3video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \"eev-videolinks.el\" \"2021workshop3\")
+ http://angg.twu.net/eev-current/eev-videolinks.el.html#eev2020
+ for more info on this particular video,
+and: (find-video-links-intro \"7. \" \"find-eev-video\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-3" "r83inf9s8zo" time))
+
+;; «find-2021workshop4video» (to ".find-2021workshop4video")
+;; Skel: (find-1stclassvideo-links "2021workshop4")
+;; Tests: (find-2021workshop4video "0:00")
+;; (find-efunctiondescr 'find-2021workshop4video)
+(defun find-2021workshop4video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \"eev-videolinks.el\" \"2021workshop4\")
+ http://angg.twu.net/eev-current/eev-videolinks.el.html#eev2020
+ for more info on this particular video,
+and: (find-video-links-intro \"7. \" \"find-eev-video\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-4" "lhpHHjBUxv8" time))
+
+;; «find-2021workshop5video» (to ".find-2021workshop5video")
+;; Skel: (find-1stclassvideo-links "2021workshop5")
+;; Tests: (find-2021workshop5video "0:00")
+;; (find-efunctiondescr 'find-2021workshop5video)
+(defun find-2021workshop5video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \"eev-videolinks.el\" \"2021workshop5\")
+ http://angg.twu.net/eev-current/eev-videolinks.el.html#eev2020
+ for more info on this particular video,
+and: (find-video-links-intro \"7. \" \"find-eev-video\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-5" "VzRsterVSXs" time))
+
+;; «find-2021workshop6video» (to ".find-2021workshop6video")
+;; Skel: (find-1stclassvideo-links "2021workshop6")
+;; Tests: (find-2021workshop6video "0:00")
+;; (find-efunctiondescr 'find-2021workshop6video)
+(defun find-2021workshop6video (&optional time &rest rest)
+ "Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \"eev-videolinks.el\" \"2021workshop6\")
+ http://angg.twu.net/eev-current/eev-videolinks.el.html#eev2020
+ for more info on this particular video,
+and: (find-video-links-intro \"7. \" \"find-eev-video\")
+ or: http://angg.twu.net/eev-intros/find-video-links-intro.html#7
+ for more info on these video tutorials."
+ (interactive)
+ (find-eev-video "2021-workshop-6" "-gi15-liGaU" time))
+
+
@@ -504,6 +609,48 @@ and: (find-video-links-intro \"7. `find-eev-video'\")
:page "http://angg.twu.net/2021-oficina.html";
:lang "portuguese")
;;
+ ;; «2021workshop1» (to ".2021workshop1")
+ ("2021workshop1"
+ :title "The base cases 1 and 2 (workshop 2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-1.mp4";
+ :yt "https://www.youtube.com/watch?v=HuqJFPD871E";
+ :page "http://angg.twu.net/2021-workshop.html";)
+ ;;
+ ;; «2021workshop2» (to ".2021workshop2")
+ ("2021workshop2"
+ :title "Creating a link to a file with a 2-window setting (workshop
2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-2.mp4";
+ :yt "http://www.youtube.com/watch?v=hqqIlZBXNhk";
+ :page "http://angg.twu.net/emacsconf2021.html";)
+ ;;
+ ;; «2021workshop3» (to ".2021workshop3")
+ ("2021workshop3"
+ :title "Material on `M-3 M-e' (workshop 2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-3.mp4";
+ :yt "http://www.youtube.com/watch?v=r83inf9s8zo";
+ :page "http://angg.twu.net/emacsconf2021.html";)
+ ;;
+ ;; «2021workshop4» (to ".2021workshop4")
+ ("2021workshop4"
+ :title "Invisible text (workshop 2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-4.mp4";
+ :yt "http://www.youtube.com/watch?v=lhpHHjBUxv8";
+ :page "http://angg.twu.net/emacsconf2021.html";)
+ ;;
+ ;; «2021workshop5» (to ".2021workshop5")
+ ("2021workshop5"
+ :title "Copy from left to right (workshop 2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-5.mp4";
+ :yt "http://www.youtube.com/watch?v=VzRsterVSXs";
+ :page "http://angg.twu.net/emacsconf2021.html";)
+ ;;
+ ;; «2021workshop6» (to ".2021workshop6")
+ ("2021workshop6"
+ :title "`find-extra-file-links' (workshop 2021-dec-04)"
+ :mp4 "http://angg.twu.net/eev-videos/2021-workshop-6.mp4";
+ :yt "http://www.youtube.com/watch?v=-gi15-liGaU";
+ :page "http://angg.twu.net/emacsconf2021.html";)
+ ;;
))