From 60e93b4275ef82e37cbb555c54ab8b2d8334e7c8 Mon Sep 17 00:00:00 2001
From: "Michael S. Klishin" <michael@novemberain.com>
Date: Fri, 9 Sep 2011 06:58:57 +0400
Subject: [PATCH] Eliminate a reflection warning

---
 src/monger/result.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/monger/result.clj b/src/monger/result.clj
index 768787a..16cfcfa 100644
--- a/src/monger/result.clj
+++ b/src/monger/result.clj
@@ -33,7 +33,7 @@
     (> (count (str (.get result "err"))) 0))
   (updated-existing?
     [^DBObject result]
-    (let [v (.get result "updatedExisting")]
+    (let [v ^Boolean (.get result "updatedExisting")]
       (and v (Boolean/valueOf v))))