From 5bad5320032a8fc477e9f2527d23036c41ac023e Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Mon, 9 Jun 2025 18:31:55 -0400 Subject: Update --- src/wasp-db.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/wasp-db.el') diff --git a/src/wasp-db.el b/src/wasp-db.el index 8900cdc1..4b327f5b 100644 --- a/src/wasp-db.el +++ b/src/wasp-db.el @@ -31,7 +31,7 @@ "Queue of callbacks to handle incoming responses.") (defun w/db-parse-rest () - "Parse everything before the \r\n terminator (and consume the terminator)." + "Parse everything before the \\r\\n terminator (and consume the terminator)." (let ((res (w/eat (lambda (c) (/= c ?\r))))) (w/munch ?\r) (w/munch ?\n) @@ -62,8 +62,8 @@ "Try to parse a single RESP value from the current process buffer. If successful, pass the value to the queued callback and return non-nil. If not, return nil." - (when-let ((v (w/db-parse-value))) - (when-let ((cb (queue-dequeue w/db-callback-queue))) + (when-let* ((v (w/db-parse-value))) + (when-let* ((cb (queue-dequeue w/db-callback-queue))) (funcall cb v)) t)) -- cgit v1.2.3