[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-serv25506/test

Modified Files:
	test-google-adwords.lisp 
Log Message:
fixed wsdl spec

Date: Mon Sep 19 19:54:49 2005
Author: scaekenberghe

Index: cl-soap/test/test-google-adwords.lisp
diff -u cl-soap/test/test-google-adwords.lisp:1.3 cl-soap/test/test-google-adwords.lisp:1.4
--- cl-soap/test/test-google-adwords.lisp:1.3	Mon Sep 19 18:56:14 2005
+++ cl-soap/test/test-google-adwords.lisp	Mon Sep 19 19:54:49 2005
@@ -1,6 +1,6 @@
 ;;;; -*- mode: lisp -*-
 ;;;;
-;;;; $Id: test-google-adwords.lisp,v 1.3 2005/09/19 16:56:14 scaekenberghe Exp $
+;;;; $Id: test-google-adwords.lisp,v 1.4 2005/09/19 17:54:49 scaekenberghe Exp $
 ;;;;
 ;;;; Some test on the Google AdWords API (not publically available)
 ;;;;
@@ -72,7 +72,7 @@
 #+NIL
 (defun getUsageQuotaThisMonth ()
   ;; when we can handle the google type schema this will work ;-)
-  (wsdl-soap-call "https://adwords.google.com:443/api/adwords/v2/InfoService"
+  (wsdl-soap-call "https://adwords.google.com:443/api/adwords/v2/InfoService?wsdl"
                   "getUsageQuotaThisMonth"
                   :headers `("email" ,*google-adwords-email* 
                              "password" ,*google-adwords-password*