[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/plz 438162db4e 13/40: WIP: Add request args to sentinel
From: |
ELPA Syncer |
Subject: |
[elpa] externals/plz 438162db4e 13/40: WIP: Add request args to sentinel error |
Date: |
Mon, 26 Jun 2023 06:59:32 -0400 (EDT) |
branch: externals/plz
commit 438162db4ec4dee1c82c622d159fa83ff5b9a9f3
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>
WIP: Add request args to sentinel error
---
plz.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/plz.el b/plz.el
index 6c655eb5d8..dbf6a1f5be 100644
--- a/plz.el
+++ b/plz.el
@@ -273,7 +273,7 @@ connection phase and waiting to receive the response (the
;;;;; Public
-(cl-defun plz (method url &key headers body else finally noquery
+(cl-defun plz (method url &rest rest &key headers body else finally noquery
(as 'string) (then 'sync)
(body-type 'text) (decode t decode-s)
(connect-timeout plz-connect-timeout) (timeout
plz-timeout))
@@ -487,6 +487,7 @@ NOQUERY is passed to `make-process', which see."
plz-else else
plz-finally finally
plz-sync sync-p)
+ (setf (process-get process :plz-args) (apply #'list method url rest))
;; Send --config arguments.
(process-send-string process curl-config)
(when body
@@ -760,7 +761,8 @@ node `(elisp) Sentinels'). Kills the buffer before
returning."
;; Error signaled by a function called to process HTTP response:
;; rather than signaling an error from within the sentinel,
;; return or call the ELSE function with a plz-error struct.
- (let ((err (make-plz-error :message (format "plz--sentinel: Error
signaled: %S" err))))
+ (let ((err (make-plz-error :message (format "plz--sentinel: Error
signaled: %S REQUEST-ARGS:%S"
+ err (process-get
process-or-buffer :plz-args)))))
(pcase-exhaustive plz-else
(`nil (process-put process-or-buffer :plz-result err))
((pred functionp) (funcall plz-else err)))))))
- [elpa] externals/plz 56c92ff78e 12/40: Tidy, (continued)
- [elpa] externals/plz 56c92ff78e 12/40: Tidy, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 43231ac43c 14/40: WIP: Use timer for response parsing, ELPA Syncer, 2023/06/26
- [elpa] externals/plz d6dfe3b27a 11/40: Tidy: Remove plz-result, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 85ac0fbe38 15/40: WIP: Use sentinel value; add comments, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 7d197e968a 20/40: Change: (plz--respond) Don't catch errors from THEN/ELSE, ELPA Syncer, 2023/06/26
- [elpa] externals/plz a2c20b1437 24/40: Comment: TODO, ELPA Syncer, 2023/06/26
- [elpa] externals/plz f551c1bd49 25/40: Tidy: (plz--respond), ELPA Syncer, 2023/06/26
- [elpa] externals/plz de8e21f81d 29/40: Tidy: Docstrings, ELPA Syncer, 2023/06/26
- [elpa] externals/plz f9f95a8544 34/40: Comment: Add TODO, ELPA Syncer, 2023/06/26
- [elpa] externals/plz c786bbf7d2 35/40: Tidy/Comment, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 438162db4e 13/40: WIP: Add request args to sentinel error,
ELPA Syncer <=
- [elpa] externals/plz a1f8a10b0b 16/40: Comment: Add FIXME, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 880223e7c0 22/40: Tidy: (plz--sentinel), ELPA Syncer, 2023/06/26
- [elpa] externals/plz 53ef6a16ce 26/40: Comment: Tidy, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 582f0c5bb8 31/40: Tests: Enable continue-on-error for linting, ELPA Syncer, 2023/06/26
- [elpa] externals/plz b896c41d71 32/40: Change: Generate buffer for STDERR, ELPA Syncer, 2023/06/26
- [elpa] externals/plz d2a7368699 37/40: Tidy: (plz) Don't switch to process-buffer, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 9319470060 38/40: Merge branch 'wip/no-signal-from-sentinel-as-timer', ELPA Syncer, 2023/06/26
- [elpa] externals/plz 5e63662e21 40/40: Docs: Update changelog, ELPA Syncer, 2023/06/26
- [elpa] externals/plz 0cb20bc74d 03/40: Tidy, ELPA Syncer, 2023/06/26
- [elpa] externals/plz e28b4e8b6a 06/40: Tidy, ELPA Syncer, 2023/06/26