          :sidebar    {:show? true}
          }))
 
+(defn str->int
+  "Convert String to Integer."
+  [s]
+  (let [converted (js/parseInt s)]
+    (when-not (js/isNaN converted)
+      converted)))
+
 ;; Get
 (defn get-cursor
   "Return a cursor to the corresponding key in the app-state."

  "Returns list of dictionaries with all available issues."
  []
  (get-in @app-state [:issues :all]))

(defn get-bubbles
  "Return message bubbles from DBAS."

  [sub st]
  (not= (.indexOf st sub) -1))


;;;; CSS modifications
(defn toggle-class
