summaryrefslogtreecommitdiff
path: root/lisp/net/soap-client.el
diff options
context:
space:
mode:
authorThomas Fitzsimmons <fitzsim@fitzsim.org>2020-09-25 22:57:25 -0400
committerThomas Fitzsimmons <fitzsim@fitzsim.org>2020-09-25 23:05:34 -0400
commit4e817132700f03e97aab1933a1d01945af56a2b5 (patch)
tree0a6d2fab050409d940ee73c1946fa1a40110dfff /lisp/net/soap-client.el
parentd58e3b3997228423b81df49035bd584fa1918f13 (diff)
downloademacs-4e817132700f03e97aab1933a1d01945af56a2b5.tar.gz
emacs-4e817132700f03e97aab1933a1d01945af56a2b5.tar.bz2
emacs-4e817132700f03e97aab1933a1d01945af56a2b5.zip
soap-client.el: Prevent some invalid encoding warnings
* lisp/net/soap-client.el (soap-encode-xs-complex-type): Do not warn about missing non-nillable slot if type iself is optional.
Diffstat (limited to 'lisp/net/soap-client.el')
-rw-r--r--lisp/net/soap-client.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/net/soap-client.el b/lisp/net/soap-client.el
index 7425e8763fb..bb74f47a8b9 100644
--- a/lisp/net/soap-client.el
+++ b/lisp/net/soap-client.el
@@ -1716,6 +1716,7 @@ This is a specialization of `soap-encode-value' for
((and (not (eq indicator 'choice))
(= instance-count 0)
(not (soap-xs-element-optional? element))
+ (not (soap-xs-complex-type-optional? type))
(and (soap-xs-complex-type-p element-type)
(not (soap-xs-complex-type-optional-p
element-type))))