Correctly handle boolean values returned via JMX.

Patch for JMX-15 by Chris Lohfink

Author: nickmbailey

src/main/clojure/clojure/java/jmx.clj

@@ -145,6 +145,8 @@
    [m]
    (into {} (zipmap (keys m) (map objects->data (vals m)))))
 
+  java.lang.Boolean
+  (objects->data [b] (boolean b))
   Object
   (objects->data [obj] obj)
   nil

src/test/clojure/clojure/java/test_jmx.clj

@@ -94,9 +94,9 @@
 (deftest writing-attributes
   (let [mem "java.lang:type=Memory"]
     (jmx/write! mem :Verbose true)
-    ;; need boolean cast to fix Boolean object identity error
-    (is (true? (boolean (jmx/raw-read mem :Verbose))))
-    (jmx/write! mem :Verbose false)))
+    (is (true? (jmx/read mem :Verbose)))
+    (jmx/write! mem :Verbose false)
+    (is (false? (jmx/read mem :Verbose)))))
 
 (deftest test-invoke-operations
   (testing "without arguments"