diff clojure/com/aurellem/vbm.clj @ 73:8a895ed4c0f9

added history facilities
author Robert McIntyre <rlm@mit.edu>
date Thu, 08 Mar 2012 04:37:10 -0600
parents c88ad4f6d9b4
children e8855121f413
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/vbm.clj	Thu Mar 08 03:41:24 2012 -0600
     1.2 +++ b/clojure/com/aurellem/vbm.clj	Thu Mar 08 04:37:10 2012 -0600
     1.3 @@ -46,7 +46,7 @@
     1.4           pending buttons]
     1.5      (if (empty? pending) fixed
     1.6          (let [mask (first pending)]
     1.7 -          (if (contains? (first pending) :reset)
     1.8 +          (if (contains? (set (first pending)) :reset)
     1.9              (recur (conj fixed mask) (drop 3 pending))
    1.10              (recur (conj fixed mask) (next pending)))))))
    1.11  
    1.12 @@ -88,8 +88,3 @@
    1.13          
    1.14  (defn write-vbm [buttons #^File out]
    1.15    (clojure.java.io/copy (buttons->vbm-bytes buttons) out))
    1.16 -    
    1.17 -  
    1.18 -         
    1.19 -    
    1.20 -  
    1.21 \ No newline at end of file