[elpa] externals/plz 5a9706c1c4: Meta: Require Emacs 27.1 or later

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 5a9706c1c4fbe3d5312820d94ecf63290b1e88ab
Author: Adam Porter 
Commit: Adam Porter 

Meta: Require Emacs 27.1 or later

It's not practical to automatically test with Emacs 26.3 anymore (at
least, not with the CI setup I have).  plz might still work with it,
or it might with minor changes, but I can't offer support for Emacs
26.3 anymore.  Users of that version should probably use an earlier
release of plz.
---
 README.org | 4 +++-
 plz.el | 2 +-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 0a899f0977..b313110d27 100644
--- a/README.org
+++ b/README.org
@@ -190,7 +190,9 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 
 ** 0.9-pre
 
-Nothing new yet.
+*Compatibility*
+
++ The minimum supported Emacs version is now 27.1.  (It is no longer practical 
to test ~plz~ with Emacs versions older than 27.1.  For Emacs 26.3, an earlier 
version of ~plz~ may be used, or this version might be compatible, with or 
without minor changes, which the maintainer cannot offer support for.)
 
 ** 0.8
 
diff --git a/plz.el b/plz.el
index 3d26cff99f..f75168c935 100644
--- a/plz.el
+++ b/plz.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Adam Porter 
 ;; URL: https://github.com/alphapapa/plz.el
 ;; Version: 0.9-pre
-;; Package-Requires: ((emacs "26.3"))
+;; Package-Requires: ((emacs "27.1"))
 ;; Keywords: comm, network, http
 
 ;; This file is part of GNU Emacs.



[nongnu] elpa/cider fd955070f8 1/2: Remove useless bit of code from cheatsheet

2024-05-25 Thread ELPA Syncer
branch: elpa/cider
commit fd955070f8ab7d8bcc3b373c93da0a75246c2d57
Author: Kato Muso 
Commit: Bozhidar Batsov 

Remove useless bit of code from cheatsheet
---
 cider-cheatsheet.el | 5 +
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/cider-cheatsheet.el b/cider-cheatsheet.el
index 2bbe104cdb..a7ce40dac2 100644
--- a/cider-cheatsheet.el
+++ b/cider-cheatsheet.el
@@ -551,10 +551,7 @@ This list is supposed to have the following format:
   "Expand the symbols in VAR-LIST to fully-qualified var names.
 
 The list can hold one or more lists inside - one per each namespace."
