branch: externals/plz
commit 56c92ff78e8ffb37f318fa44e8a7792196826831
Author: Adam Porter <[email protected]>
Commit: Adam Porter <[email protected]>
Tidy
---
plz.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/plz.el b/plz.el
index cec20a2b5e..6c655eb5d8 100644
--- a/plz.el
+++ b/plz.el
@@ -509,10 +509,9 @@ NOQUERY is passed to `make-process', which see."
(error "NO RESULT FROM PROCESS:%S BUFFER-STRING:%S"
process
(buffer-string))))
(pcase (process-get process :plz-result)
- ((pred plz-error-p)
- (signal 'plz-error (process-get process :plz-result)))
- (_
- (process-get process :plz-result))))
+ ((and (pred plz-error-p) data)
+ (signal 'plz-error data))
+ (else else)))
(unless (eq as 'buffer)
(kill-buffer process-buffer))
(kill-buffer stderr-buffer))
