changeset 57:c598c55c89e7

Avoid reflection.
author Mikhail Kryshen <mikhail@kryshen.net>
date Fri, 20 Aug 2010 03:19:37 +0400
parents 87400ec6d433
children 64b67aa224f4
files src/net/kryshen/indyvon/core.clj
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line diff
     1.1 --- a/src/net/kryshen/indyvon/core.clj	Fri Aug 20 03:08:02 2010 +0400
     1.2 +++ b/src/net/kryshen/indyvon/core.clj	Fri Aug 20 03:19:37 2010 +0400
     1.3 @@ -273,7 +273,7 @@
     1.4  (defn- under-cursor
     1.5    "Returns a vector of child nodes under cursor."
     1.6    [x y tree node]
     1.7 -  (some #(if (.contains (:clip %) x y)
     1.8 +  (some #(if (.contains ^Shape (:clip %) x y)
     1.9             (conj (vec (under-cursor x y tree %)) %))
    1.10          (get tree node)))
    1.11