 
                  [:span
                   (vlib/safe-space) " " (vlib/safe-space)
-                  [:span.pointer {:onClick #((lib/show-overlay) (hide))}
+                  [:span.pointer {:onClick #(do (lib/show-overlay) (hide))}
                    (vlib/fa-icon "fa-comments")
                    (translate :common :show-discuss :space)]]])))
 (def tooltip (om/factory Tooltip))

  (let [offset 5]
    (+ (- top theight offset) js/window.scrollY)))

(defn calc-position
  "Create a new tooltip at given selection. Creates a rectangle around the selection,
   which has position-properties and which are useful for positioning of the tooltip."
  [tooltip-width tooltip-height]

    (events/listen el type (fn [e] (put! out e)))
    out))

(defn- track-user-selection
  "Listen to clicks on the websites' text to store it in the app-state."
  []
  (when-let [discuss-text-dom (gdom/getElement (lib/prefix-name "text"))]
