        (response->edn)))
 
 (defn event->command
-  "Converts an event hash-map with keys :command :args into a raw request"
+  "Transforms an event hash-map with keys :command, :args into a raw request string"
   [{:keys [command args]}]
   (str (name command) " " (join " " args) "\n"))
 
 (defn command->event
-  "Converts a raw request back into its hash-map equivalent"
+  "Transforms a raw request string back into its hash-map equivalent"
   [data]
   (let [[command & args] (-> data (split #"\n") first trim (split #" "))]
     {:command (keyword command)

      [(camel->lisp k)
       (->> rest (join ":") trim read-string*)])))

(defn lower-case?
  "Returns if x is a lower-case character"
  [x]
  (not= (str x) (upper-case (str x))))

(defn response->edn
  "Transforms a response from server to EDN friendly format


(ns zirconia.utils
  (:require [clojure.string :refer (split trim join lower-case)]
            [cljs.reader :as reader]))

(extend-type js/RegExp
