             [clj-webdriver.driver :refer [init-driver]]
             [clj-webdriver.core :as core]
             [clj-webdriver.taxi :as taxi]
+            [semtag-web.route :as route]
             [clojure.string :as string])
   (:import [org.openqa.selenium.phantomjs PhantomJSDriver]
            [org.openqa.selenium.remote DesiredCapabilities]))

(defn url-ends-with [& args]
  (is (.endsWith (taxi/current-url) (apply app-url args))))

;; TODO - revisit not being able to go forward - log count stays the same going forward
#_(deftest history-works
  (click "Tag Stats")
  (is (.endsWith (taxi/current-url) "/semtag-web-test.html#/tag-stats"))
  (back)
  (is (.endsWith (taxi/current-url) "/semtag-web-test.html#/"))
  (forward))

(deftest urls-get-updated-correctly
  (is (.endsWith (taxi/current-url) (app-url)))
  (url-ends-with "")
  (click "Tag Stats")
  (url-ends-with "#/tag-stats")

(defn app-url [& args]
  (apply str "/semtag-web-test.html" args))

(defn full-app-url [& args]
  (str "out/public" (apply app-url args)))

(defn click [text]
  (core/click (taxi/find-element {:tag :a :text text}))
  (Thread/sleep 500))
