[clouchdb-cvs] CVS clouchdb/src

[peddy]

Update of /project/clouchdb/cvsroot/clouchdb/src
In directory cl-net:/tmp/cvs-serv4258

Modified Files:
	clouchdb.lisp 
Log Message:
Incorporated patch from Nate Young that fixes an stacktrace generated
when executing create-db via a squid proxy. Thanks Nate!


--- /project/clouchdb/cvsroot/clouchdb/src/clouchdb.lisp	2009/04/20 01:56:58	1.31
+++ /project/clouchdb/cvsroot/clouchdb/src/clouchdb.lisp	2009/06/04 01:47:49	1.32
@@ -450,7 +450,7 @@
 and create a new database."
   (let* ((name (if db-name-p db-name *db-name*))
 	 (res (db-request (cat (url-encode name) "/") 
-                          :method :put)))
+                          :method :put :content "")))
     (if (equal "file_exists" (document-property :|error| res))
       (ecase if-exists
 	((:ignore) (list (cons :|ok| t) (cons :|ignored| t)))