From: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Date: Sat, 26 Sep 2020 02:57:25 +0000 (-0400)
Subject: soap-client.el: Prevent some invalid encoding warnings
X-Git-Tag: emacs-28.0.90~5877
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4e817132700f03e97aab1933a1d01945af56a2b5;p=emacs.git

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.
---

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))))