diff options
author | Thomas Fitzsimmons <fitzsim@fitzsim.org> | 2020-09-25 22:57:25 -0400 |
---|---|---|
committer | Thomas Fitzsimmons <fitzsim@fitzsim.org> | 2020-09-25 23:05:34 -0400 |
commit | 4e817132700f03e97aab1933a1d01945af56a2b5 (patch) | |
tree | 0a6d2fab050409d940ee73c1946fa1a40110dfff /lisp/net/soap-client.el | |
parent | d58e3b3997228423b81df49035bd584fa1918f13 (diff) | |
download | emacs-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.el | 1 |
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)))) |