-  (let ((namespaced-vars (seq-mapcat #'cider-cheatsheet--expand-vars
- (seq-remove (lambda (list)
-   (eq (car list) :url))
- var-list
+  (let ((namespaced-vars (seq-mapcat #'cider-cheatsheet--expand-vars 
var-list)))
 (cider-doc-lookup (completing-read "Select var: " namespaced-vars
 
 ;;;###autoload



[nongnu] elpa/cider 8be2bcffca 2/2: Teach codespell about eduction and unform

2024-05-25 Thread ELPA Syncer
branch: elpa/cider
commit 8be2bcffca2c58491ec24255a760302f1c81562f
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Teach codespell about eduction and unform
---
 codespell.txt | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/codespell.txt b/codespell.txt
index 5158a017f1..d7291aa3f9 100644
--- a/codespell.txt
+++ b/codespell.txt
@@ -1,5 +1,7 @@
+debbugs
 edn
+eduction
 hist
 juxt
 nd
-debbugs
+unform



[nongnu] elpa/cider updated (b6e9448ec1 -> 8be2bcffca)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch elpa/cider.

  from  b6e9448ec1 Update cheatsheet to v55
   new  fd955070f8 Remove useless bit of code from cheatsheet
   new  8be2bcffca Teach codespell about eduction and unform


Summary of changes:
 cider-cheatsheet.el | 5 +
 codespell.txt   | 4 +++-
 2 files changed, 4 insertions(+), 5 deletions(-)



[elpa] main updated (d5ea227a37 -> e926c4cd4c)

2024-05-25 Thread Philip Kaludercic
zge pushed a change to branch main.

  from  d5ea227a37 * elpa-packages (window-tool-bar): New core package
   new  879861de4d * html/layout.css (table): margin: 1em 0 1em
   new  e926c4cd4c * html/layout.css: Improve readability of DL elements


Summary of changes:
 html/layout.css | 20 +---
 1 file changed, 5 insertions(+), 15 deletions(-)



[elpa] main 879861de4d 1/2: * html/layout.css (table): margin: 1em 0 1em

2024-05-25 Thread Philip Kaludercic
branch: main
commit 879861de4d9983f82e8016b360bb86bebe8635a1
Author: Adam Porter 
Commit: Philip Kaludercic 

* html/layout.css (table): margin: 1em 0 1em

Ensure some margin around tables, otherwise they run up against body
text and other tables.
---
 html/layout.css | 1 +
 1 file changed, 1 insertion(+)

diff --git a/html/layout.css b/html/layout.css
index e0746d96c0..f01814a7bb 100644
--- a/html/layout.css
+++ b/html/layout.css
@@ -54,6 +54,7 @@ q:before, q:after {
 table {
   border-collapse: collapse;
   border-spacing: 0;
+  margin: 1em 0 1em;
 }
 
 /* End of reset */



[elpa] main e926c4cd4c 2/2: * html/layout.css: Improve readability of DL elements

2024-05-25 Thread Philip Kaludercic
branch: main
commit e926c4cd4c36f514209425ed23013eb9dd92fca9
Author: Adam Porter 
Commit: Philip Kaludercic 

* html/layout.css: Improve readability of DL elements

(dl): Don't decrease font size.  Indent list slightly to set off from
body text.
(dt): Don't limit width.  Don't display inline.  Ensure small margin
above each term.
(dd): Don't limit width.  Don't display inline.

While DL lists might be expected to be, e.g. a glossary, where each DT
element is just one term, these lists are commonly used for other
purposes, in which DT elements may be a sentence or more; this is
especially so for some ELPA packages' manuals which are exported to
HTML from Org files.  Cramming these terms into a narrow column next
to their definition makes such lists hard to read.  Instead, this
change puts the terms and definitions on their own lines.
---
 html/layout.css | 19 ---
 1 file changed, 4 insertions(+), 15 deletions(-)

diff --git a/html/layout.css b/html/layout.css
index f01814a7bb..0a80942dea 100644
--- a/html/layout.css
+++ b/html/layout.css
@@ -168,24 +168,13 @@ p.centered {
 }
 
 dl {
-  margin: 30px 0;
-  font-size: .8em;
+  margin: 30px 2em;
 }
 
 dt {
-  font-weight: bold;
-  width: 300px;
-  display: inline-block;
-  vertical-align: top;
-}
-
-dd {
-  /* We should reduce vertical space use in the "header".
- Yuan Fu  suggested to do that simply by
- commenting this out:
- margin-bottom: 10px; */
-  width: 460px;
-  display: inline-block;
+font-weight: bold;
+margin: 0.25em 0 0 0;
+vertical-align: top;
 }
 
 .button {



[elpa] main 5bf6ba661e: ; * layout.css (dl): Reindent block

2024-05-25 Thread Philip Kaludercic
branch: main
commit 5bf6ba661e56998b399bb308a92cf631a93c2a3a
Author: Philip Kaludercic 
Commit: Philip Kaludercic 

; * layout.css (dl): Reindent block
---
 html/layout.css | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/html/layout.css b/html/layout.css
index 0a80942dea..0b22aad5ee 100644
--- a/html/layout.css
+++ b/html/layout.css
@@ -172,9 +172,9 @@ dl {
 }
 
 dt {
-font-weight: bold;
-margin: 0.25em 0 0 0;
-vertical-align: top;
+  font-weight: bold;
+  margin: 0.25em 0 0 0;
+  vertical-align: top;
 }
 
 .button {



[elpa] externals/csv-mode 2e4e55a6fe: Add function for reading a CSV line and return its values as a list.

2024-05-25 Thread Philip Kaludercic
branch: externals/csv-mode
commit 2e4e55a6feb7894652b1d6e78d5a230fa84cb1b1
Author: Joost Kremers 
Commit: Philip Kaludercic 

Add function for reading a CSV line and return its values as a list.

* (csv-parse-current-row): New function; unlike csv--collect-fields,
  unquotes the field values.
* (csv--unquote-value): New function.
---
 csv-mode-tests.el | 26 ++
 csv-mode.el   | 26 +-
 2 files changed, 51 insertions(+), 1 deletion(-)

diff --git a/csv-mode-tests.el b/csv-mode-tests.el
index 0caeab7d80..12e009ecf9 100644
--- a/csv-mode-tests.el
+++ b/csv-mode-tests.el
@@ -144,5 +144,31 @@
  (csv--separator-score ?\; csv-tests--data
(length csv-tests--data)
 
+(ert-deftest csv-tests-unquote-value ()
+  (should (equal (csv--unquote-value "Hello, World")
+ "Hello, World"))
+  (should (equal (csv--unquote-value "\"Hello, World\"")
+ "Hello, World"))
+  (should (equal (csv--unquote-value "Hello, \"\"World")
+ "Hello, \"\"World"))
+  (should (equal (csv--unquote-value "\"Hello, \"\"World\"\"\"")
+ "Hello, \"World\""))
+  (should (equal (csv--unquote-value "'Hello, World'")
+ "'Hello, World'"))
+  (should (equal (let ((csv-field-quotes '("\"" "'")))
+   (csv--unquote-value "\"Hello, World'"))
+ "\"Hello, World'"))
+  (should (equal (let ((csv-field-quotes '("\"" "'")))
+   (csv--unquote-value "'Hello, World'"))
+ "Hello, World"))
+  (should (equal (let ((csv-field-quotes '("\"" "'")))
+   (csv--unquote-value "'Hello, ''World'''"))
+ "Hello, 'World'"))
+  (should (equal (let ((csv-field-quotes '("\"" "'")))
+   (csv--unquote-value "'Hello, \"World\"'"))
+ "Hello, \"World\""))
+  (should (equal (csv--unquote-value "|Hello, World|")
+ "|Hello, World|")))
+
 (provide 'csv-mode-tests)
 ;;; csv-mode-tests.el ends here
diff --git a/csv-mode.el b/csv-mode.el
index f639dcf59a..ebcd9da744 100644
--- a/csv-mode.el
+++ b/csv-mode.el
@@ -4,7 +4,7 @@
 
 ;; Author: "Francis J. Wright" 
 ;; Maintainer: emacs-de...@gnu.org
-;; Version: 1.23
+;; Version: 1.24
 ;; Package-Requires: ((emacs "27.1") (cl-lib "0.5"))
 ;; Keywords: convenience
 
@@ -107,6 +107,10 @@
 
 ;;; News:
 
+;; Since 1.24
+;; - New function `csv--unquote-value'.
+;; - New function `csv-parse-current-row'.
+
 ;; Since 1.21:
 ;; - New command `csv-insert-column'.
 ;; - New config var `csv-align-min-width' for `csv-align-mode'.
@@ -1400,6 +1404,26 @@ point is assumed to be at the beginning of the line."
  (forward-char)))
(nreverse fields)
 
+(defun csv--unquote-value (value)
+  "Remove quotes around VALUE.
+If VALUE contains escaped quote characters, un-escape them.  If
+VALUE is not quoted, return it unchanged."
+  (save-match-data
+(let ((quote-regexp (apply #'concat `("[" ,@csv-field-quotes "]"
+  (if-let (((string-match (concat "^\\(" quote-regexp "\\)\\(.*\\)\\(" 
quote-regexp "\\)$") value))
+   (quote-char (match-string 1 value))
+   ((equal quote-char (match-string 3 value)))
+   (unquoted (match-string 2 value)))
+  (replace-regexp-in-string (concat quote-char quote-char) quote-char 
unquoted)
+value
+
+(defun csv-parse-current-row ()
+  "Parse the current CSV line.
+Return the field values as a list."
+  (save-mark-and-excursion
+(goto-char (line-beginning-position))
+(mapcar #'csv--unquote-value (csv--collect-fields (line-end-position)
+
 (defvar-local csv--header-line nil)
 (defvar-local csv--header-hscroll nil)
 (defvar-local csv--header-string nil)



[elpa] externals/dape 1406ea80f4: Remove recursive evaluation of hover variable

2024-05-25 Thread ELPA Syncer
branch: externals/dape
commit 1406ea80f4a6ca41e6fda31192f662e2b076e165
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Remove recursive evaluation of hover variable

Performance hit is noticeable with only the 1 recursive variable call
with adapters who move set column value in stackFrames.
---
 dape.el | 56 +---
 1 file changed, 21 insertions(+), 35 deletions(-)

diff --git a/dape.el b/dape.el
index b111c32a41..24ca4753d6 100644
--- a/dape.el
+++ b/dape.el
@@ -621,12 +621,6 @@ See `dape--default-cwd'."
 The hook is run with one argument, the compilation buffer."
   :type 'hook)
 
-(defcustom dape-eldoc-variable-expand 1
-  "Levels of variable expansion in `eldoc-doc-buffer'.
-Note: Expanding variable levels above 1 might have an noticeable
-performance hit."
-  :type 'natnum)
-
 (defcustom dape-minibuffer-hint-ignore-properties
   '(ensure fn modes command command-args :type :request)
   "Properties to be hidden in `dape--minibuffer-hint'."
@@ -5203,35 +5197,27 @@ See `dape--config-mode-p' how \"valid\" is defined."
   "Hook function to produce doc strings for `eldoc'.
 On success calls CB with the doc string.
 See `eldoc-documentation-functions', for more information."
-  (cl-flet ((expand-p (path &optional object)
-  (and (not (eq (plist-get object :expensive) t))
-   (length< path dape-eldoc-variable-expand
-(and-let* ((conn (dape--live-connection 'last t))
-   ((dape--capable-p conn :supportsEvaluateForHovers))
-   (symbol (thing-at-point 'symbol)))
-  (dape--with-request-bind
-  (body error)
-  (dape--evaluate-expression conn
- (plist-get (dape--current-stack-frame 
conn) :id)
- (substring-no-properties symbol)
- "hover")
-(unless error
-  (let ((table (make-gdb-table)))
-(setf (gdb-table-right-align table)
-  dape-info-variable-table-aligned)
-(dape--with-request (dape--variables conn body)
-  (dape--with-request (dape--variables-recursive conn body nil 
#'expand-p)
-(dape--info-scope-add-variable table body 'watch '(_) 
#'expand-p nil)
-(funcall cb (gdb-table-string table " ")
- :thing symbol
- :face 'font-lock-variable-name-face
- :echo (format "%s %s"
-   (or (plist-get body :value)
-   (plist-get body :result)
-   "")
-   (or (plist-get body :type)
-   ""))
-  t)
+   (and-let* ((conn (dape--live-connection 'last t))
+  ((dape--capable-p conn :supportsEvaluateForHovers))
+  (symbol (thing-at-point 'symbol)))
+ (dape--with-request-bind
+ (body error)
+ (dape--evaluate-expression conn
+(plist-get (dape--current-stack-frame 
conn) :id)
+(substring-no-properties symbol)
+"hover")
+   (unless error
+ (funcall cb
+  (format "%s %s"
+  (or (plist-get body :value)
+  (plist-get body :result)
+  "")
+  (propertize
+   (or (plist-get body :type) "")
+   'face 'font-lock-type-face))
+  :thing symbol
+  :face 'font-lock-variable-name-face
+   t)
 
 (defun dape--add-eldoc-hook ()
   "Add `dape-hover-function' from eldoc hook."



[elpa] externals/dape a3f8947e6e 1/2: Cache mode line format for performance reasons

2024-05-25 Thread ELPA Syncer
branch: externals/dape
commit a3f8947e6e3f2faf5dbc43491ac927e2de793603
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Cache mode line format for performance reasons
---
 dape.el | 41 +++--
 1 file changed, 23 insertions(+), 18 deletions(-)

diff --git a/dape.el b/dape.el
index 24ca4753d6..c758892dae 100644
--- a/dape.el
+++ b/dape.el
@@ -5234,32 +5234,37 @@ See `eldoc-documentation-functions', for more 
information."
   "Update Dape mode line with STATE symbol for adapter CONN."
   (setf (dape--state conn) state)
   (setf (dape--state-reason conn) reason)
+  (dape--mode-line-format)
   (force-mode-line-update t))
 
+(defvar dape--mode-line-format nil
+  "Dape mode line format.")
+
+(put 'dape--mode-line-format 'risky-local-variable t)
+
 (defun dape--mode-line-format ()
-  "Format Dape mode line."
+  "Update `dape--mode-line-format' format."
   (let ((conn (or (dape--live-connection 'last t)
   dape--connection)))
-(concat (propertize "dape" 'face 'font-lock-constant-face)
+(setq dape--mode-line-format
+  `((:propertize "dape"
+ face font-lock-constant-face)
 ":"
-(propertize
- (format "%s" (or (and conn (dape--state conn))
-  'unknown))
- 'face 'font-lock-doc-face)
-(when-let ((reason (and conn (dape--state-reason conn
-  (format "/%s" (propertize reason
-'face 'font-lock-doc-face)))
-(when-let* ((conns (dape--live-connections))
-(nof-conns
- (length (cl-remove-if-not 'dape--threads conns)))
-((> nof-conns 1)))
-  (propertize (format "(%s)" nof-conns)
-  'face 'shadow
-  'help-echo "Active child connections")
+(:propertize ,(format "%s" (or (and conn (dape--state conn))
+   'unknown))
+ face font-lock-doc-face)
+,@(when-let ((reason (and conn (dape--state-reason conn
+`("/" (:propertize ,reason face font-lock-doc-face)))
+,@(when-let* ((conns (dape--live-connections))
+  (nof-conns
+   (length (cl-remove-if-not 'dape--threads conns)))
+  ((> nof-conns 1)))
+`((:propertize ,(format "(%s)" nof-conns)
+   face shadow
+   help-echo "Active child connections")))
 
 (add-to-list 'mode-line-misc-info
- `(dape-active-mode
-   (" [" (:eval (dape--mode-line-format)) "] ")))
+ `(dape-active-mode ("[" dape--mode-line-format "]")))
 
 
 ;;; Keymaps



[elpa] externals/dape updated (1406ea80f4 -> 301f379f23)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch externals/dape.

  from  1406ea80f4 Remove recursive evaluation of hover variable
   new  a3f8947e6e Cache mode line format for performance reasons
   new  301f379f23 Fix docstring spelling


Summary of changes:
 dape.el | 43 ---
 1 file changed, 24 insertions(+), 19 deletions(-)



[elpa] externals/dape 301f379f23 2/2: Fix docstring spelling

2024-05-25 Thread ELPA Syncer
branch: externals/dape
commit 301f379f23b636e4c3afac4218337aa771e18171
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Fix docstring spelling
---
 dape.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/dape.el b/dape.el
index c758892dae..7844a30414 100644
--- a/dape.el
+++ b/dape.el
@@ -3320,7 +3320,7 @@ with HELP-ECHO string, MOUSE-FACE and FACE."
 
 (defun dape--info-set-header-line-format ()
   "Helper for dape info buffers to set header line.
-Header line is custructed from buffer local
+Header line is constructed from buffer local
 `dape--info-buffer-related'."
   (setq header-line-format
 (mapcan



[elpa] externals/auctex 6b1c1f6da3: Tune byte compile condition

2024-05-25 Thread ELPA Syncer
branch: externals/auctex
commit 6b1c1f6da312fc113a80bedabf703f8cff5cd6d6
Author: Ikumi Keita 
Commit: Ikumi Keita 

Tune byte compile condition

* lpath.el: Add appropriate file local variables section to suppress
spurious byte compile.
* GNUmakefile: Make sure that tex-site.elc is generated.
---
 GNUmakefile | 2 +-
 lpath.el| 6 ++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/GNUmakefile b/GNUmakefile
index 4f90cd071e..73bdeacee4 100644
--- a/GNUmakefile
+++ b/GNUmakefile
@@ -42,7 +42,7 @@ ALL_GENERATED_FILES=$(MAIN_GENERATED_FILES)   \
 # Generate & compile everything including the manuals below doc/.
 all: $(ALL_GENERATED_FILES) compile auctex-autoloads.el
 
-compile: $(patsubst %.el,%.elc,$(wildcard *.el style/*.el))
+compile: $(patsubst %.el,%.elc,$(wildcard *.el style/*.el)) tex-site.elc
 
 # If we were depending on emacs 29.1, we could simply use
 # loaddefs-generate.  If we were depending on 28.1, we could still use
diff --git a/lpath.el b/lpath.el
index f43a98418b..021ed463c0 100644
--- a/lpath.el
+++ b/lpath.el
@@ -11,3 +11,9 @@
   (add-to-list 'load-path (expand-file-name "style" auctex-dir))
   (setq TeX-lisp-directory ""
 TeX-auto-global ""))
+
+;; Local Variables:
+;; no-byte-compile: t
+;; no-update-autoloads: t
+;; no-native-compile: t
+;; End:



[elpa] externals/mpdired updated (b3ea71a548 -> ff0fbe1003)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch externals/mpdired.

  from  b3ea71a548 typo
   new  adf0efb64d fix `mpdired--subdir-p'
   new  ff0fbe1003 Bump version


Summary of changes:
 mpdired.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)



[elpa] externals/mpdired adf0efb64d 1/2: fix `mpdired--subdir-p'

2024-05-25 Thread ELPA Syncer
branch: externals/mpdired
commit adf0efb64d0e3efc712cd4d3b02a6dc9bc07575d
Author: Manuel Giraud 
Commit: Manuel Giraud 

fix `mpdired--subdir-p'

`mpdired--subdir-p' falsely returned t for sibling directory names
where one is a substring of the other. For instance:
   Artist A/Album
   Artist A/Album 2

In such case, "Album 2" would not appear in the browser view.
---
 mpdired.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mpdired.el b/mpdired.el
index 279a811c50..ad9fac1840 100644
--- a/mpdired.el
+++ b/mpdired.el
@@ -186,8 +186,8 @@
 
 (defun mpdired--subdir-p (dir-a dir-b)
   "Is DIR-B a sub-directory of DIR-A?"
-  (let ((pos (string-search dir-a dir-b)))
-(and pos (zerop pos
+  (or (string-empty-p dir-a)
+  (string-prefix-p (concat dir-a "/") dir-b)))
 
 (defvar mpdired--eot "^\\(OK\\|ACK.*\\)$"
   "Regexp for end of transmission of a MPD command.")



[elpa] externals/mpdired ff0fbe1003 2/2: Bump version

2024-05-25 Thread ELPA Syncer
branch: externals/mpdired
commit ff0fbe100360fbcc25d1e6f3b9120770d759fcfa
Author: Manuel Giraud 
Commit: Manuel Giraud 

Bump version
---
 mpdired.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mpdired.el b/mpdired.el
index ad9fac1840..98b243455a 100644
--- a/mpdired.el
+++ b/mpdired.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 2024  Free Software Foundation, Inc.
 
-;; Version: 2-pre
+;; Version: 2
 ;; Package-Requires: ((emacs "29"))
 
 ;; Author: Manuel Giraud 



[elpa] externals/gnu-elpa-keyring-update 1e8726c459: (gnu-elpa-keyring-update): Install the new keys even into empty keyring

2024-05-25 Thread Stefan Monnier via
branch: externals/gnu-elpa-keyring-update
commit 1e8726c459258fba62ee38807abdae4e350e5238
Author: Stefan Monnier 
Commit: Stefan Monnier 

(gnu-elpa-keyring-update): Install the new keys even into empty keyring
---
 gnu-elpa-keyring-update.el | 20 +---
 1 file changed, 13 insertions(+), 7 deletions(-)

diff --git a/gnu-elpa-keyring-update.el b/gnu-elpa-keyring-update.el
index 758ae1ab1a..7ed604d9e5 100644
--- a/gnu-elpa-keyring-update.el
+++ b/gnu-elpa-keyring-update.el
@@ -1,11 +1,11 @@
 ;;; gnu-elpa-keyring-update.el --- Update Emacs's GPG keyring for GNU ELPA  
-*- lexical-binding: t; -*-
 
-;; Copyright (C) 2019-2022  Free Software Foundation, Inc.
+;; Copyright (C) 2019-2024  Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier 
 ;; Keywords: maint, tools
 ;; Package-Type: multi
-;; Version: 2022.12
+;; Version: 2022.12.1
 
 ;; 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
@@ -36,6 +36,14 @@
 ;; temporarily disable signature verification (see variable
 ;;   `package-check-signature') :-(
 
+;;; News:
+
+;; Since 2022.12:
+;; - Fix a bug where the new keys could end up remaining non-installed.
+;;
+;; Since 2019.3:
+;; - New GPG keys
+
 ;;; Code:
 
 ;;;###autoload
@@ -71,11 +79,9 @@
   (let ((gnupghome-dir (or (bound-and-true-p package-gnupghome-dir)
(expand-file-name "gnupg"
  package-user-dir
-(if (not (file-directory-p gnupghome-dir))
-(error "No keyring to update!")
-  (package-import-keyring (gnu-elpa-keyring-update--keyring))
-  (write-region "" nil (expand-file-name "gnu-elpa.timestamp" 
gnupghome-dir)
-nil 'silent
+(package-import-keyring (gnu-elpa-keyring-update--keyring))
+(write-region "" nil (expand-file-name "gnu-elpa.timestamp" gnupghome-dir)
+  nil 'silent)))
 
 ;; FIXME: Maybe we should use an advice on `package--check-signature'
 ;; so as to avoid this startup cost?



[elpa] externals/hyperbole 4d5293086a 02/18: * hywiki.el - Remove autoload from defib to fix autoload error

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 4d5293086a786fc122332e75c8ce3cd723b7c55a
Author: Bob Weiner 
Commit: Bob Weiner 

* hywiki.el - Remove autoload from defib to fix autoload error
---
 ChangeLog | 4 
 hywiki.el | 4 +---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 9d7fd5ef74..d366717c57 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2024-04-23  Bob Weiner  
+
+* hywiki.el: Remove autoload from defib and 'hywiki-open', fixing autoload 
error.
+
 2024-04-22  Bob Weiner  
 
 * hywiki.el: Add new auto-wikiword note-taking system with `hywiki' ibtype.
diff --git a/hywiki.el b/hywiki.el
index 0e3798ef40..7c59b69614 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 22-Apr-24 at 02:22:28 by Bob Weiner
+;; Last-Mod: 23-Apr-24 at 18:49:43 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -139,7 +139,6 @@ the HyWiki word and grouping 2 is the #section with the # 
included.")
 ;;; Public Implicit Button and Action Types
 ;;; 
 
-;;;###autoload
 (defib hywiki ()
   "When on a HyWiki word, display its page and optional section."
   (let* ((page-name (hywiki-at-wikiword)))
@@ -148,7 +147,6 @@ the HyWiki word and grouping 2 is the #section with the # 
included.")
   (hywiki-highlight-page-name t)
   (hact 'hywiki-open page-name
 
-;;;###autoload
 (defun hywiki-open (page-name)
   "Display HyWiki PAGE-NAME.  Prompt to create if non-existent."
   (interactive (list (completing-read "HyWiki page: " (hywiki-page-list



[elpa] externals/hyperbole updated (61937530ea -> 36e6dc66d3)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch externals/hyperbole.

  from  61937530ea Add info about Emacs native comp (#529)
   new  dbc6f35360 Add initial version of "hywiki.el" and the hywiki ibtype
   new  4d5293086a * hywiki.el - Remove autoload from defib to fix autoload 
error
   new  1d551be5bb hywiki.el - Fixes and performance improvements
   new  b7931000aa hui-em-but.el - Comment out non-load if non-interactive 
for hywiki
   new  424203e56c hywiki.el - Conditionaly load company-mode backend 
function
   new  fa74da7539 hpath.el - Fix to always trim paths and expand shell 
paths
   new  4e9cc5f25a hyrolo-name-at-p - Fix to test point is in 
'hyrolo-display-buffer'
   new  c3f8c4bc48 hact.el (actype:act, action:params): Add Emacs 30 
closure support
   new  3709b59088 hywiki.el - Add hywiki minor mode and highlighting after 
punct
   new  64ce04dc4a hywiki.el - Enable hywiki-mode on hywiki pages and 
highlight
   new  3fb1173075 Merge branch 'master' into rsw
   new  fffbd7c255 hywiki.el - Fix old/bad function name references
   new  ee3e970cbd hywiki.el - Define 'hywiki--buttonize-characters' before 
use
   new  cedb626489 hywiki.el - Eliminate circular dep on 
`hywiki--buttonize-characters'
   new  2da96d8b06 Fix gbut:act to global button context is the current 
buffer
   new  893b778fcc Add first release of HyWiki to merge
   new  232ed572d8 Merge branch 'master' into rsw
   new  36e6dc66d3 Merge pull request #521 from rswgnu/rsw


Summary of changes:
 ChangeLog| 167 ++
 MANIFEST |   4 +
 Makefile |  10 +-
 hact.el  |  14 +-
 hasht.el | 432 
 hbut.el  |  24 +-
 hibtypes.el  |  35 ++-
 hpath.el | 162 +++---
 hsys-org.el  |  21 +-
 hui-em-but.el|  81 +--
 hui.el   |   8 +-
 hyrolo.el|  67 +++---
 hywiki.el| 601 +++
 test/hyrolo-tests.el |  14 +-
 14 files changed, 1462 insertions(+), 178 deletions(-)
 create mode 100644 hasht.el
 create mode 100644 hywiki.el



[elpa] externals/hyperbole 893b778fcc 16/18: Add first release of HyWiki to merge

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 893b778fccb48a2c41d34d7a8402fd7a63d0bc16
Author: bw 
Commit: bw 

Add first release of HyWiki to merge
---
 ChangeLog   |  21 ++
 hibtypes.el |  23 +++---
 hsys-org.el |   4 +-
 hywiki.el   | 238 +---
 4 files changed, 168 insertions(+), 118 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index a64af91041..386af52a05 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,12 +2,30 @@
 
 * hbut.el (ibtype:delete): Fix interactive call.
 
+* hywiki.el (hywiki-remap-buttonize-characters): Add .
+(hywiki-highlight-page-name): Fix to highlight page
+name regardless of how much whitespace comes after the name.
+(hywiki-mode): Expand doc and add/remove 'post-self-insert-hook'
+call of 'hywiki-buttonize'.
+(hywiki-remap-buttonize-characters, hywiki-initialize-mode-map):
+Remove these and move keymap init into 'hywiki-mode' definition.
+(hywiki-buttonize): Rewrite to highlight hywiki word to the left of
+point iff last inserted char is in the set of 
'hywiki--buttonize-characters'.
+Rename to 'hywiki-buttonize-character-commands'.
+   (hywiki-buttonize-non-character-commands): Add.
+
 * hbut.el (gbut:act): Set 'loc to current-buffer, not the gbut's
 source buffer.
   (hbut:key-src-set-buffer): Clarify doc.
   (hbut:funcall): Change to use 'hbut:key-src-set-buffer' to
 temporarily set current-buffer to button's loc attribute.
 
+* hywiki.el (hywiki-get-page-files): Check that 'hywiki-directory'
+exists and is readable.
+   (hywiki-is-wikiword): Make case-sensitive.
+  (hywiki-at-wikiword): Remove optional 'org-link-flag' arg
+use 'ibut:label-p' to get HyWikiWord.
+
 2024-05-23  Bob Weiner  
 
 * hact.el (actype:delete): Fix interactive spec, eliminating use of
@@ -20,6 +38,9 @@
 * hywiki.el (hywiki-remap-buttonize-characters): Move initialization of
 'hywiki--buttonize-characters' here instead of at variable definition
 to eliminate circular load dependency.
+   (find-file-hook): Remove add-hook on 'org-mode-hook'.
+  (hywiki-find-page): Add post 'hywiki-find-page-hook' and return
+absolute path to the found page.
 
 * hibtypes.el (grep-msg): Fix that when no source-loc, file path was not
 expanded.
diff --git a/hibtypes.el b/hibtypes.el
index 532ac80fe7..ed2156f614 100644
--- a/hibtypes.el
+++ b/hibtypes.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:19-Sep-91 at 20:45:31
-;; Last-Mod: 19-May-24 at 03:52:05 by Bob Weiner
+;; Last-Mod: 25-May-24 at 10:11:05 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -366,16 +366,17 @@ attached file."
(let ((chr (aref (buffer-name) 0)))
  (not (or (eq chr ?\ ) (eq chr ?*
(not (apply #'derived-mode-p '(prog-mode c-mode objc-mode c++-mode 
java-mode markdown-mode org-mode)))
-   (let ((ref (hattr:get 'hbut:current 'lbl-key))
-(lbl-start (hattr:get 'hbut:current 'lbl-start)))
- (and ref
- lbl-start
- (eq ?w (char-syntax (aref ref 0)))
-  (not (string-match "[#@]" ref))
- (save-excursion
-   (goto-char lbl-start)
-   (ibut:label-p t "[" "]" t))
-  (hact 'annot-bib ref)
+   (unless (ibut:label-p t "[[" "]]" t) ;; Org link
+(let ((ref (hattr:get 'hbut:current 'lbl-key))
+  (lbl-start (hattr:get 'hbut:current 'lbl-start)))
+   (and ref
+   lbl-start
+   (eq ?w (char-syntax (aref ref 0)))
+   (not (string-match "[#@]" ref))
+   (save-excursion
+ (goto-char lbl-start)
+ (ibut:label-p t "[" "]" t))
+   (hact 'annot-bib ref))
 
 ;;; 
 ;;; Follows Org links that are in non-Org mode buffers
diff --git a/hsys-org.el b/hsys-org.el
index 6d7f6f9882..853a88aeb6 100644
--- a/hsys-org.el
+++ b/hsys-org.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 2-Jul-16 at 14:54:14
-;; Last-Mod: 21-Apr-24 at 12:17:44 by Bob Weiner
+;; Last-Mod: 25-May-24 at 10:22:57 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -411,7 +411,7 @@ or is looking for an Org link in another buffer type."
;; return nil from this function and let ibtypes handle this
;; as a HyWiki word.
(if (fboundp 'hywiki-at-wikiword)
-   (if (hywiki-at-wikiword t)
+   (if (hywiki-at-wikiword)
(when (or hywiki-org-link-type-required
  (hyperb:stack-frame '(hywiki-at-wikiword)))
  in-org-link)
diff --git a/hywiki.el b/hywiki.el
index a12584a900..a9bfe1f8db 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -2,8 +2,8 @@
 ;;
 ;; Author:   Bob Weiner

[elpa] externals/hyperbole 4e9cc5f25a 07/18: hyrolo-name-at-p - Fix to test point is in 'hyrolo-display-buffer'

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 4e9cc5f25a2ffca9692f0ea544d0fd17e555ee45
Author: Bob Weiner 
Commit: Bob Weiner 

hyrolo-name-at-p - Fix to test point is in 'hyrolo-display-buffer'
---
 ChangeLog |  4 
 hyrolo.el | 67 ---
 2 files changed, 38 insertions(+), 33 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 4ce6749714..fe56abcc29 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2024-05-06  Bob Weiner  
+
+* hyrolo.el (hyrolo-name-at-p): Fix to test point is in 
'hyrolo-display-buffer'.
+
 2024-05-05  Bob Weiner  
 
 * hpath.el (hpath:delimited-possible-path): Rewrite to expand both delimited
diff --git a/hyrolo.el b/hyrolo.el
index 1c8b5316eb..136a330ff6 100644
--- a/hyrolo.el
+++ b/hyrolo.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 7-Jun-89 at 22:08:29
-;; Last-Mod:  7-Apr-24 at 18:40:47 by Bob Weiner
+;; Last-Mod:  6-May-24 at 00:20:13 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -3080,38 +3080,39 @@ Name is returned as `last, first-and-middle'."
 (defun hyrolo-name-at-p ()
   "Iff point is at or within an entry in `hyrolo-display-buffer', return 
non-nil.
 Any non-nil value returned is a cons of ( . )."
-  (let ((entry-source (hbut:get-key-src t))
-   (col-num (current-column))
-   (line-start (line-beginning-position))
-   (line-end (line-end-position)))
-(when entry-source
-  (save-excursion
-   (forward-line 0)
-   (let (case-fold-search
- entry-line
- entry-name)
- (if (and (or (looking-at hyrolo-hdr-and-entry-regexp)
-  (re-search-backward hyrolo-hdr-and-entry-regexp nil t))
-  (save-match-data (not (looking-at hyrolo-hdr-regexp
- (progn (goto-char (match-end 0))
-(skip-chars-forward " \t")
-(when (or (looking-at "[^ \t\n\r]+ ?, ?[^ \t\n\r]+")
-  (looking-at "\\( ?[^ \t\n\r]+\\)+"))
-  (setq entry-name (match-string-no-properties 0)
-entry-line (buffer-substring-no-properties 
line-start line-end))
-  ;; Add a text-property of 'hyrolo-name-entry with
-  ;; value of (entry-line . current-column) to entry-name.
-  (put-text-property 0 1 'hyrolo-name-entry
- (cons entry-line col-num)
- entry-name)
-  (cons entry-name entry-source)))
-   ;; If not blank, return the current line as the name with
-   ;; a text-property of 'hyrolo-line-entry with value of 
(current-column).
-   (goto-char line-start)
-   (when (not (looking-at "[ \t\f]*$"))
- (setq entry-line (buffer-substring-no-properties line-start 
line-end))
- (put-text-property 0 1 'hyrolo-line-entry col-num entry-line)
- (cons entry-line entry-source
+  (when (eq (current-buffer) (get-buffer hyrolo-display-buffer))
+(let ((entry-source (hbut:get-key-src t))
+ (col-num (current-column))
+ (line-start (line-beginning-position))
+ (line-end (line-end-position)))
+  (when entry-source
+   (save-excursion
+ (forward-line 0)
+ (let (case-fold-search
+   entry-line
+   entry-name)
+   (if (and (or (looking-at hyrolo-hdr-and-entry-regexp)
+(re-search-backward hyrolo-hdr-and-entry-regexp nil t))
+(save-match-data (not (looking-at hyrolo-hdr-regexp
+   (progn (goto-char (match-end 0))
+  (skip-chars-forward " \t")
+  (when (or (looking-at "[^ \t\n\r]+ ?, ?[^ \t\n\r]+")
+(looking-at "\\( ?[^ \t\n\r]+\\)+"))
+(setq entry-name (match-string-no-properties 0)
+  entry-line (buffer-substring-no-properties 
line-start line-end))
+;; Add a text-property of 'hyrolo-name-entry with
+;; value of (entry-line . current-column) to 
entry-name.
+(put-text-property 0 1 'hyrolo-name-entry
+   (cons entry-line col-num)
+   entry-name)
+(cons entry-name entry-source)))
+ ;; If not blank, return the current line as the name with
+ ;; a text-property of 'hyrolo-line-entry with value of 
(current-column).
+ (goto-char line-start)
+ (when (not (looking-at "[ \t\f]*$"))
+   (setq entry-line (buffer-substring-no-properties line-start 
line-end))
+   (put-text-property 0 1 'hyrolo-line-entry col-num entry-line)
+   (cons entry-line entry-source)
 
 (define-der

[elpa] externals/hyperbole 232ed572d8 17/18: Merge branch 'master' into rsw

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 232ed572d8df97a5bec575bc9a8656816ec675e3
Merge: 893b778fcc 61937530ea
Author: bw 
Commit: bw 

Merge branch 'master' into rsw
---
 ChangeLog |  2 ++
 hypb.el   | 11 ---
 2 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 386af52a05..4abf34d01b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -93,6 +93,8 @@
 
 2024-05-18  Mats Lidell  
 
+* hypb.el (hypb:configuration): Add info about Emacs native comp.
+
 * hargs.el (hargs:action-get): Add Emacs 30 closure support.
 
 2024-05-17  Mats Lidell  
diff --git a/hypb.el b/hypb.el
index 5157c2d26c..c35f4a0da9 100644
--- a/hypb.el
+++ b/hypb.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 6-Oct-91 at 03:42:38
-;; Last-Mod: 10-Mar-24 at 11:51:55 by Bob Weiner
+;; Last-Mod: 18-May-24 at 18:00:28 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -328,8 +328,13 @@ Use optional OUT-BUF if present, else the current buffer."
   (goto-char (point-max)))
 (delete-blank-lines) (delete-blank-lines)
 (let ((start (point)))
-  (insert (format "I use:\tEditor:  GNU Emacs %s\n\tHyperbole:   %s\n"
- emacs-version hyperb:version))
+  (insert (format "I use:\tEditor:  GNU Emacs %s %s\n\tHyperbole:   
%s\n"
+ emacs-version
+  (if (and (fboundp #'native-comp-available-p)
+   (native-comp-available-p))
+  "with native comp"
+"")
+  hyperb:version))
   (when (and (boundp 'br-version) (stringp br-version))
(insert (format "\tOO-Browser:  %s\n" br-version)))
   (when (and (boundp 'system-configuration) (stringp system-configuration))



[elpa] externals/llm 2e9cc586e9 3/3: Updated copyright notices

2024-05-25 Thread ELPA Syncer
branch: externals/llm
commit 2e9cc586e9a654adf709e8c0691122c9a38a8120
Author: Andrew Hyatt 
Commit: Andrew Hyatt 

Updated copyright notices
---
 Eldev  | 7 +++
 llm-fake.el| 2 +-
 llm-gemini.el  | 2 +-
 llm-gpt4all.el | 2 +-
 llm-llamacpp.el| 2 +-
 llm-ollama.el  | 4 ++--
 llm-openai.el  | 2 +-
 llm-provider-utils-test.el | 2 +-
 llm-provider-utils.el  | 2 +-
 llm-request-plz.el | 2 +-
 llm-test.el| 2 +-
 llm-tester.el  | 2 +-
 llm-vertex.el  | 2 +-
 llm.el | 2 +-
 14 files changed, 17 insertions(+), 18 deletions(-)

diff --git a/Eldev b/Eldev
index 6bbd518bb3..568f0fc2c2 100644
--- a/Eldev
+++ b/Eldev
@@ -1,8 +1,7 @@
-; -*- mode: emacs-lisp; lexical-binding: t -*-
+; -*- mode: emacs-lisp; 
lexical-binding: t -*-
 
-;; Uncomment some calls below as needed for your project.
 (eldev-use-package-archive 'gnu-elpa)
-;(eldev-use-package-archive 'nongnu-elpa)
-;(eldev-use-package-archive 'melpa)
+(eldev-use-plugin 'maintainer)
+
 (setq eldev-standard-excludes `(:or ,eldev-standard-excludes "plz*" 
"utilities/*"))
 (setq checkdoc-force-docstrings-flag nil)
diff --git a/llm-fake.el b/llm-fake.el
index 01ff16b977..c5881788fa 100644
--- a/llm-fake.el
+++ b/llm-fake.el
@@ -1,6 +1,6 @@
 ;;; llm-fake.el --- Use for developers looking at llm calls. -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
diff --git a/llm-gemini.el b/llm-gemini.el
index c1ff41a999..9e59511799 100644
--- a/llm-gemini.el
+++ b/llm-gemini.el
@@ -1,6 +1,6 @@
 ;;; llm-gemini.el --- LLM implementation of Google Cloud Gemini AI -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
diff --git a/llm-gpt4all.el b/llm-gpt4all.el
index f1a45d5735..979331c2e0 100644
--- a/llm-gpt4all.el
+++ b/llm-gpt4all.el
@@ -1,6 +1,6 @@
 ;;; llm-gpt4all.el --- llm module for integrating with GPT4All -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
diff --git a/llm-llamacpp.el b/llm-llamacpp.el
index c25e9bdb88..3ffe8b70d3 100644
--- a/llm-llamacpp.el
+++ b/llm-llamacpp.el
@@ -1,6 +1,6 @@
 ;;; llm-llamacpp.el --- llm module for integrating with llama.cpp. -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
diff --git a/llm-ollama.el b/llm-ollama.el
index 7ca1f89bec..ab29541de9 100644
--- a/llm-ollama.el
+++ b/llm-ollama.el
@@ -1,6 +1,6 @@
 ;;; llm-ollama.el --- llm module for integrating with Ollama. -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
@@ -119,7 +119,7 @@ PROVIDER is the llm-ollama provider."
   (push `("temperature" . ,(llm-chat-prompt-temperature prompt)) options))
 (when (llm-chat-prompt-max-tokens prompt)
   (push `("num_predict" . ,(llm-chat-prompt-max-tokens prompt)) options))
-(setq options (append options (llm-chat-prompt-non-standard-params 
prompt)))
+(setq options (append options (llm-chat-prompt-non-standard-params 
prompt)))
 (when options (push `("options" . ,options) request-alist))
 request-alist))
 
diff --git a/llm-openai.el b/llm-openai.el
index 0d3ace7941..50256fb449 100644
--- a/llm-openai.el
+++ b/llm-openai.el
@@ -1,6 +1,6 @@
 ;;; llm-openai.el --- llm module for integrating with Open AI -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 
 ;; Author: Andrew Hyatt 
 ;; Homepage: https://github.com/ahyatt/llm
diff --git a/llm-provider-utils-test.el b/llm-provider-utils-test.el
index e89354803f..b73bf7c741 100644
--- a/llm-provider-utils-test.el
+++ b/llm-provider-utils-test.el
@@ -1,6 +1,6 @@
 ;;; llm-provider-utils-test.el --- Tests for llm-provider-utils -*- 
lexical-binding: t; package-lint-main-file: "llm.el"; -*-
 
-;; Copyright (c) 2023  Free Software Foundation, Inc.
+;; Copyright (c) 2023, 2024  Free Software Foundation, Inc.
 

[elpa] externals/hyperbole 2da96d8b06 15/18: Fix gbut:act to global button context is the current buffer

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 2da96d8b06af087f63b22bc0044a03c3c083a012
Author: bw 
Commit: bw 

Fix gbut:act to global button context is the current buffer

Fix ibtype and actype delete interactive specs.
---
 ChangeLog | 17 +
 Makefile  |  5 +++--
 hact.el   | 10 +++---
 hbut.el   | 24 
 hui.el|  6 +++---
 5 files changed, 46 insertions(+), 16 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 01d653c9d5..a64af91041 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,20 @@
+2024-05-25  Bob Weiner  
+
+* hbut.el (ibtype:delete): Fix interactive call.
+
+* hbut.el (gbut:act): Set 'loc to current-buffer, not the gbut's
+source buffer.
+  (hbut:key-src-set-buffer): Clarify doc.
+  (hbut:funcall): Change to use 'hbut:key-src-set-buffer' to
+temporarily set current-buffer to button's loc attribute.
+
+2024-05-23  Bob Weiner  
+
+* hact.el (actype:delete): Fix interactive spec, eliminating use of
+'hui:htype-delete'.
+
+* hui.el (hui:htype-delete): Fix doc.
+
 2024-05-19  Bob Weiner  
 
 * hywiki.el (hywiki-remap-buttonize-characters): Move initialization of
diff --git a/Makefile b/Makefile
index 63622e1515..b72306f74e 100644
--- a/Makefile
+++ b/Makefile
@@ -3,7 +3,7 @@
 # Author:   Bob Weiner
 #
 # Orig-Date:15-Jun-94 at 03:42:38
-# Last-Mod: 18-May-24 at 20:24:41 by Bob Weiner
+# Last-Mod: 19-May-24 at 10:58:02 by Bob Weiner
 #
 # Copyright (C) 1994-2023  Free Software Foundation, Inc.
 # See the file HY-COPY for license information.
@@ -547,7 +547,8 @@ lint:
 # Run a build using a dockerized version of Emacs
 #
 # Usage:
-#   make dockerized version=28.1 targets='clean bin test'
+#   make dockerized version=master targets='clean bin test'
+#   make dockerized version=28.2 targets='clean bin test'
 
 # Specify version and targets to run
 ifeq ($(origin targets), command line)
diff --git a/hact.el b/hact.el
index 18107e2af5..3e66e7d477 100644
--- a/hact.el
+++ b/hact.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:18-Sep-91 at 02:57:09
-;; Last-Mod: 18-May-24 at 20:26:19 by Bob Weiner
+;; Last-Mod: 23-May-24 at 23:18:43 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -520,8 +520,12 @@ Return symbol created when successful, else nil."
 
 (defunactype:delete (type)
   "Delete an action TYPE (a symbol).  Return TYPE's symbol if it existed."
-  (interactive (list (hui:htype-delete 'actypes))
-  (htype:delete type 'actypes)))
+  (interactive
+   (list (intern (hargs:read-match
+ "Delete from actypes: "
+ (mapcar 'list (htype:names 'actypes))
+ nil t nil 'actypes
+  (htype:delete type 'actypes))
 
 (defunactype:doc (but &optional full)
   "Return first line of action doc for BUT.
diff --git a/hbut.el b/hbut.el
index bb13b033a5..5acf3bc783 100644
--- a/hbut.el
+++ b/hbut.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:18-Sep-91 at 02:57:09
-;; Last-Mod: 14-Apr-24 at 13:52:20 by Bob Weiner
+;; Last-Mod: 25-May-24 at 16:30:50 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -762,7 +762,11 @@ Insert INSTANCE-FLAG after END, before ending delimiter."
(t (let* ((lbl-key (hbut:label-to-key label))
  (but (gbut:get lbl-key)))
 (if but
-(hbut:act but)
+(progn
+  ;; Ensure gbut is activated with current-buffer as
+  ;; the context, not the gbut's source buffer.
+  (hattr:set but 'loc (current-buffer))
+  (hbut:act but))
   (error "(gbut:act): No global button found for label: %s" 
label))
 
 (defungbut:delete (&optional lbl-key)
@@ -1234,7 +1238,7 @@ hbut:current's 'loc attribute to KEY-SRC."
(hattr:set 'hbut:current 'loc key-src)
   (let ((loc (hattr:get 'hbut:current 'loc)))
(when loc
- (set-buffer (or (get-buffer loc) (find-file-noselect loc)
+ (hbut:key-src-set-buffer loc)))
   (setq key-src (hbut:to-key-src 'full)
;; `hbut:to-key-src' sets current buffer to key-src buffer.
buffer (or buffer (current-buffer
@@ -1352,9 +1356,9 @@ represent the output of particular document formatters."
((current-buffer))
 
 (defunhbut:key-src-set-buffer (src)
-  "Set buffer to SRC, a buffer, buffer name, file, directory or symlink.
-If SRC is a directory, simply return it; otherwise, return SRC or
-nil if invalid."
+  "Temporarily set current buffer to SRC, a buffer, buffer name, or file.
+If SRC is a directory, simply return it; otherwise, return set current
+buffer to SRC and return it or return nil if SRC is invalid/unreadable."
   (cond ((null src) nil)
((or (bufferp src) (get-buffer src))
 (set-buffer src)
@@ -1368,7 +1372,8 @@ nil if invalid."
 (set-buffer (find-file-noselect src))
 src)

[elpa] externals/hyperbole 36e6dc66d3 18/18: Merge pull request #521 from rswgnu/rsw

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 36e6dc66d39c5de82338c9220e643555bad29bc5
Merge: 61937530ea 232ed572d8
Author: Robert Weiner 
Commit: GitHub 

Merge pull request #521 from rswgnu/rsw

Add initial version of "hywiki.el" and the hywiki ibtype
---
 ChangeLog| 167 ++
 MANIFEST |   4 +
 Makefile |  10 +-
 hact.el  |  14 +-
 hasht.el | 432 
 hbut.el  |  24 +-
 hibtypes.el  |  35 ++-
 hpath.el | 162 +++---
 hsys-org.el  |  21 +-
 hui-em-but.el|  81 +--
 hui.el   |   8 +-
 hyrolo.el|  67 +++---
 hywiki.el| 601 +++
 test/hyrolo-tests.el |  14 +-
 14 files changed, 1462 insertions(+), 178 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index fd0d468bee..4abf34d01b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,96 @@
+2024-05-25  Bob Weiner  
+
+* hbut.el (ibtype:delete): Fix interactive call.
+
+* hywiki.el (hywiki-remap-buttonize-characters): Add .
+(hywiki-highlight-page-name): Fix to highlight page
+name regardless of how much whitespace comes after the name.
+(hywiki-mode): Expand doc and add/remove 'post-self-insert-hook'
+call of 'hywiki-buttonize'.
+(hywiki-remap-buttonize-characters, hywiki-initialize-mode-map):
+Remove these and move keymap init into 'hywiki-mode' definition.
+(hywiki-buttonize): Rewrite to highlight hywiki word to the left of
+point iff last inserted char is in the set of 
'hywiki--buttonize-characters'.
+Rename to 'hywiki-buttonize-character-commands'.
+   (hywiki-buttonize-non-character-commands): Add.
+
+* hbut.el (gbut:act): Set 'loc to current-buffer, not the gbut's
+source buffer.
+  (hbut:key-src-set-buffer): Clarify doc.
+  (hbut:funcall): Change to use 'hbut:key-src-set-buffer' to
+temporarily set current-buffer to button's loc attribute.
+
+* hywiki.el (hywiki-get-page-files): Check that 'hywiki-directory'
+exists and is readable.
+   (hywiki-is-wikiword): Make case-sensitive.
+  (hywiki-at-wikiword): Remove optional 'org-link-flag' arg
+use 'ibut:label-p' to get HyWikiWord.
+
+2024-05-23  Bob Weiner  
+
+* hact.el (actype:delete): Fix interactive spec, eliminating use of
+'hui:htype-delete'.
+
+* hui.el (hui:htype-delete): Fix doc.
+
+2024-05-19  Bob Weiner  
+
+* hywiki.el (hywiki-remap-buttonize-characters): Move initialization of
+'hywiki--buttonize-characters' here instead of at variable definition
+to eliminate circular load dependency.
+   (find-file-hook): Remove add-hook on 'org-mode-hook'.
+  (hywiki-find-page): Add post 'hywiki-find-page-hook' and return
+absolute path to the found page.
+
+* hibtypes.el (grep-msg): Fix that when no source-loc, file path was not
+expanded.
+  (find-func): Add require of this library for native compiler
+grep-msg library name expansion.
+
+* hywiki.el (hywiki-initialize-mode-map): Fix call of old function name.
+(hywiki-remap-remap-buttonize-characters): Remove extra remap-.
+   (hywiki-find-page): Remove unused let of 'page-buffer'.
+
+2024-05-18  Bob Weiner  
+
+* test/hyrolo-tests.el (hyrolo-tests--goto-kotl-header-with-slash-match): Start
+to try to fix this test.
+
+* hpath.el (hpath:find, hpath:to-markup-anchor): Fix for directory pathnames so
+properly handles anchors, line numbers, column numbers and 'hpath-find' 
returns
+the buffer found.  Also, make 'hpath:to-markup-anchor' handle any special 
buffer
+types without attached buffers.
+
+* hywiki.el (hywiki-get-org-insertion-punctuation-keys): Allow for symbol 
syntax
+chars and rename to 'hywiki-get-buttonize-characters'.
+(hywiki-remap-org-insertion-punctuation-keys): Rename to
+'hywiki-remap-buttonize-characters'.
+(hywiki--buttonize-characters): Add as a computed string of single
+characters that each trigger prior hywiki word highlighting when it is 
enabled.
+(hywiki-highlight-page-name, hywiki-highlight-page-names): Don't 
skip
+ back over symbol chars.
+(hywiki-find-page): Use this function as the 'find-file-hook' 
instead
+ of 'hywiki-highlight-page-names'; make 'page-name' optional for this use 
since
+ the current buffer will be the page, so the page name can be derived.  If 
calling
+ this function creates the page buffer, then enable hywiki-mode and call
+ 'hywiki-highlight-page-names'.
+
+* hui-em-but.el (hproperty:but-clear-all-in-list, 
hproperty:but-get-all-in-region):
+Add.
+
+* hywiki.el (org-mode-hook): Don't make 'find-file-hook' buffer local, as this
+is not recommended.
+(hywiki-pages-hasht): Rename to 'hywiki--pages-hasht'.
+   (hywiki-at-wikiword): Allow preceding char to be

[elpa] externals/hyperbole fffbd7c255 12/18: hywiki.el - Fix old/bad function name references

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit fffbd7c255e979c7d9c1bfb6963e1f228d0179de
Author: bw 
Commit: bw 

hywiki.el - Fix old/bad function name references
---
 ChangeLog   | 11 +++
 hibtypes.el |  7 +--
 hywiki.el   | 14 ++
 3 files changed, 22 insertions(+), 10 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index f3bc6ce513..5c1a29157f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,14 @@
+2024-05-19  Bob Weiner  
+
+* hibtypes.el (grep-msg): Fix that when no source-loc, file path was not
+expanded.
+  (find-func): Add require of this library for native compiler
+grep-msg library name expansion.
+
+* hywiki.el (hywiki-initialize-mode-map): Fix call of old function name.
+(hywiki-remap-remap-buttonize-characters): Remove extra remap-.
+   (hywiki-find-page): Remove unused let of 'page-buffer'.
+
 2024-05-18  Bob Weiner  
 
 * test/hyrolo-tests.el (hyrolo-tests--goto-kotl-header-with-slash-match): Start
diff --git a/hibtypes.el b/hibtypes.el
index d0241216ca..532ac80fe7 100644
--- a/hibtypes.el
+++ b/hibtypes.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:19-Sep-91 at 20:45:31
-;; Last-Mod: 22-Apr-24 at 02:06:09 by Bob Weiner
+;; Last-Mod: 19-May-24 at 03:52:05 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -38,6 +38,7 @@
 ;;; 
 
 (require 'cl-lib) ;; for cl-count
+(require 'find-func) ;; used by grep-msg ibtype
 (eval-when-compile (require 'hversion))
 (require 'hactypes)
 (require 'hypb)
@@ -1048,7 +1049,9 @@ in grep and shell buffers."
  (hbut:to-key-src t
   (if (stringp source-loc)
   (setq file (expand-file-name file (file-name-directory 
source-loc)))
-   (setq file (or (hpath:prepend-shell-directory file) file)))
+   (setq file (or (hpath:prepend-shell-directory file)
+  (ignore-errors (find-library-name file))
+  (expand-file-name file
  (when (file-exists-p file)
 (setq line-num (string-to-number line-num))
 (ibut:label-set but-label)
diff --git a/hywiki.el b/hywiki.el
index 833a263b38..dbce18d9ae 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 18-May-24 at 20:00:23 by Bob Weiner
+;; Last-Mod: 19-May-24 at 02:05:01 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -182,8 +182,7 @@ PROMPT-FLAG is 'exists, return nil unless the page already 
exists."
(unless (eq prompt-flag 'exists)
  (when (y-or-n-p (concat "Create new `" 
page-name "' page? "))
(hywiki-add-page page-name)))
- (hywiki-add-page page-name
-(page-buffer (and page-file (get-file-buffer page-file
+ (hywiki-add-page page-name)
(when page-file
  (unless in-page-flag (hpath:find (concat page-file section)))
  (unless hywiki-mode (hywiki-mode 1))
@@ -236,7 +235,7 @@ Do this only if the expression is an implicit button of 
hywiki type."
   (when (memq (char-syntax k) '(?. ?_))
 (setq result (cons k result)))
 
-(defun hywiki-remap-remap-buttonize-characters ()
+(defun hywiki-remap-buttonize-characters ()
   "Remap Org self-insert punct/sym keys in `hywiki-mode` to 
`hywiki-buttonize`."
   (mapc (lambda (c) (define-key hywiki-mode-map (char-to-string c) 
'hywiki-buttonize))
hywiki--buttonize-characters))
@@ -244,7 +243,7 @@ Do this only if the expression is an implicit button of 
hywiki type."
 ;; Initialize hywiki-mode-map when null.
 (defun hywiki-initialize-mode-map ()
   (setq hywiki-mode-map (make-sparse-keymap))
-  (hywiki-remap-org-insertion-non-word-keys))
+  (hywiki-remap-buttonize-characters))
 
 (unless hywiki-mode-map
   (hywiki-initialize-mode-map))
@@ -383,7 +382,7 @@ the current page unless they have sections attached."
  (not executing-kbd-macro)
  (not noninteractive))
 (save-excursion
-  (when (= (char-syntax (char-before)) ?\))
+  ;; (when (= (char-syntax (char-before)) ?\))
;; Clear any HyWikiWord highlighting that may just be a part
;; of a larger balanced delimiter text with multiple words.
;; If there is just a single HyWikiWord, it will be
@@ -393,8 +392,7 @@ the current page unless they have sections attached."
;;   (sexp-start (scan-sexps sexp-end -1)))
;; (when sexp-start
;;   (hproperty:but-clear-all-in-list
-   ;;(hproperty:but-get-all-in-region sexp-start sexp-end 'face 
hywiki-word-face)
-   )
+   ;;(hproperty:but-get-all-in-region sexp-start sexp-end 'face 
hywiki-word-face

[elpa] externals/hyperbole 3fb1173075 11/18: Merge branch 'master' into rsw

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 3fb117307550b25b724cbc51f04e3314523c0d72
Merge: 64ce04dc4a 4314e8c246
Author: bw 
Commit: bw 

Merge branch 'master' into rsw
---
 .github/workflows/main.yml |  1 +
 ChangeLog  | 15 +++
 Makefile   |  4 ++--
 hact.el|  4 ++--
 hargs.el   |  5 +++--
 test/MANIFEST  |  1 +
 test/hact-tests.el | 38 ++
 7 files changed, 62 insertions(+), 6 deletions(-)

diff --git a/.github/workflows/main.yml b/.github/workflows/main.yml
index e04c136698..74b5ee61bb 100644
--- a/.github/workflows/main.yml
+++ b/.github/workflows/main.yml
@@ -24,6 +24,7 @@ jobs:
 run: make clean
 
   - name: Compile
+shell: bash
 run: |
   make bin 2>&1 | tee MAKE_BIN_OUTPUT
   echo "Number of warnings: $(grep "Warning:" MAKE_BIN_OUTPUT | wc 
-l)" >> $GITHUB_STEP_SUMMARY
diff --git a/ChangeLog b/ChangeLog
index 859b025468..f3bc6ce513 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -38,6 +38,21 @@
 (hywiki-initialize-mode-map): Add and make punct. and 
non-square-bracket
 and non-angle-bracket balanced expressions highlight HyWiki page name 
references.
 
+2024-05-18  Mats Lidell  
+
+* hargs.el (hargs:action-get): Add Emacs 30 closure support.
+
+2024-05-17  Mats Lidell  
+
+* Makefile (dockerized): Add quotes so make is executed in the container.
+
+2024-05-16  Mats Lidell  
+
+* test/hact-tests.el (hact-tests--action-params-with-lambdas)
+   (hact-tests--actype-act-with-lambdas): Verify closures.
+
+* hact.el (actype:act): Add Emacs 30 closure support.
+
 2024-05-15  Bob Weiner  
 
 * hywiki.el (org-mode-hook): Remove 'post-self-insert-hook' and instead 
highlight
diff --git a/Makefile b/Makefile
index 8a0a4fd8e6..63622e1515 100644
--- a/Makefile
+++ b/Makefile
@@ -3,7 +3,7 @@
 # Author:   Bob Weiner
 #
 # Orig-Date:15-Jun-94 at 03:42:38
-# Last-Mod: 22-Apr-24 at 02:10:20 by Bob Weiner
+# Last-Mod: 18-May-24 at 20:24:41 by Bob Weiner
 #
 # Copyright (C) 1994-2023  Free Software Foundation, Inc.
 # See the file HY-COPY for license information.
@@ -562,7 +562,7 @@ DOCKER_VERSION = master-ci
 endif
 
 dockerized:
-   docker run -v $$(pwd):/hyperbole -it silex/emacs:${DOCKER_VERSION} bash 
-c cd hyperbole && make ${DOCKER_TARGETS}
+   docker run -v $$(pwd):/hyperbole -it silex/emacs:${DOCKER_VERSION} bash 
-c "make -C hyperbole ${DOCKER_TARGETS}"
 
 # Run with coverage. Run tests given by testspec and monitor the
 # coverage for the specified file.
diff --git a/hact.el b/hact.el
index 28ba545c81..18107e2af5 100644
--- a/hact.el
+++ b/hact.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:18-Sep-91 at 02:57:09
-;; Last-Mod: 12-May-24 at 22:02:42 by Bob Weiner
+;; Last-Mod: 18-May-24 at 20:26:19 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -414,7 +414,7 @@ performing ACTION."
   (let ((hist-elt (hhist:element)))
(run-hooks 'action-act-hook)
(prog1 (or (when (and (fboundp #'closurep) (closurep action))
-(funcall action args))
+(apply action args))
   (if (or (symbolp action) (listp action)
   (byte-code-function-p action)
   (subrp action)
diff --git a/hargs.el b/hargs.el
index e5367f00b8..319c4e5c7d 100644
--- a/hargs.el
+++ b/hargs.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:31-Oct-91 at 23:17:35
-;; Last-Mod: 20-Jan-24 at 19:43:53 by Mats Lidell
+;; Last-Mod: 18-May-24 at 16:07:11 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -100,7 +100,8 @@ Current button is being edited when EDITING-FLAG is t.
 Return nil if ACTION is not a list or `byte-code' object, has no
 interactive form or takes no arguments."
   (save-excursion
-(and (or (subrp action) (byte-code-function-p action) (listp action))
+(and (or (subrp action) (byte-code-function-p action) (listp action)
+ (and (fboundp #'closurep) (closurep action)))
 (let ((interactive-form (action:commandp action)))
   (when interactive-form
 (hpath:relative-arguments
diff --git a/test/MANIFEST b/test/MANIFEST
index 0eb68c930e..85d9f695dc 100644
--- a/test/MANIFEST
+++ b/test/MANIFEST
@@ -1,5 +1,6 @@
 --- HYPERBOLE TEST CASES ---
 demo-tests.el   - unit tests from examples in the DEMO
+hact-tests.el   - hact unit tests
 hactypes-tests.el   - Ert tests for hactypes
 hargs-tests.el  - hargs unit tests
 hbut-tests.el   - hbut unit tests
diff --git a/test/hact-tests.el b/test/hact-tests.el
new file mode 100644
index 00..00c37b1e0c
--- /dev/null
+++ b/test/hact-tests.el
@@ -0,0 +1,38 @@
+;;; hact-tests.el --- unit tests for hact-*- lexical-binding: 
t; -*-
+;;
+;; Author:   Mats Lidell
+;;
+;; Orig-Date:16-

[elpa] externals/hyperbole 424203e56c 05/18: hywiki.el - Conditionaly load company-mode backend function

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 424203e56c5f7374d627bbc2793bc4072551bdd1
Author: bw 
Commit: bw 

hywiki.el - Conditionaly load company-mode backend function
---
 hui.el|  2 +-
 hywiki.el | 27 ++-
 2 files changed, 15 insertions(+), 14 deletions(-)

diff --git a/hui.el b/hui.el
index 3ba334a777..d230333d74 100644
--- a/hui.el
+++ b/hui.el
@@ -1753,7 +1753,7 @@ button's source file name when the button data is stored 
externally."
 If EDIT-FLAG is non-nil, edit button at point in BUT-WINDOW,
 otherwise, prompt for button label and create a button.
 LBL-KEY is internal form of button label.  BUT-LOC is the file or buffer
-in which to create button.  BUT-DIR is the directory of BUT-LOC.
+in which to create the button.  BUT-DIR is the directory of BUT-LOC.
 TYPE-AND-ARGS is the action type for the button followed by any
 arguments it requires.  Any text properties are removed from string
 arguments."
diff --git a/hywiki.el b/hywiki.el
index 83ea51d17f..ffe46942c0 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 24-Apr-24 at 02:26:23 by Bob Weiner
+;; Last-Mod:  5-May-24 at 09:46:52 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -183,16 +183,16 @@ nil, else return the file name of the page."
 (page-buf  (when page-file (find-file-noselect page-file
 (when page-buf
   (save-excursion
-   (set-buffer page-buf)
-   (barf-if-buffer-read-only)
-   (save-restriction
- (widen)
- (goto-char (if start-flag (point-min) (point-max)))
- (unless (bolp) (insert (newline)))
- (insert text)
- (unless (bolp) (insert (newline)))
- (goto-char (if start-flag (point-min) (point-max)))
- page-file)
+   (with-current-buffer page-buf
+ (barf-if-buffer-read-only)
+ (save-restriction
+   (widen)
+   (goto-char (if start-flag (point-min) (point-max)))
+   (unless (bolp) (insert (newline)))
+   (insert text)
+   (unless (bolp) (insert (newline)))
+   (goto-char (if start-flag (point-min) (point-max)))
+   page-file))
 
 (defun hywiki-at-wikiword (&optional org-link-flag)
   "Return HyWiki word and optional #section at point or nil if not on one.
@@ -413,11 +413,12 @@ Use `hywiki-get-page' to determine whether a HyWiki page 
exists."
page-files)))
 (setq hywiki-pages-hasht (hash-make page-elts
 
+(when (featurep 'company)
 (defun hywiki-company-hasht-backend (command &optional _arg &rest ignored)
  "A `company-mode` backend that completes from the keys of a hash table."
  (interactive (list 'interactive))
  (when (hywiki-at-wikiword)
-   (case command
+   (pcase command
  ('interactive (company-begin-backend 'company-hash-table-backend))
  ('prefix (company-grab-word))
  ('candidates
@@ -426,7 +427,7 @@ Use `hywiki-get-page' to determine whether a HyWiki page 
exists."
   (cl-loop for key being the hash-keys in (hywiki-get-page-list)
when (string-prefix-p prefix key)
collect key
- ('sorted t
+ ('sorted t)
 
 (defun hywiki-org-link-complete (&optional _arg)
   "Complete HyWiki page names for `org-insert-link'."



[elpa] externals/hyperbole 64ce04dc4a 10/18: hywiki.el - Enable hywiki-mode on hywiki pages and highlight

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 64ce04dc4aaf85375838e61d75c7da07b933a918
Author: bw 
Commit: bw 

hywiki.el - Enable hywiki-mode on hywiki pages and highlight

Extend hywiki characters that highlight wiki words to symbol chars.

Fix hpath:find and anchor handling for dired and other non-file modes.
---
 ChangeLog|  22 +
 hpath.el |   9 ++--
 hywiki.el| 126 +--
 test/hyrolo-tests.el |  14 +++---
 4 files changed, 106 insertions(+), 65 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 4596b25827..859b025468 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,27 @@
 2024-05-18  Bob Weiner  
 
+* test/hyrolo-tests.el (hyrolo-tests--goto-kotl-header-with-slash-match): Start
+to try to fix this test.
+
+* hpath.el (hpath:find, hpath:to-markup-anchor): Fix for directory pathnames so
+properly handles anchors, line numbers, column numbers and 'hpath-find' 
returns
+the buffer found.  Also, make 'hpath:to-markup-anchor' handle any special 
buffer
+types without attached buffers.
+
+* hywiki.el (hywiki-get-org-insertion-punctuation-keys): Allow for symbol 
syntax
+chars and rename to 'hywiki-get-buttonize-characters'.
+(hywiki-remap-org-insertion-punctuation-keys): Rename to
+'hywiki-remap-buttonize-characters'.
+(hywiki--buttonize-characters): Add as a computed string of single
+characters that each trigger prior hywiki word highlighting when it is 
enabled.
+(hywiki-highlight-page-name, hywiki-highlight-page-names): Don't 
skip
+ back over symbol chars.
+(hywiki-find-page): Use this function as the 'find-file-hook' 
instead
+ of 'hywiki-highlight-page-names'; make 'page-name' optional for this use 
since
+ the current buffer will be the page, so the page name can be derived.  If 
calling
+ this function creates the page buffer, then enable hywiki-mode and call
+ 'hywiki-highlight-page-names'.
+
 * hui-em-but.el (hproperty:but-clear-all-in-list, 
hproperty:but-get-all-in-region):
 Add.
 
diff --git a/hpath.el b/hpath.el
index 3ee53c65bf..d4abba08ae 100644
--- a/hpath.el
+++ b/hpath.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 1-Nov-91 at 00:44:23
-;; Last-Mod:  5-May-24 at 23:48:12 by Bob Weiner
+;; Last-Mod: 18-May-24 at 19:06:22 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -1571,9 +1571,10 @@ but locational suffixes within the file are utilized."
;; matching of path is likely to be wrong in
;; certain cases, e.g. with mount point or os path
;; alterations.
-   (when (and buffer-file-name
+   (when (or (null buffer-file-name)
+ (and buffer-file-name
   (equal (file-name-nondirectory path)
- (file-name-nondirectory 
buffer-file-name)))
+ (file-name-nondirectory 
buffer-file-name
  (cond ((and anchor kotl-flag)
 (klink:act path-with-anchor 
anchor-start-pos))
((or hash anchor)
@@ -1637,7 +1638,7 @@ of the buffer."
 (and 
buffer-file-name
  
(string-match-p "\\`[A-Z][A-Z0-9]+\\'" buffer-file-name)))
 
hpath:outline-section-pattern)
-   (prog-mode
+   ((or prog-mode 
(null buffer-file-name))
 "%s")
((or (and 
buffer-file-name
  
(string-match-p hpath:markdown-suffix-regexp buffer-file-name))
diff --git a/hywiki.el b/hywiki.el
index 103df390e7..833a263b38 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 18-May-24 at 11:22:07 by Bob Weiner
+;; Last-Mod: 18-May-24 at 20:00:23 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -40,7 +40,7 @@
 ;;  for any delimiters.  Simply type them out, e.g. Emacs and if a
 ;;  page exists for the word, it is automatically highlighted when:
 ;;- a HyWiki page file is read in
-;;- a whitespace character, ')', '}', or Org-mode punctuation
+;;- a whitespace character, ')', '}', or Org-mode punctuation/symbol
 ;;  character is inserted following a HyWiki word
 ;;- the Action Key is pressed to activate a HyWi

[elpa] externals/hyperbole 1d551be5bb 03/18: hywiki.el - Fixes and performance improvements

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 1d551be5bb8a9813e0092664473b0e8b7a477358
Author: Bob Weiner 
Commit: Bob Weiner 

hywiki.el - Fixes and performance improvements
---
 ChangeLog |  21 
 hywiki.el | 326 ++
 2 files changed, 201 insertions(+), 146 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index d366717c57..71ce5e8ae6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,27 @@
+2024-04-24  Bob Weiner  
+
 2024-04-23  Bob Weiner  
 
 * hywiki.el: Remove autoload from defib and 'hywiki-open', fixing autoload 
error.
+ (hywiki-company-hasht-backend): Complete words, not symbols
+(no punctuation).
+ (hywiki-open): Rename to 'hywiki-find-page' and automatically 
create
+any non-existent page unless optional 'prompt-flag' is t, then prompt
+whether to create.  If 'prompt-flag' is 'exists, return an existing page 
only,
+else nil.
+ (hywiki-complete): Rename to 'hywiki-org-link-complete'.  Insert
+`hywiki-org-link-type' only when 'hywiki-org-link-type-required' is 
non-nil.
+ (hywiki-store-link): Rename to 'hywiki-org-link-store'.  Insert
+`hywiki-org-link-type' only when 'hywiki-org-link-type-required' is 
non-nil.
+(hywiki-org-link-type): Change value from 'hy:' to 'hy'.
+(hywiki-page-list): Rename to 'hywiki-get-page-list'.
+(hywiki-get-pages): Rename to 'hywiki-get-page-hasht'.
+ (hywiki-word-section-regexp): Add.
+ (hywiki-get-page-files): Add missing '+' for multiple chars in 
file suffix.
+ (hywiki-at-wikiword, hywiki-highlight-page-names): Allow for 
numerics
+in #section references.
+ (hywiki--word-face): Change foreground of HyWiki word to 'orange'
+when on a dark background.
 
 2024-04-22  Bob Weiner  
 
diff --git a/hywiki.el b/hywiki.el
index 7c59b69614..83ea51d17f 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 23-Apr-24 at 18:49:43 by Bob Weiner
+;; Last-Mod: 24-Apr-24 at 02:26:23 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -25,8 +25,7 @@
 ;;  Org link in any buffer with the prefix "hy:" followed by a
 ;;  capitalized alpha characters-only WikiWord, e.g. [[hy:Emacs]], and
 ;;  then press the Action Key on the link to jump to the associated
-;;  page.  You will be prompted to create the page if it does not
-;;  exist.
+;;  page; new pages are automatically created.
 
 ;;  If you set `hywiki-org-link-type-required' to `nil', then
 ;;  you don't need the prefix, e.g. [[Emacs]] and existing HyWiki page
@@ -93,8 +92,8 @@ Applies only when the file is below `hywiki-directory'.")
 (defconst hywiki-directory '"~/hywiki/"
   "Directory in which to find HyWiki page files.")
 
-(defconst hywiki-org-link-type "hy:"
-  "HyWiki string prefix type for Org links.")
+(defconst hywiki-org-link-type "hy"
+  "HyWiki string prefix type for Org links.  Excludes trailing colon.")
 
 (defvar hywiki-org-link-type-required t
   "When non-nil, HyWiki Org links must start with `hywiki-org-link-type'.
@@ -107,8 +106,14 @@ override standard Org link lookups.  See \"(org)Internal 
Links\".")
   "\\<\\([[:upper:]][[:alpha:]]+\\)\\>"
   "Regexp that matches a HyWiki word only.")
 
+(defconst hywiki-word-section-regexp
+  "\\(#[^][# \t\n\r\f]+\\)"
+  "Regexp that matches a HyWiki word #section extension.
+After the first # character, this may contain any non-square-bracket,
+non-# and non-whitespace characters.")
+
 (defconst hywiki-word-optional-section-regexp
-  (concat hywiki-word-regexp "\\(#[^][ \t\n\r\f]+\\)?")
+  (concat hywiki-word-regexp hywiki-word-section-regexp "?")
   "Regexp that matches a HyWiki word with an optional #section.
 Section may not contain spaces or square brackets.  Use '-' to
 substitute for spaces in the section/headline name.  Grouping 1 is
@@ -122,9 +127,9 @@ substitute for spaces in the section/headline name.  
Grouping 1 is
 the HyWiki word and grouping 2 is the #section with the # included.")
 
 (defface hywiki--word-face
-  'min-colors 88) (background dark)) (:foreground "mediumbrown"))
+  'min-colors 88) (background dark)) (:foreground "orange"))
 (((background dark)) (:background "orange" :foreground "black"))
-(((min-colors 88)) (:foreground "darkbrown"))
+(((min-colors 88)) (:foreground "orange"))
 (t (:background "orange")))
   "Face for HyWiki word highlighting."
   :group 'hyperbole-buttons)
@@ -145,18 +150,23 @@ the HyWiki word and grouping 2 is the #section with the # 
included.")
 (when page-name
   (ibut:label-set page-name (match-beginning 0) (match-end 0))
   (hywiki-highlight-page-name t)
-  (hact 'hywiki-open page-name
+  (hact 'hywiki-find-page page-name
 
-(defun hywiki-open (page-name)
-  "Display HyWiki PAGE-NAME.  Prompt to create if non-existent."
-  (interactive (list

[elpa] externals/hyperbole cedb626489 14/18: hywiki.el - Eliminate circular dep on `hywiki--buttonize-characters'

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit cedb62648914b7f56681419ea41056537ad95d1a
Author: bw 
Commit: bw 

hywiki.el - Eliminate circular dep on `hywiki--buttonize-characters'
---
 ChangeLog | 4 
 hywiki.el | 8 +---
 2 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5c1a29157f..01d653c9d5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2024-05-19  Bob Weiner  
 
+* hywiki.el (hywiki-remap-buttonize-characters): Move initialization of
+'hywiki--buttonize-characters' here instead of at variable definition
+to eliminate circular load dependency.
+
 * hibtypes.el (grep-msg): Fix that when no source-loc, file path was not
 expanded.
   (find-func): Add require of this library for native compiler
diff --git a/hywiki.el b/hywiki.el
index f822288bc5..a12584a900 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 19-May-24 at 04:10:28 by Bob Weiner
+;; Last-Mod: 19-May-24 at 04:18:40 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -143,8 +143,7 @@ the HyWiki word and grouping 2 is the #section with the # 
included.")
 ;;; Private variables
 ;;; 
 
-(defvar hywiki--buttonize-characters
-  (concat " \r\n\)\]\>\}'" (hywiki-get-buttonize-characters))
+(defvar hywiki--buttonize-characters nil
   "String of single character keys bound to `hywiki-buttonize'.
 Each such key self-inserts before highlighting any prior HyWiki word.")
 
@@ -248,6 +247,9 @@ Do this only if the expression is an implicit button of 
hywiki type."
 
 (defun hywiki-remap-buttonize-characters ()
   "Remap Org self-insert punct/sym keys in `hywiki-mode` to 
`hywiki-buttonize`."
+  (unless hywiki--buttonize-characters
+(setq hywiki--buttonize-characters
+ (concat " \r\n\)\]\>\}'" (hywiki-get-buttonize-characters
   (mapc (lambda (c) (define-key hywiki-mode-map (char-to-string c) 
'hywiki-buttonize))
hywiki--buttonize-characters))
 



[elpa] externals/llm 7cb15d4c56 2/3: Add non-standard-params, so clients can add any parameter

2024-05-25 Thread ELPA Syncer
branch: externals/llm
commit 7cb15d4c563400fffdd262f8b7bd0b4f6632e85a
Author: Andrew Hyatt 
Commit: Andrew Hyatt 

Add non-standard-params, so clients can add any parameter

These non-standard-params are in the prompt, since most of them are 
expected to
vary with the task, and are not general properties of the model.

This is a potential fix to https://github.com/ahyatt/llm/issues/43.
---
 NEWS.org  |  2 ++
 README.org|  8 +---
 llm-claude.el | 20 ++--
 llm-ollama.el |  1 +
 llm-openai.el |  2 +-
 llm-vertex.el |  2 +-
 llm.el| 17 +
 7 files changed, 29 insertions(+), 23 deletions(-)

diff --git a/NEWS.org b/NEWS.org
index 0f8d6f1f88..22c1a2b647 100644
--- a/NEWS.org
+++ b/NEWS.org
@@ -1,3 +1,5 @@
+* Version 0.16.0
+- Add "non-standard params" to set per-provider options.
 * Version 0.15.0
 - Move to =plz= backend, which uses =curl=.  This helps move this package to a
   stronger foundation backed by parsing to spec.  Thanks to Roman Scherer for
diff --git a/README.org b/README.org
index 989a44689c..e56cf6aa75 100644
--- a/README.org
+++ b/README.org
@@ -102,13 +102,7 @@ For all callbacks, the callback will be executed in the 
buffer the function was
 - ~llm-chat-token-limit~.  Gets the token limit for the chat model.  This 
isn't possible for some backends like =llama.cpp=, in which the model isn't 
selected or known by this library.
 
   And the following helper functions:
-  - ~llm-make-chat-prompt text &keys context examples functions temperature
-max-tokens~: This is how you make prompts.  ~text~ can be a string (the 
user
-input to the llm chatbot), or a list representing a series of 
back-and-forth
-exchanges, of odd number, with the last element of the list representing 
the
-user's latest input.  This supports inputting context (also commonly called
-a system prompt, although it isn't guaranteed to replace the actual system
-prompt), examples, and other important elements, all detailed in the 
docstring for this function.
+  - ~llm-make-chat-prompt text &keys context examples functions temperature 
max-tokens~: This is how you make prompts.  ~text~ can be a string (the user 
input to the llm chatbot), or a list representing a series of back-and-forth 
exchanges, of odd number, with the last element of the list representing the 
user's latest input.  This supports inputting context (also commonly called a 
system prompt, although it isn't guaranteed to replace the actual system 
prompt), examples, and other impor [...]
   - ~llm-chat-prompt-to-text prompt~: From a prompt, return a string 
representation.  This is not usually suitable for passing to LLMs, but for 
debugging purposes.
   - ~llm-chat-streaming-to-point provider prompt buffer point 
finish-callback~: Same basic arguments as ~llm-chat-streaming~, but will stream 
to ~point~ in ~buffer~.
   - ~llm-chat-prompt-append-response prompt response role~: Append a new 
response (from the user, usually) to the prompt.  The ~role~ is optional, and 
defaults to ~'user~.
diff --git a/llm-claude.el b/llm-claude.el
index 129d6a1baa..9a9c5d07f1 100644
--- a/llm-claude.el
+++ b/llm-claude.el
@@ -59,12 +59,12 @@
 ,(mapcar (lambda (interaction)
(append
 `(("role" . ,(pcase 
(llm-chat-prompt-interaction-role interaction)
-  ('function 'user)
-  ('assistant 'assistant)
-  ('user 'user)))
- ("content" . ,(or 
(llm-chat-prompt-interaction-content interaction)
-   
(llm-chat-prompt-function-call-result-result
-
(llm-chat-prompt-interaction-function-call-result interaction)
+   ('function 'user)
+   ('assistant 'assistant)
+   ('user 'user)))
+  ("content" . ,(or 
(llm-chat-prompt-interaction-content interaction)
+
(llm-chat-prompt-function-call-result-result
+ 
(llm-chat-prompt-interaction-function-call-result interaction)
 (when-let ((r 
(llm-chat-prompt-interaction-function-call-result interaction)))
   `(("tool_use_id" . 
,(llm-chat-prompt-function-call-result-call-id r))
  (llm-chat-prompt-interactions prompt)
@@ -76,16 +76,16 @@
   (push `("system" . ,system) request))
 (when (llm-chat-prompt-temperature prompt)
   (push `("temperature" . ,(llm-chat-prompt-temperature prompt)) request))
-request))
+(append request (llm-chat-pr

[elpa] externals/hyperbole c3f8c4bc48 08/18: hact.el (actype:act, action:params): Add Emacs 30 closure support

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit c3f8c4bc4834f2969a8a05a09a5cdab87f4945ed
Author: Bob Weiner 
Commit: Bob Weiner 

hact.el (actype:act, action:params): Add Emacs 30 closure support
---
 ChangeLog |  4 
 hact.el   | 10 +++---
 2 files changed, 11 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index fe56abcc29..7659ae3216 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2024-05-12  Bob Weiner  
+
+* hact.el (actype:act, action:params): Add Emacs 30 closure support.
+
 2024-05-06  Bob Weiner  
 
 * hyrolo.el (hyrolo-name-at-p): Fix to test point is in 
'hyrolo-display-buffer'.
diff --git a/hact.el b/hact.el
index 4833778ada..28ba545c81 100644
--- a/hact.el
+++ b/hact.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:18-Sep-91 at 02:57:09
-;; Last-Mod: 14-Apr-24 at 01:33:24 by Bob Weiner
+;; Last-Mod: 12-May-24 at 22:02:42 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -366,7 +366,9 @@ Autoloads action function if need be to get the parameter 
list."
 (compiled-function-arglist action)
   (action:params-emacs action)))
((symbolp action)
-(car (cdr (and (fboundp action) (hypb:indirect-function action)))
+(car (cdr (and (fboundp action) (hypb:indirect-function action)
+   ((and (fboundp #'closurep) (closurep action))
+(aref action 0
 
 (defun action:param-list (action)
   "Return list of actual ACTION parameters (remove `&' special forms)."
@@ -411,7 +413,9 @@ performing ACTION."
   (setq args (hpath:absolute-arguments actype args)))
   (let ((hist-elt (hhist:element)))
(run-hooks 'action-act-hook)
-   (prog1 (or (if (or (symbolp action) (listp action)
+   (prog1 (or (when (and (fboundp #'closurep) (closurep action))
+(funcall action args))
+  (if (or (symbolp action) (listp action)
   (byte-code-function-p action)
   (subrp action)
   (and (stringp action) (not (integerp action))



[elpa] externals/llm updated (ebb7b6e4cd -> 2e9cc586e9)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch externals/llm.

  from  ebb7b6e4cd Set version to 0.15.0
   new  6b5611bcb8 Minor whitespace fix
   new  7cb15d4c56 Add non-standard-params, so clients can add any parameter
   new  2e9cc586e9 Updated copyright notices


Summary of changes:
 Eldev  |  7 +++
 NEWS.org   |  2 ++
 README.org |  8 +---
 llm-claude.el  | 20 ++--
 llm-fake.el|  2 +-
 llm-gemini.el  |  2 +-
 llm-gpt4all.el |  2 +-
 llm-llamacpp.el|  2 +-
 llm-ollama.el  | 11 ++-
 llm-openai.el  |  4 ++--
 llm-provider-utils-test.el |  2 +-
 llm-provider-utils.el  |  2 +-
 llm-request-plz.el |  2 +-
 llm-test.el|  2 +-
 llm-tester.el  |  2 +-
 llm-vertex.el  |  4 ++--
 llm.el | 19 ++-
 17 files changed, 49 insertions(+), 44 deletions(-)



[elpa] externals/hyperbole fa74da7539 06/18: hpath.el - Fix to always trim paths and expand shell paths

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit fa74da7539a5341e3e9190503aa116695ca63ecd
Author: bw 
Commit: bw 

hpath.el - Fix to always trim paths and expand shell paths
---
 ChangeLog |  11 +
 hpath.el  | 155 --
 2 files changed, 90 insertions(+), 76 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 81e8b25962..4ce6749714 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,16 @@
 2024-05-05  Bob Weiner  
 
+* hpath.el (hpath:delimited-possible-path): Rewrite to expand both delimited
+and non-delimited shell pathnames.
+
+For non-delimited strings, remove any leading or trailing spaces;
+otherwise, may prepend a dir with an extra space in there when
+extracting paths from an ls command that are indented to match the
+column indent of filenames with quotes around them.  Also, remove
+requirement that shell buffer filenames be tab delimited and require
+that filenames with spaces in their names have quotes around them.
+   (hpath:at-p): If file is readable, ignore whether it has "::" in it.
+
 * hui-em-but.el: Comment out non-load when non-interactive so does not created
 errors when used in "hywiki.el".
 
diff --git a/hpath.el b/hpath.el
index 541e547750..3ee53c65bf 100644
--- a/hpath.el
+++ b/hpath.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 1-Nov-91 at 00:44:23
-;; Last-Mod: 31-Mar-24 at 00:23:02 by Bob Weiner
+;; Last-Mod:  5-May-24 at 23:48:12 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -955,43 +955,43 @@ Absolute pathnames must begin with a `/' or `~'."
 (when (and path (not non-exist) (string-match hpath:prefix-regexp path)
   (not (string-equal (match-string 0 path) path)))
   (setq non-exist t))
-(unless (and path (or (string-empty-p path)
- (string-match "::" path)))
-  (cond ((and path (file-readable-p path))
-path)
-   ((and path
- ;; Don't allow more than one set of grouping chars
- (not (string-match-p "\)\\s-*\(\\|\\]\\s-*\\[\\|\}\\s-*\{" 
path))
- ;; With point inside a path variable, return the path that 
point is on or to the right of.
- (setq subpath (or (and (setq subpath (hargs:delimited 
"[:\"\']\\|^\\s-*" "[:\"\']\\|\\s-*$" t t nil "[\t\n\r\f]\\|[;:] \\| [;:]"))
-(not (string-match-p "[:;\t\n\r\f]" 
subpath))
-subpath)
-   (and (setq subpath (hargs:delimited 
"[;\"\']\\|^\\s-*" "[;\"\']\\|\\s-*$"  t t nil "[\t\n\r\f]\\|[;:] \\| [;:]"))
-(not (string-match-p 
"[;\t\n\r\f]\\|:[^:]*:" subpath))
-subpath)))
- ;; Handle anchored or action prefix char paths in the
- ;; following clause; otherwise, might just be looking
- ;; at part of the path
- (and subpath (not (or (string-match-p "#" subpath)
-   (string-match-p hpath:prefix-regexp 
subpath
- (setq subpath
-   (if subpath
-   (cond ((and (string-match "\\`\\s-*\\([^; \t]+\\)" 
subpath)
-   (executable-find (match-string 1 
subpath)))
-  ;; Could be a shell command from a semicolon 
separated
-  ;; list; ignore if so
-  nil)
- (t (expand-file-name subpath)))
- ;; Only default to current path if know are within a 
PATH value
- (when (string-match-p 
hpath:path-variable-value-regexp path)
-   ".")))
- (hpath:is-p subpath type non-exist))
-subpath)
-   ((hpath:is-p path type non-exist))
-   ;; Local file URLs
-   ;; ((hpath:is-p (hargs:delimited "file://" "[ \t\n\r\"\'\}]" nil 
t)))
-   ((hpath:remote-at-p))
-   ((hpath:www-at-p) nil)
+(if (and path (not (string-empty-p path)) (file-readable-p path))
+   path
+  (unless (and path (or (string-empty-p path)
+   (string-match "::" path)))
+   (cond ((and path
+   ;; Don't allow more than one set of grouping chars
+   (not (string-match-p "\)\\s-*\(\\|\\]\\s-*\\[\\|\}\\s-*\{" 
path))
+   ;; With point inside a path variable, return the path that 
point is on or to the right of.
+   (setq subpath (or (and (setq subpath (hargs:delimited 
"[:\"\']\\|^\\s-*" "[:\"\']\\|\\s-*$" t t nil "[\t\n\r\f]\\|[;:] \\| [;:]"))
+  (not (string-match-p "[:;\t\n\r\f]" 
subpath))
+  subpath)

[elpa] externals/hyperbole dbc6f35360 01/18: Add initial version of "hywiki.el" and the hywiki ibtype

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit dbc6f353604876721b49a8382651b56df7d67a1c
Author: Bob Weiner 
Commit: Bob Weiner 

Add initial version of "hywiki.el" and the hywiki ibtype
---
 ChangeLog |  21 +++
 MANIFEST  |   4 +
 Makefile  |   7 +-
 hasht.el  | 432 +
 hibtypes.el   |   9 +-
 hsys-org.el   |  21 ++-
 hui-em-but.el |  63 ++---
 hywiki.el | 433 ++
 8 files changed, 963 insertions(+), 27 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e03a662e7d..9d7fd5ef74 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,24 @@
+2024-04-22  Bob Weiner  
+
+* hywiki.el: Add new auto-wikiword note-taking system with `hywiki' ibtype.
+  hasht.el: Temporarily add this for hywiki hash table support.
+  hibtypes.el (load "hywiki"): Add at lowest ibtype priority.
+  hsys-org.el (hsys-org-link-at-p): Support HyWiki word handling.
+  Makefile (EL_COMPILE):
+  MANIFEST: Add hywiki.el and hasht.el.
+
+* hui-em-but.el (hproperty:but-start, hproperty:but-end, hproperty:but-delete):
+Add these functions and use in hywiki.el.
+
+2024-04-21  Bob Weiner  
+
+* hui-em-but.el (hproperty:but-clear): Add optional args 'property' and 
'value'.
+When 'property' is given, clear the button only when property's value
+matches 'value'.
+(hproperty:but-p, hproperty:but-get): Add optional args
+'property' and 'value', matching only when 'property' equals 'value', if
+given.
+
 2024-04-20  Bob Weiner  
 
 * hui-select.el (hui-c++-defun-prompt-regexp): Add to eliminate an Emacs
diff --git a/MANIFEST b/MANIFEST
index 3fc33c06fa..f40aa462e9 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -73,6 +73,10 @@ hsmail.el- GNU Hyperbole buttons in mail 
composer: mail
 kotl/MANIFEST- Summary of Koutliner files
 kotl/EXAMPLE.kotl- Sample Koutline document explaining Koutliner features
 
+* --- HYPERBOLE NOTES ---
+hywiki.el- Hyperbole's auto-wikiword note-taking system
+hasht.el - Create hash tables from lists and operate on them.
+
 * --- HYPERBOLE ROLO ---
 hyrolo.el- Hierarchical, multi-file, easy-to-use record management 
system
 hyrolo.py- Output file header and matching entries from HyRolo 
files via the command-line
diff --git a/Makefile b/Makefile
index 940d0100d1..8a0a4fd8e6 100644
--- a/Makefile
+++ b/Makefile
@@ -3,7 +3,7 @@
 # Author:   Bob Weiner
 #
 # Orig-Date:15-Jun-94 at 03:42:38
-# Last-Mod: 14-Apr-24 at 23:00:20 by Bob Weiner
+# Last-Mod: 22-Apr-24 at 02:10:20 by Bob Weiner
 #
 # Copyright (C) 1994-2023  Free Software Foundation, Inc.
 # See the file HY-COPY for license information.
@@ -190,8 +190,9 @@ EL_COMPILE = hact.el hactypes.el hargs.el hbdata.el 
hbmap.el hbut.el \
  hsys-org-roam.el hsys-www.el hsys-xref.el hsys-youtube.el htz.el \
 hycontrol.el hui-jmenu.el hui-menu.el hui-mini.el hui-mouse.el 
hui-select.el \
 hui-treemacs.el hui-window.el hui.el hvar.el hversion.el hypb.el 
hyperbole.el \
-hyrolo-demo.el hyrolo-logic.el hyrolo-menu.el hyrolo.el 
hywconfig.el set.el hypb-ert.el \
-hui-dired-sidebar.el hypb-maintenance.el hui-em-but.el 
hui-register.el
+hyrolo-demo.el hyrolo-logic.el hyrolo-menu.el hyrolo.el 
hywconfig.el hywiki.el \
+ hasht.el set.el hypb-ert.el hui-dired-sidebar.el 
hypb-maintenance.el hui-em-but.el \
+ hui-register.el
 
 EL_SRC = $(EL_COMPILE)
 
diff --git a/hasht.el b/hasht.el
new file mode 100644
index 00..17d0c5e51f
--- /dev/null
+++ b/hasht.el
@@ -0,0 +1,432 @@
+;;!emacs
+;;
+;; FILE: hasht.el
+;; SUMMARY:  Create hash tables from lists and operate on them.
+;; USAGE:GNU Emacs Lisp Library
+;; KEYWORDS: extensions, tools
+;;
+;; AUTHOR:   Bob Weiner
+;;
+;; ORIG-DATE:16-Mar-90 at 03:38:48
+;; LAST-MOD: 30-Jul-16 at 08:50:38 by Bob Weiner
+;;
+;; Copyright (C) 1990-1995, 1997, 2016  Free Software Foundation, Inc.
+;; See the file BR-COPY for license information.
+;;
+;; This file is part of the OO-Browser.
+
+;; The OO-Browser is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; The OO-Browser is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with the OO-Browser.  If not, see .
+
+;;; Commentary:
+;;
+;;   Featureful set of hash table operators for use in personal programs.
+;;
+;;   `hash-make' creates a hash table from an association li

[elpa] externals/hyperbole ee3e970cbd 13/18: hywiki.el - Define 'hywiki--buttonize-characters' before use

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit ee3e970cbd8098b461d48438bcf321c56b8a4ce6
Author: bw 
Commit: bw 

hywiki.el - Define 'hywiki--buttonize-characters' before use
---
 hywiki.el | 24 
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/hywiki.el b/hywiki.el
index dbce18d9ae..f822288bc5 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod: 19-May-24 at 02:05:01 by Bob Weiner
+;; Last-Mod: 19-May-24 at 04:10:28 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -139,6 +139,17 @@ the HyWiki word and grouping 2 is the #section with the # 
included.")
   :initialize #'custom-initialize-default
   :group 'hyperbole-buttons)
 
+;;; 
+;;; Private variables
+;;; 
+
+(defvar hywiki--buttonize-characters
+  (concat " \r\n\)\]\>\}'" (hywiki-get-buttonize-characters))
+  "String of single character keys bound to `hywiki-buttonize'.
+Each such key self-inserts before highlighting any prior HyWiki word.")
+
+(defvar hywiki--pages-hasht nil)
+
 ;;; 
 ;;; Public Implicit Button and Action Types
 ;;; 
@@ -557,15 +568,4 @@ Use `hywiki-get-page' to determine whether a HyWiki page 
exists."
  (lambda ()
(add-hook 'find-file-hook #'hywiki-find-page t)))
 
-;;; 
-;;; Private variables
-;;; 
-
-(defvar hywiki--buttonize-characters
-  (concat " \r\n\)\]\>\}'" (hywiki-get-buttonize-characters))
-  "String of single character keys bound to `hywiki-buttonize'.
-Each such key self-inserts before highlighting any prior HyWiki word.")
-
-(defvar hywiki--pages-hasht nil)
-
 (provide 'hywiki)



[elpa] externals/llm 6b5611bcb8 1/3: Minor whitespace fix

2024-05-25 Thread ELPA Syncer
branch: externals/llm
commit 6b5611bcb83d217fb285ee29daf5686aca1876c3
Author: Andrew Hyatt 
Commit: Andrew Hyatt 

Minor whitespace fix
---
 llm-ollama.el | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/llm-ollama.el b/llm-ollama.el
index 4a95b033b3..5844ef368c 100644
--- a/llm-ollama.el
+++ b/llm-ollama.el
@@ -126,10 +126,10 @@ PROVIDER is the llm-ollama provider."
   (cons 'application/x-ndjson
 (plz-media-type:application/x-ndjson
  :handler (lambda (data)
- (when-let ((response (assoc-default
-   'content
-   (assoc-default 'message data
-   (funcall msg-receiver response))
+(when-let ((response (assoc-default
+  'content
+  (assoc-default 'message data
+  (funcall msg-receiver response))
 
 (cl-defmethod llm-name ((provider llm-ollama))
   (llm-ollama-chat-model provider))



[elpa] externals/hyperbole 3709b59088 09/18: hywiki.el - Add hywiki minor mode and highlighting after punct

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit 3709b590883dfbf4ad46088c7124f197e5c1aa9b
Author: bw 
Commit: bw 

hywiki.el - Add hywiki minor mode and highlighting after punct
---
 ChangeLog |  24 +++
 hui-em-but.el |  34 ++
 hywiki.el | 207 +-
 3 files changed, 194 insertions(+), 71 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 7659ae3216..4596b25827 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,27 @@
+2024-05-18  Bob Weiner  
+
+* hui-em-but.el (hproperty:but-clear-all-in-list, 
hproperty:but-get-all-in-region):
+Add.
+
+* hywiki.el (org-mode-hook): Don't make 'find-file-hook' buffer local, as this
+is not recommended.
+(hywiki-pages-hasht): Rename to 'hywiki--pages-hasht'.
+   (hywiki-at-wikiword): Allow preceding char to be whitespace or
+additionally any of these chars: (["'`'
+((hywiki-highlight-page-names, hywiki-at-wikiword,
+hywiki-highlight-page-name): Don't limit to files within 
'hywiki-directory';
+use whenever 'hywiki-mode' is enabled.
+(hywiki-at-wikiword): Remove 'hywiki-allowed-modes' since now test
+that hywiki-mode is enabled.
+(hywiki-initialize-mode-map): Add and make punct. and 
non-square-bracket
+and non-angle-bracket balanced expressions highlight HyWiki page name 
references.
+
+2024-05-15  Bob Weiner  
+
+* hywiki.el (org-mode-hook): Remove 'post-self-insert-hook' and instead 
highlight
+HyWikiWords via new 'hywiki-mode' minor-mode and its SPC and RET key 
bindings
+bound to hywiki-buttonize.
+
 2024-05-12  Bob Weiner  
 
 * hact.el (actype:act, action:params): Add Emacs 30 closure support.
diff --git a/hui-em-but.el b/hui-em-but.el
index 45543d676b..689da05227 100644
--- a/hui-em-but.el
+++ b/hui-em-but.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:21-Aug-92
-;; Last-Mod:  5-May-24 at 09:44:17 by Bob Weiner
+;; Last-Mod: 18-May-24 at 10:42:36 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -182,6 +182,10 @@ de-highlighted."
 (remove-overlays nil nil 'face hproperty:but-face)
 (remove-overlays nil nil 'face hproperty:ibut-face)))
 
+(defun hproperty:but-clear-all-in-list (hbut-list)
+  "Delete all HBUT-LIST hproperties."
+  (mapc #'delete-overlay hbut-list))
+
 (defun hproperty:but-create (&optional regexp-match)
   "Highlight all named Hyperbole buttons in buffer.
 De-highlight buttons unless `hproperty:but-highlight-flag' is set.
@@ -229,20 +233,26 @@ moves over it."
 See `hproperty:but-get'."
   (overlay-end hproperty-but))
 
+(defun hproperty:but-get-all-in-region (start end &optional property value)
+  "Return all buttons in the current buffer between START and END.
+If optional PROPERTY and VALUE are given, return only the first button
+with that PROPERTY and VALUE."
+  (delq nil
+   (mapcar (lambda (overlay)
+ (when (memq (overlay-get overlay (or property 'face))
+ (if property
+ (list value)
+   (list hproperty:but-face
+ hproperty:ibut-face
+ hproperty:flash-face)))
+   overlay))
+   (overlays-in start end
+
 (defun hproperty:but-get (&optional pos property value)
-  "Get button at optional POS or point.
+  "Return button at optional POS or point.
 If optional PROPERTY and VALUE are given, return only the first button
 with that PROPERTY and VALUE."
-  (car (delq nil
-(mapcar (lambda (overlay)
-  (when (memq (overlay-get overlay (or property 'face))
-  (if property
-  (list value)
-(list hproperty:but-face
-  hproperty:ibut-face
-  hproperty:flash-face)))
-overlay))
-(overlays-at (or pos (point)))
+  (car (hproperty:but-get-all-in-region pos (1+ pos) property value)))
 
 (defun hproperty:but-start (hproperty-but)
   "Return the end position of an HPROPERTY-BUT.
diff --git a/hywiki.el b/hywiki.el
index ffe46942c0..103df390e7 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date: 21-Apr-24 at 22:41:13
-;; Last-Mod:  5-May-24 at 09:46:52 by Bob Weiner
+;; Last-Mod: 18-May-24 at 11:22:07 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -40,7 +40,8 @@
 ;;  for any delimiters.  Simply type them out, e.g. Emacs and if a
 ;;  page exists for the word, it is automatically highlighted when:
 ;;- a HyWiki page file is read in
-;;- a whitespace character is inserted following a HyWiki word
+;;- a whitespace character, ')', '}', or Org-mode punctuation
+;;  character is inserted following 

[elpa] externals/hyperbole b7931000aa 04/18: hui-em-but.el - Comment out non-load if non-interactive for hywiki

2024-05-25 Thread ELPA Syncer
branch: externals/hyperbole
commit b7931000aa4c50a080429cc9b659b3f081358858
Author: bw 
Commit: bw 

hui-em-but.el - Comment out non-load if non-interactive for hywiki
---
 ChangeLog |  5 -
 hui-em-but.el | 10 +-
 2 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 71ce5e8ae6..81e8b25962 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,4 +1,7 @@
-2024-04-24  Bob Weiner  
+2024-05-05  Bob Weiner  
+
+* hui-em-but.el: Comment out non-load when non-interactive so does not created
+errors when used in "hywiki.el".
 
 2024-04-23  Bob Weiner  
 
diff --git a/hui-em-but.el b/hui-em-but.el
index 9c9fa36f55..45543d676b 100644
--- a/hui-em-but.el
+++ b/hui-em-but.el
@@ -3,7 +3,7 @@
 ;; Author:   Bob Weiner
 ;;
 ;; Orig-Date:21-Aug-92
-;; Last-Mod: 22-Apr-24 at 02:06:26 by Bob Weiner
+;; Last-Mod:  5-May-24 at 09:44:17 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -19,10 +19,10 @@
 
 ;;; Code:
 
-(when noninteractive
-  ;; Don't load this library
-  (with-current-buffer " *load*"
-(goto-char (point-max
+;; (when noninteractive
+;;   ;; Don't load this library
+;;   (with-current-buffer " *load*"
+;; (goto-char (point-max
 
 ;;; 
 ;;; Other required Elisp libraries



[elpa] externals/plz 3e85bad7b3 11/13: Tests: Remove obsolete 26.3-related code and comment

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 3e85bad7b3ef19065306e889f8c9e188d287009c
Author: Adam Porter 
Commit: Adam Porter 

Tests: Remove obsolete 26.3-related code and comment
---
 .github/workflows/test.yml | 6 --
 1 file changed, 6 deletions(-)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index bc2953afff..0aa11841e5 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -41,12 +41,6 @@ jobs:
   fail-fast: false
   matrix:
 emacs_version:
-  # FIXME: The 26.3 test fails to initialize with the error
-  # "Package ‘emacs-27.1’ is unavailable", which happens just
-  # after "Package refresh done".  Not sure what the cause is.
-  # But I don't want the whole suite marked as failing because
-  # of 26.3 right now, so commenting it out.
-  # - 26.3
   - 27.1
   - 27.2
   - 28.1



[elpa] externals/plz acba6e19a6 09/13: Merge: (plz) Inhibit buffer hooks when calling generate-new-buffer

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit acba6e19a673e6d3e43a6cd3d1460fd5b9b94688
Merge: e077c706a2 f2b1ee045b
Author: Adam Porter 
Commit: Adam Porter 

Merge: (plz) Inhibit buffer hooks when calling generate-new-buffer

Closes #52.  Thanks to Michał Krzywkowski (@mkcms).
---
 README.org | 1 +
 plz.el | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 042dd4d094..0e6e2e0629 100644
--- a/README.org
+++ b/README.org
@@ -197,6 +197,7 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 *Fixes*
 
 + Improve workaround for Emacs's process sentinel-related issues.  (Don't try 
to process response a second time if Emacs calls the sentinel after ~plz~ has 
returned for a synchronous request.  See 
[[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for extensive help 
debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this 
work.)
++ Inhibit buffer hooks when calling ~generate-new-buffer~ (as extra protection 
against "kill buffer?" prompts in case of errors).  (See 
[[https://github.com/alphapapa/plz.el/pull/52][#52]].  Thanks to 
[[https://github.com/mkcms][Michał Krzywkowski]].)
 
 ** 0.8
 
diff --git a/plz.el b/plz.el
index 72b8beac9e..7ff57f216d 100644
--- a/plz.el
+++ b/plz.el
@@ -467,9 +467,9 @@ into the process buffer.
   ;; default-directory has since been removed).  It's unclear what the 
best
   ;; directory is, but this seems to make sense, and it should still 
exist.
   temporary-file-directory)
- (process-buffer (generate-new-buffer " *plz-request-curl*"))
+ (process-buffer (generate-new-buffer " *plz-request-curl*" t))
  (stderr-process (make-pipe-process :name "plz-request-curl-stderr"
-:buffer (generate-new-buffer " 
*plz-request-curl-stderr*")
+:buffer (generate-new-buffer " 
*plz-request-curl-stderr*" t)
 :noquery t
 :sentinel #'plz--stderr-sentinel))
  (process (make-process :name "plz-request-curl"



[elpa] externals/plz 6fbfc11d6e 13/13: Docs: Update changelog about testing Emacs versions

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 6fbfc11d6ee4a56ad0b5f4d212047ae400617028
Author: Adam Porter 
Commit: Adam Porter 

Docs: Update changelog about testing Emacs versions
---
 README.org | 4 
 1 file changed, 4 insertions(+)

diff --git a/README.org b/README.org
index 0e6e2e0629..84a7111795 100644
--- a/README.org
+++ b/README.org
@@ -199,6 +199,10 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 + Improve workaround for Emacs's process sentinel-related issues.  (Don't try 
to process response a second time if Emacs calls the sentinel after ~plz~ has 
returned for a synchronous request.  See 
[[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for extensive help 
debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this 
work.)
 + Inhibit buffer hooks when calling ~generate-new-buffer~ (as extra protection 
against "kill buffer?" prompts in case of errors).  (See 
[[https://github.com/alphapapa/plz.el/pull/52][#52]].  Thanks to 
[[https://github.com/mkcms][Michał Krzywkowski]].)
 
+*Development*
+
++ ~plz~ is now automatically tested against Emacs versions 27.1, 27.2, 28.1, 
28.2, 29.1, 29.2, 29.3, and a recent snapshot of the ~master~ branch (adding 
29.2 and 29.3).
+
 ** 0.8
 
 *Additions*



[elpa] externals/plz d9644302c7 03/13: Tidy: Docstring

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit d9644302c78101b50402d8448759893b5fd04759
Author: Adam Porter 
Commit: Adam Porter 

Tidy: Docstring

Checkdoooc!
---
 plz.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/plz.el b/plz.el
index 73e9d70319..72b8beac9e 100644
--- a/plz.el
+++ b/plz.el
@@ -256,7 +256,7 @@ connection phase and waiting to receive the response (the
 
 (cl-defmacro plz-debug (&rest args)
   ;; Copied from `ement-debug' in Ement.el, which see.
-  "Display a debug warning showing the runtime value of ARGS.
+  "Display a debug warning showing the run-time value of ARGS.
 The warning automatically includes the name of the containing
 function, and it is only displayed if `warning-minimum-log-level'
 is `:debug' at expansion time (otherwise the macro expands to a



[elpa] externals/plz 85473ed857 05/13: Merge: Improve process sentinel workaround, add plz-debug

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 85473ed857824a125d85f3dde95b47ab57c8c39d
Merge: 5a9706c1c4 be1d63c7d8
Author: Adam Porter 
Commit: Adam Porter 

Merge: Improve process sentinel workaround, add plz-debug
---
 README.org |   4 ++
 plz.el | 167 -
 2 files changed, 135 insertions(+), 36 deletions(-)

diff --git a/README.org b/README.org
index b313110d27..6e33a904b9 100644
--- a/README.org
+++ b/README.org
@@ -194,6 +194,10 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 
 + The minimum supported Emacs version is now 27.1.  (It is no longer practical 
to test ~plz~ with Emacs versions older than 27.1.  For Emacs 26.3, an earlier 
version of ~plz~ may be used, or this version might be compatible, with or 
without minor changes, which the maintainer cannot offer support for.)
 
+*Fixes*
+
++ Improve workaround for Emacs's process sentinel-related issues.  (Don't try 
to process response a second time if Emacs calls the sentinel after ~plz~ has 
returned for a synchronous request.  See 
[[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for extensive help 
debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this 
work.)
+
 ** 0.8
 
 *Additions*
diff --git a/plz.el b/plz.el
index f75168c935..72b8beac9e 100644
--- a/plz.el
+++ b/plz.el
@@ -250,6 +250,70 @@ connection phase and waiting to receive the response (the
 \"--max-time\" argument to curl)."
   :type 'number)
 
+ Macros
+
+(require 'warnings)
+
+(cl-defmacro plz-debug (&rest args)
+  ;; Copied from `ement-debug' in Ement.el, which see.
+  "Display a debug warning showing the run-time value of ARGS.
+The warning automatically includes the name of the containing
+function, and it is only displayed if `warning-minimum-log-level'
+is `:debug' at expansion time (otherwise the macro expands to a
+call to `ignore' with ARGS and is eliminated by the
+byte-compiler).  When debugging, the form also returns nil so,
+e.g. it may be used in a conditional in place of nil.
+
+Each of ARGS may be a string, which is displayed as-is, or a
+symbol, the value of which is displayed prefixed by its name, or
+a Lisp form, which is displayed prefixed by its first symbol.
+
+Before the actual ARGS arguments, you can write keyword
+arguments, i.e. alternating keywords and values.  The following
+keywords are supported:
+
+  :buffer BUFFER   Name of buffer to pass to `display-warning'.
+  :level  LEVELLevel passed to `display-warning', which see.
+   Default is :debug."
+  ;; TODO: Can we use a compiler macro to handle this more elegantly?
+  (pcase-let* ((fn-name (when byte-compile-current-buffer
+  (with-current-buffer byte-compile-current-buffer
+;; This is a hack, but a nifty one.
+(save-excursion
+  (beginning-of-defun)
+  (cl-second (read (current-buffer)))
+   (plist-args (cl-loop while (keywordp (car args))
+collect (pop args)
+collect (pop args)))
+   ((map (:buffer buffer) (:level level)) plist-args)
+   (level (or level :debug))
+   (string (cl-loop for arg in args
+concat (pcase arg
+ ((pred stringp) "%S ")
+ ((pred symbolp)
+  (concat (upcase (symbol-name arg)) 
":%S "))
+ ((pred listp)
+  (concat "(" (upcase (symbol-name 
(car arg)))
+  (pcase (length arg)
+(1 ")")
+(_ "...)"))
+  ":%S "))
+(if (eq :debug warning-minimum-log-level)
+`(let ((fn-name ,(if fn-name
+ `',fn-name
+   ;; In an interpreted function: use 
`backtrace-frame' to get the
+   ;; function name (we have to use a little hackery 
to figure out
+   ;; how far up the frame to look, but this seems to 
work).
+   `(cl-loop for frame in (backtrace-frames)
+ for fn = (cl-second frame)
+ when (not (or (subrp fn)
+   (special-form-p fn)
+   (eq 'backtrace-frames fn)))
+ return (make-symbol (format "%s 
[interpreted]" fn))
+   (display-warning fn-name (format ,string ,@args) ,l

[elpa] externals/plz updated (5a9706c1c4 -> 6fbfc11d6e)

2024-05-25 Thread ELPA Syncer
elpasync pushed a change to branch externals/plz.

  from  5a9706c1c4 Meta: Require Emacs 27.1 or later
   new  46d0c54525 WIP
   new  01b1ce77b8 Comment: Improve
   new  d9644302c7 Tidy: Docstring
   new  be1d63c7d8 Docs: Update changelog
   new  85473ed857 Merge: Improve process sentinel workaround, add plz-debug
   new  e077c706a2 Docs: Update USHIN references
   new  b3e764c36a Prevent yes-or-no-p query when killing plz process 
buffers
   new  f2b1ee045b Docs: Update changelog
   new  acba6e19a6 Merge: (plz) Inhibit buffer hooks when calling 
generate-new-buffer
   new  4cfd78294d Tests: Test on Emacs 29.1, 29.2, and 29.3
   new  3e85bad7b3 Tests: Remove obsolete 26.3-related code and comment
   new  2534262975 Fix: Alias generate-new-buffer for Emacs <28.1
   new  6fbfc11d6e Docs: Update changelog about testing Emacs versions


Summary of changes:
 .github/workflows/test.yml |   9 +--
 README.org |  15 +++-
 plz.el | 181 +++--
 3 files changed, 158 insertions(+), 47 deletions(-)



[elpa] externals/plz 2534262975 12/13: Fix: Alias generate-new-buffer for Emacs <28.1

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 2534262975f8ba731001f7283e0a6229c45b1969
Author: Adam Porter 
Commit: Adam Porter 

Fix: Alias generate-new-buffer for Emacs <28.1
---
 plz.el | 14 --
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/plz.el b/plz.el
index 7ff57f216d..d60ede4bcb 100644
--- a/plz.el
+++ b/plz.el
@@ -314,6 +314,16 @@ keywords are supported:
nil)
   `(ignore ,@args
 
+ Compatibility
+
+(defalias 'plz--generate-new-buffer
+  (if (version< emacs-version "28.1")
+  (lambda (name &optional _inhibit-buffer-hooks)
+"Call `generate-new-buffer' with NAME.
+Compatibility function for Emacs versions <28.1."
+(generate-new-buffer name))
+#'generate-new-buffer))
+
  Functions
 
 ; Public
@@ -467,9 +477,9 @@ into the process buffer.
   ;; default-directory has since been removed).  It's unclear what the 
best
   ;; directory is, but this seems to make sense, and it should still 
exist.
   temporary-file-directory)
- (process-buffer (generate-new-buffer " *plz-request-curl*" t))
+ (process-buffer (plz--generate-new-buffer " *plz-request-curl*" t))
  (stderr-process (make-pipe-process :name "plz-request-curl-stderr"
-:buffer (generate-new-buffer " 
*plz-request-curl-stderr*" t)
+:buffer (plz--generate-new-buffer 
" *plz-request-curl-stderr*" t)
 :noquery t
 :sentinel #'plz--stderr-sentinel))
  (process (make-process :name "plz-request-curl"



[elpa] externals/plz 01b1ce77b8 02/13: Comment: Improve

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 01b1ce77b83b5b675c7b45931a3f026258d3a8e9
Author: Adam Porter 
Commit: Adam Porter 

Comment: Improve
---
 plz.el | 13 -
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/plz.el b/plz.el
index 09a81af820..73e9d70319 100644
--- a/plz.el
+++ b/plz.el
@@ -811,23 +811,26 @@ for asynchronous ones)."
   (plz-debug (float-time) "BEFORE CONDITION"
  process status (process-get process :plz-result))
   (if (eq :plz-result (process-get process :plz-result))
-  ;; Result not yet set: call `plz--respond'.
+  ;; Result not yet set: check process status (we call
+  ;; `process-status' because the STATUS argument might not be
+  ;; accurate--see "hack" in `plz').
   (if (member (process-status process) '(run stop))
+  ;; Process still alive: do nothing.
   (plz-debug "Doing nothing because:" (process-status process))
-;; Process should have exited (otherwise we should do
-;; nothing).  We check `process-status' because the STATUS
-;; variable might not be accurate (see "hack" in `plz').
+;; Process appears to be dead: check STATUS argument.
 (pcase status
   ((or "finished\n" "killed\n" "interrupt\n" "workaround"
(pred numberp)
(rx "exited abnormally with code " (group (1+ digit
+   ;; STATUS seems okay: call `plz--respond'.
(let ((buffer (process-buffer process)))
  (if (process-get process :plz-sync)
  (plz--respond process buffer status)
(run-at-time 0 nil #'plz--respond process buffer status))
 ;; Result already set (likely indicating that Emacs did not call
 ;; the sentinel when `accept-process-output' was called, so we are
-;; calling it from our "hack"): do nothing.
+;; either being called from our "hack", or being called a second
+;; time, after `plz' returned): do nothing.
 (plz-debug (float-time) ":PLZ-RESULT ALREADY CHANGED"
process status (process-get process :plz-result
 



[elpa] externals/plz b3e764c36a 07/13: Prevent yes-or-no-p query when killing plz process buffers

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit b3e764c36a2d82b3b788bf9688fc69488f661d60
Author: Michał Krzywkowski 
Commit: Adam Porter 

Prevent yes-or-no-p query when killing plz process buffers
---
 plz.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/plz.el b/plz.el
index 72b8beac9e..7ff57f216d 100644
--- a/plz.el
+++ b/plz.el
@@ -467,9 +467,9 @@ into the process buffer.
   ;; default-directory has since been removed).  It's unclear what the 
best
   ;; directory is, but this seems to make sense, and it should still 
exist.
   temporary-file-directory)
- (process-buffer (generate-new-buffer " *plz-request-curl*"))
+ (process-buffer (generate-new-buffer " *plz-request-curl*" t))
  (stderr-process (make-pipe-process :name "plz-request-curl-stderr"
-:buffer (generate-new-buffer " 
*plz-request-curl-stderr*")
+:buffer (generate-new-buffer " 
*plz-request-curl-stderr*" t)
 :noquery t
 :sentinel #'plz--stderr-sentinel))
  (process (make-process :name "plz-request-curl"



[elpa] externals/plz 46d0c54525 01/13: WIP

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 46d0c54525a8d598960162d2717aecbab3d85b03
Author: Adam Porter 
Commit: Adam Porter 

WIP

See https://github.com/alphapapa/plz.el/issues/53.
---
 plz.el | 164 ++---
 1 file changed, 128 insertions(+), 36 deletions(-)

diff --git a/plz.el b/plz.el
index f75168c935..09a81af820 100644
--- a/plz.el
+++ b/plz.el
@@ -250,6 +250,70 @@ connection phase and waiting to receive the response (the
 \"--max-time\" argument to curl)."
   :type 'number)
 
+ Macros
+
+(require 'warnings)
+
+(cl-defmacro plz-debug (&rest args)
+  ;; Copied from `ement-debug' in Ement.el, which see.
+  "Display a debug warning showing the runtime value of ARGS.
+The warning automatically includes the name of the containing
+function, and it is only displayed if `warning-minimum-log-level'
+is `:debug' at expansion time (otherwise the macro expands to a
+call to `ignore' with ARGS and is eliminated by the
+byte-compiler).  When debugging, the form also returns nil so,
+e.g. it may be used in a conditional in place of nil.
+
+Each of ARGS may be a string, which is displayed as-is, or a
+symbol, the value of which is displayed prefixed by its name, or
+a Lisp form, which is displayed prefixed by its first symbol.
+
+Before the actual ARGS arguments, you can write keyword
+arguments, i.e. alternating keywords and values.  The following
+keywords are supported:
+
+  :buffer BUFFER   Name of buffer to pass to `display-warning'.
+  :level  LEVELLevel passed to `display-warning', which see.
+   Default is :debug."
+  ;; TODO: Can we use a compiler macro to handle this more elegantly?
+  (pcase-let* ((fn-name (when byte-compile-current-buffer
+  (with-current-buffer byte-compile-current-buffer
+;; This is a hack, but a nifty one.
+(save-excursion
+  (beginning-of-defun)
+  (cl-second (read (current-buffer)))
+   (plist-args (cl-loop while (keywordp (car args))
+collect (pop args)
+collect (pop args)))
+   ((map (:buffer buffer) (:level level)) plist-args)
+   (level (or level :debug))
+   (string (cl-loop for arg in args
+concat (pcase arg
+ ((pred stringp) "%S ")
+ ((pred symbolp)
+  (concat (upcase (symbol-name arg)) 
":%S "))
+ ((pred listp)
+  (concat "(" (upcase (symbol-name 
(car arg)))
+  (pcase (length arg)
+(1 ")")
+(_ "...)"))
+  ":%S "))
+(if (eq :debug warning-minimum-log-level)
+`(let ((fn-name ,(if fn-name
+ `',fn-name
+   ;; In an interpreted function: use 
`backtrace-frame' to get the
+   ;; function name (we have to use a little hackery 
to figure out
+   ;; how far up the frame to look, but this seems to 
work).
+   `(cl-loop for frame in (backtrace-frames)
+ for fn = (cl-second frame)
+ when (not (or (subrp fn)
+   (special-form-p fn)
+   (eq 'backtrace-frames fn)))
+ return (make-symbol (format "%s 
[interpreted]" fn))
+   (display-warning fn-name (format ,string ,@args) ,level ,buffer)
+   nil)
+  `(ignore ,@args
+
  Functions
 
 ; Public
@@ -518,15 +582,19 @@ into the process buffer.
 (error "Process unexpectedly nil"))
   (while (accept-process-output process))
   (while (accept-process-output stderr-process))
+  (plz-debug (float-time) "BEFORE HACK" (process-buffer process))
   (when (eq :plz-result (process-get process :plz-result))
+(plz-debug (float-time) "INSIDE HACK" (process-buffer process))
 ;; HACK: Sentinel seems to not have been called: call it 
again.  (Although
 ;; this is a hack, it seems to be a necessary one due to 
Emacs's process
 ;; handling.)  See 
 and
 ;; .
-(plz--sentinel process "finished\n")
+(plz--sentinel process "workaround")
+(plz-debug (flo

[elpa] externals/plz f2b1ee045b 08/13: Docs: Update changelog

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit f2b1ee045b476461851d60ed6f50e6b5b546b9d1
Author: Adam Porter 
Commit: Adam Porter 

Docs: Update changelog
---
 README.org | 1 +
 1 file changed, 1 insertion(+)

diff --git a/README.org b/README.org
index 042dd4d094..0e6e2e0629 100644
--- a/README.org
+++ b/README.org
@@ -197,6 +197,7 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 *Fixes*
 
 + Improve workaround for Emacs's process sentinel-related issues.  (Don't try 
to process response a second time if Emacs calls the sentinel after ~plz~ has 
returned for a synchronous request.  See 
[[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for extensive help 
debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this 
work.)
++ Inhibit buffer hooks when calling ~generate-new-buffer~ (as extra protection 
against "kill buffer?" prompts in case of errors).  (See 
[[https://github.com/alphapapa/plz.el/pull/52][#52]].  Thanks to 
[[https://github.com/mkcms][Michał Krzywkowski]].)
 
 ** 0.8
 



[elpa] externals/plz be1d63c7d8 04/13: Docs: Update changelog

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit be1d63c7d8fe4763b3bfb943dd48063d731e7aed
Author: Adam Porter 
Commit: Adam Porter 

Docs: Update changelog
---
 README.org | 4 
 1 file changed, 4 insertions(+)

diff --git a/README.org b/README.org
index b313110d27..6e33a904b9 100644
--- a/README.org
+++ b/README.org
@@ -194,6 +194,10 @@ You may also clear a queue with ~plz-clear~, which cancels 
any active or queued
 
 + The minimum supported Emacs version is now 27.1.  (It is no longer practical 
to test ~plz~ with Emacs versions older than 27.1.  For Emacs 26.3, an earlier 
version of ~plz~ may be used, or this version might be compatible, with or 
without minor changes, which the maintainer cannot offer support for.)
 
+*Fixes*
+
++ Improve workaround for Emacs's process sentinel-related issues.  (Don't try 
to process response a second time if Emacs calls the sentinel after ~plz~ has 
returned for a synchronous request.  See 
[[https://github.com/alphapapa/plz.el/issues/53][#53]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for extensive help 
debugging, and to [[https://ushin.org/][USHIN]] for sponsoring some of this 
work.)
+
 ** 0.8
 
 *Additions*



[elpa] externals/plz 4cfd78294d 10/13: Tests: Test on Emacs 29.1, 29.2, and 29.3

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit 4cfd78294df69e13656ce5098eaa552615af29a6
Author: Adam Porter 
Commit: Adam Porter 

Tests: Test on Emacs 29.1, 29.2, and 29.3
---
 .github/workflows/test.yml | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index 0f991e4057..bc2953afff 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -51,6 +51,9 @@ jobs:
   - 27.2
   - 28.1
   - 28.2
+  - 29.1
+  - 29.2
+  - 29.3
   - snapshot
 steps:
 - uses: purcell/setup-emacs@master



[elpa] externals/plz e077c706a2 06/13: Docs: Update USHIN references

2024-05-25 Thread ELPA Syncer
branch: externals/plz
commit e077c706a240abfdc4ddee71d677668b2d35f159
Author: Adam Porter 
Commit: Adam Porter 

Docs: Update USHIN references

To their preferred format.
---
 README.org | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index 6e33a904b9..042dd4d094 100644
--- a/README.org
+++ b/README.org
@@ -275,13 +275,13 @@ You may also clear a queue with ~plz-clear~, which 
cancels any active or queued
 ** 0.4
 
 *Additions*
-+ Support for HTTP ~HEAD~ requests.  (Thanks to [[https://ushin.org/][USHIN, 
Inc.]] for sponsoring.)
++ Support for HTTP ~HEAD~ requests.  (Thanks to [[https://ushin.org/][USHIN]] 
for sponsoring.)
 
 *Changes*
-+ Allow sending ~POST~ and ~PUT~ requests without bodies.  
([[https://github.com/alphapapa/plz.el/issues/16][#16]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to 
[[https://ushin.org/][USHIN, Inc.]] for sponsoring.)
++ Allow sending ~POST~ and ~PUT~ requests without bodies.  
([[https://github.com/alphapapa/plz.el/issues/16][#16]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to 
[[https://ushin.org/][USHIN]] for sponsoring.)
 
 *Fixes*
-+ All 2xx HTTP status codes are considered successful.  
([[https://github.com/alphapapa/plz.el/issues/17][#17]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to 
[[https://ushin.org/][USHIN, Inc.]] for sponsoring.)
++ All 2xx HTTP status codes are considered successful.  
([[https://github.com/alphapapa/plz.el/issues/17][#17]].  Thanks to 
[[https://github.com/josephmturner][Joseph Turner]] for reporting.  Thanks to 
[[https://ushin.org/][USHIN]] for sponsoring.)
 + Errors are signaled with error data correctly.
 
 *Internal*