diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-07-28 01:25:22 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-07-28 01:25:22 +0000 |
| commit | 544ef19f0bc998515d51ca26ae2fd49cec5c1842 (patch) | |
| tree | 354dd987d8b38a7872a72ed2778aa9af23138afb | |
| parent | 340c5afccdfac96cdb2612657b88418c40104c2f (diff) | |
fixed :exposes to use getDeclaredField
| -rw-r--r-- | src/clojure/genclass.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/genclass.clj b/src/clojure/genclass.clj index cdc09845..f9da00e4 100644 --- a/src/clojure/genclass.clj +++ b/src/clojure/genclass.clj @@ -410,7 +410,7 @@ (. gen (endMethod)))) ;field exposers (doseq [f {getter :get setter :set}] exposes - (let [fld (.getField super (str f)) + (let [fld (.getDeclaredField super (str f)) ftype (totype (.getType fld))] (when getter (let [m (new Method (str getter) ftype (to-types [])) |