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

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

[elpa] externals/eev a0cfda8ee7: Added `find-2021ffllvideo'.


From: ELPA Syncer
Subject: [elpa] externals/eev a0cfda8ee7: Added `find-2021ffllvideo'.
Date: Sun, 26 Dec 2021 09:57:24 -0500 (EST)

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

    Added `find-2021ffllvideo'.
---
 ChangeLog         |  4 ++++
 VERSION           |  4 ++--
 eev-blinks.el     |  4 +++-
 eev-elinks.el     | 10 +++++++++-
 eev-tlinks.el     | 28 +++++++++++++++-------------
 eev-videolinks.el | 36 ++++++++++++++++++++++++++++++------
 eev.el            |  2 +-
 7 files changed, 64 insertions(+), 24 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 26f369ad9c..4d077bf212 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2021-12-26  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (find-2021ffllvideo): new function.
+
 2021-12-19  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eev-elinks.el (find-ekbmacro-links): small changes.
diff --git a/VERSION b/VERSION
index a78b58f954..f2b2b581a3 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Sun Dec 19 19:50:42 GMT 2021
-Sun Dec 19 16:50:42 -03 2021
+Sun Dec 26 14:19:36 GMT 2021
+Sun Dec 26 11:19:36 -03 2021
diff --git a/eev-blinks.el b/eev-blinks.el
index f6614d285f..ee429056cf 100644
--- a/eev-blinks.el
+++ b/eev-blinks.el
@@ -21,7 +21,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20211219
+;; Version:    20211220
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-blinks.el>
@@ -105,6 +105,8 @@
 ;;;                 
 ;; «eek» (to ".eek")
 ;; See: (find-eev-quick-intro "3. Elisp hyperlinks" "eek")
+;;      (find-efunctiondescr 'edmacro-mode)
+;;      (find-ekbmacro-links)
 
 (defun eek (str)
   "Execute STR as a keyboard macro. See `edmacro-mode' for the exact format.\n
