Permalink
Browse files

Change naming to make clearer.

  • Loading branch information...
1 parent 3244289 commit 89fae58012c5ff5c90eaabd524b8e935bc234ca2 @cmeiklejohn committed Mar 13, 2013
Showing with 3 additions and 5 deletions.
  1. +3 −5 src/cljs/shafty/core.cljs
View
8 src/cljs/shafty/core.cljs
@@ -172,12 +172,10 @@
false)))))
(delay! [this interval]
- (let [t (fn [me x] (js/setTimeout
- (fn [] (.-value x)) interval))
- e (event [this] t)]
+ (let [f (fn [me x] (js/setTimeout (fn [] (.-value x)) interval))
+ e (event [this] f)]
(add-sink! this e) e))
- (fn [x] (send! me (.-value x))) interval))
- e (event [this] t)]
+
(add-sink! this e) e))
(merge! [this that]

0 comments on commit 89fae58

Please sign in to comment.