 
 (defn mk-uri [base-uri query-params]
   (str base-uri "?"
-       (clojure.string/join "&"
+       (join "&"
              (map (fn [[k v]] (str k "=" (url-encode v))) query-params))))
 
 (defn proxy-url [url]

    (events/listen el type
      (fn [e] (put! out e)))
    out))
   
(defn from-query []
  (if-let [node (.getPlace autocompleteFrom)]
    (.-formatted_address node)
    (str my-lat "," my-lng)))

(defn to-query []
  (-> autocompleteTo .getPlace .-formatted_address))

(defn remove-explanation-text []
  (.remove (dom/getElement "explanation")))

(ns ontheway.modern
  (:use [clojure.string :only [trim join]])
  (:use-macros [dommy.macros :only [deftemplate sel1 sel]])
  (:require-macros [cljs.core.async.macros :refer [go]])
  (:require [cljs-http.client :as http]