diff --git a/eev-elinks.el b/eev-elinks.el
index 92abe0d8bc..14a68c261d 100644
--- a/eev-elinks.el
+++ b/eev-elinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20211219
+;; Version:    20211220
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-elinks.el>
@@ -1082,6 +1082,9 @@ means."
        ;; Convention: the first sexp always regenerates the buffer.
        (find-efunction 'find-eface-links)
        ""
+       (find-enode "Faces")
+       (find-elnode "Faces")
+       ""
        (find-efacedescr     ',face-symbol)
        (find-efaces         ',face-symbol)
        (find-eface          ',face-symbol)
@@ -1160,6 +1163,9 @@ to understand how this is used. ARG is usually
      ;; Convention: the first sexp always regenerates the buffer.
      (find-efunction 'find-ecolor-links)
      ""
+     (find-enode "Colors")
+     (find-elnode "Color Names")
+     ""
      (find-ecolor-links (ee-color-choose-tk ,(or initialcolor "gray")))
      (find-ecolor-links ,(or initialcolor "gray"))
      (find-ecolors)
@@ -1260,6 +1266,7 @@ If D is t then try to use `ee-package-dir' to get the 
directory."
 # (find-{c}file \"\")
 
 # http://elpa.gnu.org/packages/{pkg}.html
+# http://elpa.nongnu.org/nongnu/{pkg}.html
 # http://melpa.org/#/{pkg}
 ")))
 
@@ -1457,6 +1464,7 @@ Convert PKG - a symbol - to a package-desc structure (or 
to nil)."
      (find-enode "Keyboard Macros")
      (find-enode "Save Keyboard Macro")
      (find-enode "Edit Keyboard Macro")
+     (find-efunctiondescr 'edmacro-mode)
      (eek "M-h M-k C-x C-k C-e  ;; kmacro-edit-macro-repeat")
      (eek "        C-x C-k C-e  ;; kmacro-edit-macro-repeat")
      (eek "M-h M-k C-x C-k l    ;; kmacro-edit-lossage")
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 731f7cccdf..736c4c4f2a 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -93,7 +93,7 @@
 ;; «.code-psnevideo»                   (to "code-psnevideo")
 ;; «.code-eevvideo»                    (to "code-eevvideo")
 ;; «.code-eevvideo-local»              (to "code-eevvideo-local")
-;; «.hardcoded-paths»                  (to "hardcoded-paths")
+;;   «.hardcoded-paths»                        (to "hardcoded-paths")
 ;; «.find-eev-video-links»             (to "find-eev-video-links")
 ;; «.find-eevshortvideo-links»         (to "find-eevshortvideo-links")
 ;;
@@ -343,11 +343,11 @@ This is an internal function used by 
`find-{stem}-links'.\"
   (setq vars (or vars "{vars}"))
   (apply 'find-elinks-elisp
    `((find-find-links-links-new ,stem ,args ,vars ,@pos-spec-list)
+     (find-find-links-links-new)
      (find-find-links-links-new "mytaskA" "" "")
      (find-find-links-links-new "mytaskB" "foo" "")
      (find-find-links-links-new "mytaskC" "foo bar" "")
      (find-find-links-links-new "mytaskD" "foo bar baz" "plic bletch")
-     (find-find-links-links-new)
      ;; Convention: the first sexp always regenerates the buffer.
      (find-efunction 'find-find-links-links-new)
      ""
@@ -1891,19 +1891,24 @@ and: (find-video-links-intro \\\"7. 
`find-eev-video'\\\")
 ;;; |_| |_|_| |_|\__,_|     |_|\__,_|\__\___/_/\_\    |_|_|_| |_|_|\_\___/
 ;;;                                                                       
 ;; «find-latex-links» (to ".find-latex-links")
-;; See:
-;;   (find-eev-quick-intro "7.5. `find-latex-links'")
-
+;; Skel: (find-find-links-links-new "latex" "stem" "stem-")
+;; Tests: (find-latex-links)
+;;        (find-latex-links "/tmp/foo")
+;;        (find-latex-links "/tmp/foo" 2)
+;;        (find-latex-links "/tmp/foo" 2 "copy-rest")
+;;   See: (find-eev-quick-intro "7.5. `find-latex-links'")
+;;
 (defun find-latex-links (&optional stem &rest pos-spec-list)
 "Visit a temporary buffer containing a template for creating a LaTeX document."
   (interactive)
   (setq stem (or stem "{stem}"))
-  (let ((stem- (file-name-nondirectory stem)))
-    (apply 'find-elinks
+  (let* ((stem- (file-name-nondirectory stem)))
+    (apply
+     'find-elinks
      `((find-latex-links ,stem ,@pos-spec-list)
        (find-latex-links "/tmp/test")
        ;; Convention: the first sexp always regenerates the buffer.
-       ;; (find-efunction 'find-latex-links)
+       (find-efunction 'find-latex-links)
        (find-eev-quick-intro "7.5. `find-latex-links'")
        (find-eev-quick-intro "7.5. `find-latex-links'" "change the \"{stem}\"")
        (find-eev-quick-intro "7.5. `find-latex-links'" "top line")
@@ -1923,14 +1928,11 @@ and: (find-video-links-intro \\\"7. 
`find-eev-video'\\\")
 \\documentclass{<}article{>}
 \\begin{<}document{>}
 
-\\end{<}document{>}")
+\\end{<}document{>}
+")
        )
      pos-spec-list)))
 
-;; Tests: (find-latex-links)
-;;        (find-latex-links "/tmp/foo")
-;;        (find-latex-links "/tmp/foo" 2)
-;;        (find-latex-links "/tmp/foo" 2 "copy-rest")
 
 
 
diff --git a/eev-videolinks.el b/eev-videolinks.el
index 8ce4435a7a..746e228b8e 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:    20211211
+;; Version:    20211226
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el>
@@ -54,6 +54,7 @@
 ;;   «.find-2021workshop5video»                (to "find-2021workshop5video")
 ;;   «.find-2021workshop6video»                (to "find-2021workshop6video")
 ;;   «.find-2021orgfornonusersvideo»   (to "find-2021orgfornonusersvideo")
+;;   «.find-2021ffllvideo»             (to "find-2021ffllvideo")
 ;; «.more-info»                                (to "more-info")
 ;; «.ee-1stclassvideos-info»           (to "ee-1stclassvideos-info")
 ;;   «.eev2019»                                (to "eev2019")
@@ -73,6 +74,7 @@
 ;;   «.2021workshop5»                  (to "2021workshop5")
 ;;   «.2021workshop6»                  (to "2021workshop6")
 ;;   «.2021orgfornonusers»             (to "2021orgfornonusers")
+;;   «.2021ffll»                       (to "2021ffll")
 ;; «.ee-1stclassvideos-field»          (to "ee-1stclassvideos-field")
 ;; «.second-class-videos»              (to "second-class-videos")
 ;;   «.code-eevvideo»                  (to "code-eevvideo")
@@ -524,6 +526,21 @@ and: (find-video-links-intro \"7. \" \"find-eev-video\")
   (interactive)
   (find-eev-video "2021-org-for-non-users" "Eh5Wz9Vh_XM" time))
 
+;; «find-2021ffllvideo»  (to ".find-2021ffllvideo")
+;; Skel: (find-1stclassvideo-links "2021ffll")
+;; Tests: (find-2021ffllvideo "0:00")
+;;        (find-efunctiondescr 'find-2021ffllvideo)
+(defun find-2021ffllvideo (&optional time &rest rest)
+  "Play one of the video tutorials of eev starting at TIME.
+See: (find-eev \"eev-videolinks.el\" \"2021ffll\")
+     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-ffll" "h1CEL2fmkyc" time))
+
 
 
 
@@ -637,35 +654,35 @@ and: (find-video-links-intro \"7. \" \"find-eev-video\")
      :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";)
+     :page "http://angg.twu.net/2021-workshop.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";)
+     :page "http://angg.twu.net/2021-workshop.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";)
+     :page "http://angg.twu.net/2021-workshop.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";)
+     :page "http://angg.twu.net/2021-workshop.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";)
+     :page "http://angg.twu.net/2021-workshop.html";)
     ;;
     ;; «2021orgfornonusers»  (to ".2021orgfornonusers")
     ("2021orgfornonusers"
@@ -674,6 +691,13 @@ and: (find-video-links-intro \"7. \" \"find-eev-video\")
      :yt   "http://www.youtube.com/watch?v=Eh5Wz9Vh_XM";
      :page "http://angg.twu.net/2021-org-for-non-users.html";)
     ;;
+    ;; «2021ffll»  (to ".2021ffll")
+    ("2021ffll"
+     :title "How I write 5-minute hacks in eev using `M-x 
find-find-links-links-new'"
+     :mp4  "http://angg.twu.net/eev-videos/2021-ffll.mp4";
+     :yt   "http://www.youtube.com/watch?v=h1CEL2fmkyc";
+     :page "http://angg.twu.net/2021-ffll.html";)
+    ;;
     ))
 
 
diff --git a/eev.el b/eev.el
index 4800d292bf..449d5c4311 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: 20211216
+;; Version: 20211226
 
 ;; 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



reply via email to

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