[elpa] externals/eev eb0943c620: Added `find-wget0'.

[ELPA Syncer]

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

    Added `find-wget0'.
---
 ChangeLog     |  9 +++++++++
 VERSION       |  4 ++--
 eev-blinks.el | 15 ++++++++++++++-
 eev-plinks.el | 21 ++++++++++++++++++---
 eev.el        |  2 +-
 5 files changed, 44 insertions(+), 7 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index de3aa542bd..99be5329f8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,14 @@
+2024-01-15  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev.el: bumped the version.
+
+       * eev-plinks.el (find-wget0): new function.
+       (find-wget): this is now a wrapper around `find-wget0'.
+
 2024-01-14  Eduardo Ochs  <eduardoochs@gmail.com>
 
+       * eev-blinks.el (find-eaproposv): new function.
+
        * eev-intro.el (find-lua-tutorial-intro): Added two sections about
        CLua1.lua.
 
diff --git a/VERSION b/VERSION
index c19c879665..aad5199bde 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Sun Jan 14 20:08:57 GMT 2024
-Sun Jan 14 17:08:57 -03 2024
+Tue Jan 16 00:45:32 GMT 2024
+Mon Jan 15 21:45:32 -03 2024
diff --git a/eev-blinks.el b/eev-blinks.el
index ce304855d3..618af9e4a0 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:    20240113
+;; Version:    20240114
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-blinks.el>
@@ -1691,6 +1691,7 @@ Hint: install the Debian package \"unicode-data\".")
 ;;
 ;; «find-eaproposf»  (to ".find-eaproposf")
 ;; Tests: (find-eaproposf "^find-.*-links$")
+;;        (find-eaproposv "process")
 ;;        (find-estring (ee-eaproposf0 "^find-.*-links$" 'fboundp ": %s\n"))
 
 (defun find-eaproposf (regexp &rest rest)
@@ -1698,11 +1699,23 @@ Hint: install the Debian package \"unicode-data\".")
   (apply 'find-elinks-elisp
         `(,(ee-template0 "\
 ;; (find-eaproposf {(ee-S regexp)})
+;; (find-eaproposv {(ee-S regexp)})
 ;; (find-eapropos  {(ee-S regexp)})
 ")
           ,(ee-eaproposf0 regexp 'fboundp "(find-efunction '%s)\n"))
         rest))
 
+(defun find-eaproposv (regexp &rest rest)
+  "Go to a temporary buffer listing all variables whose names match REGEXP."
+  (apply 'find-elinks-elisp
+        `(,(ee-template0 "\
+;; (find-eaproposv {(ee-S regexp)})
+;; (find-eaproposf {(ee-S regexp)})
+;; (find-eapropos  {(ee-S regexp)})
+")
+          ,(ee-eaproposf0 regexp 'boundp "(find-evardescr '%s)\n"))
+        rest))
+
 (defun ee-eaproposf0 (regexp predicate fmt)
   "An internal function used by `find-eaproposf'."
   (mapconcat (lambda (sym) (format fmt sym))
diff --git a/eev-plinks.el b/eev-plinks.el
index 679d9fffb5..ace62b335e 100644
--- a/eev-plinks.el
+++ b/eev-plinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20231219
+;; Version:    20240115
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-plinks.el>
@@ -372,13 +372,16 @@ headers in case of error. This is a quick hack."
 ;;;                                 |___/          
 ;;
 ;; «find-wget» (to ".find-wget")
-;;
+;; See this thread:
+;; https://lists.gnu.org/archive/html/help-gnu-emacs/2024-01/msg00033.html
+;; https://lists.gnu.org/archive/html/help-gnu-emacs/2024-01/threads.html#00033
+
 (defvar ee-wget-program "wget")
 
 (defun find-wget00 (url)
   (find-callprocess00 `(,ee-wget-program "-q" "-O" "-" ,url)))
 
-(defun find-wget (url &rest pos-spec-list)
+(defun find-wget0 (url &rest pos-spec-list)
   "Download URL with \"wget -q -O - URL\" and display the output.
 If a buffer named \"*wget: URL*\" already exists then this
 function visits it instead of running wget again.
@@ -402,6 +405,18 @@ If wget can't download URL then this function runs 
`error'."
        (goto-char (point-min))
        (apply 'ee-goto-position pos-spec-list)))))
 
+(defun find-wget (url &rest pos-spec-list)
+  "Download URL with \"wget -q -O - URL\" and display the output.
+If a buffer named \"*wget: URL*\" already exists then this
+function visits it instead of running wget again.
+If wget can't download URL then this function runs `error'.
+
+The default definition for `find-wget' simply calls `find-wget0'.
+If you need to adjust how `find-wget0' handles encodings,
+redefine `find-wget' to make it call `find-wget0' inside a `let*'
+block."
+  (apply 'find-wget0 url pos-spec-list))
+
 (defun find-wget-elisp (url &rest pos-spec-list)
   "Like `find-wget', but puts the output buffer in emacs-lisp-mode."
   (find-wget url)
diff --git a/eev.el b/eev.el
index 2c636173ac..b2149b7009 100644
--- a/eev.el
+++ b/eev.el
@@ -6,7 +6,7 @@
 ;; Package-Requires: ((emacs "24.4"))
 ;; Keywords: lisp e-scripts
 ;; URL: http://anggtwu.net/#eev
-;; Version: 20240107
+;; Version: 20240115
 
 ;; 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