Function: soap-sample-value-for-xs-attribute-group

soap-sample-value-for-xs-attribute-group is a byte-compiled function defined in soap-inspect.el.gz.

Signature

(soap-sample-value-for-xs-attribute-group ATTRIBUTE-GROUP)

Documentation

Provide a sample value for ATTRIBUTE-GROUP, a WSDL attribute group.

This is a specialization of soap-sample-value for soap-xs-attribute objects.

Source Code

;; Defined in /usr/src/emacs/lisp/net/soap-inspect.el.gz
(defun soap-sample-value-for-xs-attribute-group (attribute-group)
  "Provide a sample value for ATTRIBUTE-GROUP, a WSDL attribute group.
This is a specialization of `soap-sample-value' for
soap-xs-attribute objects."
  (let ((sample-values nil))
    (dolist (attribute (soap-xs-attribute-group-attributes attribute-group))
      (if (soap-xs-attribute-name attribute)
          (setq sample-values
                (append sample-values
                        (cons (intern (soap-xs-attribute-name attribute))
                              (soap-sample-value (soap-xs-attribute-type
                                                  attribute)))))
        (setq sample-values
              (append sample-values
                      (soap-sample-value
                       (soap-xs-attribute-type attribute))))))))