 
 (defmethod decode :default [x] (? x))
 
-(def screenshot-file (str "screenshot_test.png"))
+(def screenshot-file (str f-date "-screenshot_test.png"))
 (defn take-screenshot
   [driver]
   (is (string? (wc/get-screenshot driver :base64)))

  (:require [clojure.edn :refer [read-string]]
            [clj-time.core :as t]
            [clj-time.format :as f]
            [environ.core :refer [env]]
            [clojure.test :refer :all]
            ;[taoensso.truss :as truss :refer (have have! have?)]

(System/setProperty "phantomjs.binary.path" (env :phantom-path))

(def driver (wc/new-webdriver {:browser :phantomjs}))
(def built-in-formatter (f/formatters :basic-date-time))

(defn formatlocal [n offset]
  (let [nlocal (t/to-time-zone n (t/time-zone-for-offset offset))]
    (f/unparse (f/formatter-local "yyyy-MM-dd_hh:mm")
               nlocal)))
(def f-date (formatlocal (t/now) -0))

(defn title [] (wc/title driver))

