某些setter上的to-java功能不工作

Question

在此示例中，最后一个测试失败。

我使用了org.codehause.mojo.rpm.Mapping作为示例，因为我是在那里发现这个错误的。

(链接：1) http://mojo.codehaus.org/rpm-maven-plugin/apidocs/org/codehaus/mojo/rpm/Mapping.html

测试

(do
(使用 'clojure.java.data

       'clojure.test)

(导入 '(链接：org.codehaus.mojo.rpm Mapping))

(测试 "正常设置"

(let (链接：mapping (Mapping.))

	(.setConfiguration mapping "a value")
	(.setDirectory mapping "/tmp")

	(is (= (.getDirectory mapping) "/tmp"))
	(is (= (.getConfiguration mapping) "a value"))))

(测试 "通过java-data设置"

(let (link: mapping (to-java Mapping {:configuration "a value" :directory "/tmp"}))
  (is (= (.getDirectory mapping) "/tmp"))
  (is (= (.getConfiguration mapping) "a value")))))

Answer 1

参考： https://clojure.atlassian.net/browse/JDATA-4（由报告）