# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1395249709 14400
# Node ID cc99572410768cb5b18a69d24a4f9ee55dd87dbf
# Parent  a331d5ff73e0c101bf96977687d9b613c24a3bc0
fix laziness error.

diff -r a331d5ff73e0 -r cc9957241076 org/self_organizing_touch.clj
--- a/org/self_organizing_touch.clj	Tue Mar 18 23:04:48 2014 -0400
+++ b/org/self_organizing_touch.clj	Wed Mar 19 13:21:49 2014 -0400
@@ -105,7 +105,7 @@
         data
         [[(vec (keys touched-region)) (vec (vals touched-region))]]
         touch-display (view-touch)]
-    (repeatedly 5 #(touch-display data)) data))
+    (dorun (repeatedly 5 #(touch-display data)))))
 
 (defn learn-touch-regions []
   (let [experiences (atom [])