                        (take 3 (drop 15 r)) ["-"]
                        (take 12 (drop 18 r))))))
 
-
-
-;; Om Instrumentation
-
 (defn with-omi []
+  "Adds Om Instrumentation (dev mode)"
   (fn [f cursor m]
     (om/build* f cursor
                (assoc m
                       :descriptor omi/instrumentation-methods))))
-

            [om-i.core :as omi])
  (:import [goog.ui IdGenerator]))

(enable-console-print!)
(def debug true)

(def host "http://127.0.0.1:3449/")

(defonce base-url (str js/window.location.origin "/"))

;; Logging

(defn log
  "log messages if the browser console is open"

    (log (apply pr-str values))
    (last values))

(defn $ [id]
  (.getElementById js/document id))

(defn to-clj [data]
  (js->clj data :keywordize-keys true))

(defn format
  "Format a string using goog.string.format"
  [fmt & args]
  (apply goog.string/format fmt args))

(defn guid
  "Generate a Guid"
  []
  (-> IdGenerator
      .getInstance
      .getNextUniqueId))
