# HG changeset patch # User Robert McIntyre # Date 1402932401 14400 # Node ID 1943a5313f40b17aca8b6c24748cb6a8a0655687 # Parent 807fb1046a98ce8a99529fadab808aaeada807fa fix minor problem. diff -r 807fb1046a98 -r 1943a5313f40 org/self_organizing_touch.clj --- a/org/self_organizing_touch.clj Thu May 29 17:02:17 2014 -0400 +++ b/org/self_organizing_touch.clj Mon Jun 16 11:26:41 2014 -0400 @@ -142,11 +142,11 @@ remove-similar))) -(def all-touch-coordinates - (concat - (rect-region [0 15] [7 22]) - (rect-region [8 0] [14 29]) - (rect-region [15 15] [22 22]))) +;; (def all-touch-coordinates +;; (concat +;; (rect-region [0 15] [7 22]) +;; (rect-region [8 0] [14 29]) +;; (rect-region [15 15] [22 22]))) (defn view-touch-region [coords] (let [touched-region