aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/net/soap-client.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/net/soap-client.el')
-rw-r--r--lisp/net/soap-client.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/net/soap-client.el b/lisp/net/soap-client.el
index f6d2ba229e5..544f0286834 100644
--- a/lisp/net/soap-client.el
+++ b/lisp/net/soap-client.el
@@ -3194,7 +3194,7 @@ OPERATION-NAME and PARAMETERS are as described in `soap-invoke'."
3194 (unwind-protect 3194 (unwind-protect
3195 (let ((error-status (plist-get status :error))) 3195 (let ((error-status (plist-get status :error)))
3196 (if error-status 3196 (if error-status
3197 (signal (car error-status) (cdr error-status)) 3197 (signal error-status)
3198 (apply callback 3198 (apply callback
3199 (soap-parse-envelope 3199 (soap-parse-envelope
3200 (soap-parse-server-response) 3200 (soap-parse-server-response)
@@ -3221,7 +3221,7 @@ OPERATION-NAME and PARAMETERS are as described in `soap-invoke'."
3221 ;; Propagate soap-errors -- they are error replies of the 3221 ;; Propagate soap-errors -- they are error replies of the
3222 ;; SOAP protocol and don't indicate a communication 3222 ;; SOAP protocol and don't indicate a communication
3223 ;; problem or a bug in this code. 3223 ;; problem or a bug in this code.
3224 (signal (car err) (cdr err))) 3224 (signal err))
3225 (error 3225 (error
3226 (when soap-debug 3226 (when soap-debug
3227 (pop-to-buffer buffer)) 3227 (pop-to-buffer buffer))