[elpa] externals/eev be6786072f: Some changes in the support for edrx-maxima.tgz.

[ELPA Syncer]

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

    Some changes in the support for edrx-maxima.tgz.
---
 ChangeLog         | 22 ++++++++++++++++++++++
 VERSION           |  4 ++--
 eev-code.el       |  6 +++++-
 eev-intro.el      | 22 +++++++++++++++-------
 eev-tlinks.el     | 31 ++++++++++++++++++++++++++++---
 eev-videolinks.el | 17 ++++++++++++++++-
 eev.el            |  2 +-
 7 files changed, 89 insertions(+), 15 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 92e9a33465..daf6278655 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,25 @@
+2024-11-23  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-tlinks.el (ee-dot-emacs-edrxmaxima): new function.
+       (find-dot-emacs-links): recommend `edrxmaxima' instead of
+       `maxima5470'.
+
+       * eev-intro.el (find-windows-beginner-intro): explain that the
+       "tar -C ~/ -xvzf /tmp/edrx-maxima.tgz" may overwrite some files.
+
+2024-11-16  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-intro.el (find-windows-beginner-intro): mention myqdraw.
+
+2024-11-10  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (ee-1stclassvideos-info): new video:
+       "2024butler" (subtitles only).
+
+2024-10-27  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-code.el (ee-code-c-d-add-pair): make `d' always be a string.
+
 2024-10-21  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eev-tlinks.el (ee-dot-emacs-maxima5470): added an autoload for
diff --git a/VERSION b/VERSION
index 38fc264b2c..a6a6c28547 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Wed Oct 23 01:11:18 GMT 2024
-Tue Oct 22 22:11:18 -03 2024
+Sat Nov 23 14:19:02 GMT 2024
+Sat Nov 23 11:19:02 -03 2024
diff --git a/eev-code.el b/eev-code.el
index d71277aa73..f0aed58dc0 100644
--- a/eev-code.el
+++ b/eev-code.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20241013
+;; Version:    20241027
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-code.el>
@@ -128,6 +128,9 @@ Examples: (ee-areplace '((1 . one) (2 . two) (3 . three)) 2 
'foo)
 ;; «code-c-d-pairs» (to ".code-c-d-pairs")
 ;; Explained here: (find-eev "eev-elinks.el" "ee-code-c-d-filter")
 ;;      Called by: (find-efunction 'code-c-d "ee-code-c-d-add-pair")
+;; Mainly used by: (find-kl-here-intro)
+;;                 (find-kla-intro "1. Introduction")
+;;            See: (find-eppp ee-code-c-d-pairs)
 
 (defvar ee-code-c-d-pairs nil
   "Each (code-c-d C D) call generates an entry (C (ee-expand D)) here.
@@ -136,6 +139,7 @@ previous one. This list is maintained by 
`ee-code-c-d-add-pair'
 and is used by `ee-find-xxxfile-sexps' and `find-file-links'.")
 
 (defun ee-code-c-d-add-pair (c d)
+  (setq d (format "%s" d))
   (setq ee-code-c-d-pairs (ee-areplace ee-code-c-d-pairs c (list d))))
 
 
diff --git a/eev-intro.el b/eev-intro.el
index 595ed99822..76db457cdc 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -15326,19 +15326,27 @@ eepitch block,
  (eepitch-shell)
   cd /tmp/
   wget -N http://anggtwu.net/tmp/edrx-maxima.tgz
+  # (find-fline \"/tmp/edrx-maxima.tgz\")
+  # (find-fline \"/tmp/edrx-maxima.tgz\" \".maxima/maxima-init.mac\")
   tar -C ~/ -xvzf /tmp/edrx-maxima.tgz
 
