react sensibly when there's a conflict and we cannot retrieve conflicting doc
Sun Jun 22 11:22:45 PDT 2008 Ryszard Szopa <ryszard.szopa@gmail.com>
* react sensibly when there's a conflict and we cannot retrieve conflicting doc
diff -rN -u old-cl-couch/client/request.lisp new-cl-couch/client/request.lisp
--- old-cl-couch/client/request.lisp 2014-07-28 11:32:07.000000000 -0700
+++ new-cl-couch/client/request.lisp 2014-07-28 11:32:07.000000000 -0700
@@ -58,7 +58,8 @@
responce)
((= error-number 412)
(error (apply 'make-condition 'couchdb-conflict
- :old-doc (http-request :get uri)
+ :old-doc (handler-case (http-request :get uri)
+ (type-error () "unknown"))
:new-doc content
:db (car path)
:server server