[cl-soap-cvs] CVS update: cl-soap/test/test-google-adwords.lisp

[Sven Van Caekenberghe]

Update of /project/cl-soap/cvsroot/cl-soap/test
In directory common-lisp.net:/tmp/cvs-serv26091/test

Modified Files:
	test-google-adwords.lisp 
Log Message:
added new, better structured new-bind-element & new-resolve-element functions to xsd to bind wsdl-soap-call document-style input/output binding

Date: Fri Sep 23 23:33:06 2005
Author: scaekenberghe

Index: cl-soap/test/test-google-adwords.lisp
diff -u cl-soap/test/test-google-adwords.lisp:1.7 cl-soap/test/test-google-adwords.lisp:1.8
--- cl-soap/test/test-google-adwords.lisp:1.7	Fri Sep 23 10:03:46 2005
+++ cl-soap/test/test-google-adwords.lisp	Fri Sep 23 23:33:06 2005
@@ -1,6 +1,6 @@
 ;;;; -*- mode: lisp -*-
 ;;;;
-;;;; $Id: test-google-adwords.lisp,v 1.7 2005/09/23 08:03:46 scaekenberghe Exp $
+;;;; $Id: test-google-adwords.lisp,v 1.8 2005/09/23 21:33:06 scaekenberghe Exp $
 ;;;;
 ;;;; Some test on the Google AdWords API (not publically available)
 ;;;;
@@ -226,7 +226,7 @@
                   :input (mapcar #'(lambda (keyword)
                                      (destructuring-bind (text type max-cpc)
                                          keyword
-                                       `("keywordRequest" ("text" ,text "type" ,type "maxCpc" ,max-cpc))))
+                                       `("KeywordRequest" ("text" ,text "type" ,type "maxCpc" ,max-cpc))))
                                  keywords)
                   :headers `("email" ,*google-adwords-email* 
                              "password" ,*google-adwords-password*