       (when (= text "")                                     ; Set initial text to be displayed
         (om/set-state! owner :text (:text data)))
       (dom/span #js {:className "pointer"
-                     :style (display show)}
+                     :style (display show)
+                     :onClick (fn [e] (println "click"))}
                 text))))
 
 (defn clipboard-view []

                                     :onClick   #(com/add-start-statement (lib/get-value-by-id "add-element"))}
                                "Submit"))))

(defn main-view [data]
  (reify om/IRender
    (render [_]

                       (dom/i #js {:className "fa fa-comments"})
                       " "
                       (get-in data [:layout :title]))
               (main-content-view data)))))