                    (update-in [:tags]
                               (fnil conj #{})
                               "ccw"))]
-        (println "spec#:" spec#)
+        ;(println "spec#:" spec#)
        (m/merge-handler! @m/app spec#)))))
 
 ;; TODO support options !!!

                   (update-in [:tags]
                              (fnil conj #{})
                              "ccw"))]
     (println "spec#:" spec#)
     (m/merge-key-binding! @m/app spec#)))

                   (update-in [:tags]
                              (fnil conj #{})
                              "ccw"))]
       ;(println "spec#:" spec#)
       (m/merge-command! @m/app spec#))))

;;; TODO register for deletion in  m/*elements* (a set)