-that also installs my init file for Maxima and lots of
-small programs that I wrote. Note that the \"tar -xvzf\"
-above extracts the files from this .tgz file
-
-  (find-fline \"/tmp/edrx-maxima.tgz\")
-
-into these three directories:
+that also installs my init file for Maxima and lots of small
+programs that I wrote. Note that the \"tar -C ~/ -xvzf\" above
+will extract the files from the .tgz into these five directories,
 
   (find-fline \"~/.maxima/\")
   (find-fline \"~/MAXIMA/\")
+  (find-fline \"~/lisptree/\")
   (find-fline \"~/luatree/\")
+  (find-fline \"~/myqdraw/\")
+
+overwriting any files with the same names that are already there -
+and you had done any changes yourself to the Maxima init file the
+\"tar\" above will overwrite it. Check:
+
+  (find-fline \"~/.maxima/maxima-init.mac\")
+  (find-fline \"/tmp/edrx-maxima.tgz\")
+  (find-fline \"/tmp/edrx-maxima.tgz\" \".maxima/maxima-init.mac\")
 
 Here are some tests for qdraw:
 
diff --git a/eev-tlinks.el b/eev-tlinks.el
index dc7b362d0c..2bcee5a20b 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20241021
+;; Version:    20241123
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-tlinks.el>
@@ -3955,8 +3955,8 @@ is nil, use the result of (ee-1stclassvideos)."
      'find-elinks-elisp
      `((find-dot-emacs-links ,opts ,@pos-spec-list)
        (find-dot-emacs-links "eev angges")
-       (find-dot-emacs-links "eev angges maxima5470 mfms")
-       (find-dot-emacs-links "eev angges melpa lean4 maxima5470 mfms")
+       (find-dot-emacs-links "eev angges edrxmaxima mfms")
+       (find-dot-emacs-links "eev angges melpa lean4 edrxmaxima mfms")
        ;; Convention: the first sexp always regenerates the buffer.
        (find-efunction 'find-dot-emacs-links)
        ";;"
@@ -4013,6 +4013,15 @@ is nil, use the result of (ee-1stclassvideos)."
   '(\"melpa\" . \"https://melpa.org/packages/\";))
 ")
 
+;; Test: (find-estring-elisp (ee-dot-emacs-edrxmaxima))
+(defun ee-dot-emacs-edrxmaxima (&rest rest) "\
+;; From: (find-windows-beginner-intro \"8. Test Maxima with find-wget\")
+;;  See: (find-windows-beginner-intro \"12. Install qdraw\")
+;;       (find-fline \"~/MAXIMA/edrx-maxima.el\")
+(code-c-d \"maxima\" \"/usr/share/maxima/5.47.0/\" \"maxima\")
+(ignore-errors (load \"~/MAXIMA/edrx-maxima.el\"))
+")
+
 ;; Test: (find-estring-elisp (ee-dot-emacs-maxima5470))
 (defun ee-dot-emacs-maxima5470 (&rest rest) "\
 ;; From: (find-windows-beginner-intro \"8. Test Maxima with find-wget\")
@@ -5453,6 +5462,22 @@ myexs()        := makelist(myex1(j), j,1,length(fs))$
 myexs();
 
 myqdraw([xr({xr}),yr({yr})], myexs());
+
+
+ (eepitch-maxima)
+ (eepitch-kill)
+ (eepitch-maxima)
+load_myqdraw();
+[xmin,xmax, ymin,ymax] : [{xr}, {yr}];
+colors : [red, orange, forest_green, blue, dark_violet]$
+fs : [{fs}];
+
+myexj(j) := myex1(fs[j], lc(colors[j]));
+myexj(j) := myex1(fs[j], lc(colors[j]), lk(fs[j]));
+myexs()  := makelist(myexj(j), j,1,length(fs))$
+myqdraw(myexs());
+myqdraw(xyrange0(), myexs());
+
 ")
      )
    pos-spec-list))
diff --git a/eev-videolinks.el b/eev-videolinks.el
index d516c578e9..397cf564f6 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:    20240818
+;; Version:    20241110
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-videolinks.el>
@@ -78,6 +78,7 @@
 ;;   «.2024lean4of0a2»                 (to "2024lean4of0a2")
 ;;   «.2024algpergs»                   (to "2024algpergs")
 ;;   «.2024convite»                    (to "2024convite")
+;;   «.2024butler»                     (to "2024butler")
 ;; «.ee-1stclassvideos-field»          (to "ee-1stclassvideos-field")
 ;; «.second-class-videos»              (to "second-class-videos")
 ;;   «.code-eevvideo»                  (to "code-eevvideo")
@@ -894,6 +895,20 @@ of the videos and play them with mpv. Compare with
      :subs    ".vtt"
      :index   t
      :comment "An invitation to (run) Maxima (from eev). In Portuguese.")
+    ;;
+    ;; «2024butler»  (to ".2024butler")
+    ;; Subs: (find-2024butlerhsubs "0:00")
+    ;;       (find-2024butlerlsubs "0:00")
+    ("2024butler"
+     :title "I Read The Most Misunderstood Philosopher in the World 
(Philosophy Tube)"
+     :mp4   "http://anggtwu.net/eev-videos/2024-philosophy-tube-butler.mp4";
+     :yt    "http://www.youtube.com/watch?v=zUW-6atPvUQ";
+     :page  "http://anggtwu.net/2024-philosophy-tube-butler.html";
+     :hsubs "http://anggtwu.net/2024-philosophy-tube-butler.html#0:00";
+     :date    "2024may17",
+     :length  "1:15:09"
+     :subs    ".vtt"
+     :comment "See: http://anggtwu.net/emacsconf2024.html#butler";)
     ))
 
 
diff --git a/eev.el b/eev.el
index 3ddd8afc6d..d51f38f466 100644
--- a/eev.el
+++ b/eev.el
@@ -6,7 +6,7 @@
 ;; Package-Requires: ((emacs "25.1"))
 ;; Keywords: lisp e-scripts
 ;; URL: http://anggtwu.net/#eev
-;; Version: 20241022
+;; Version: 20241123
 
 ;; 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