                                (assoc :reserved reserved))]
             (create-session pool create-req)))))))
 
-(s/defn destroy-webdriver!
+(s/defn ^:always-validate destroy-webdriver!
   [pool         :- SessionPool
    webdriver-id :- s/Str
    node-url     :- s/Str]

    :go-to-url s/Str
    :reserve s/Bool))

(s/defn save-session-tags-to-redis
  [pool :- SessionPool
   id :- s/Str
   tags]
  (car/wcar (:redis-conn pool)
    (sset-all (session-tags-key id) tags)))

(s/defn save-session-diff-to-redis
  [pool :- SessionPool
   id   :- s/Str
   session]

       (filter #(= (:webdriver-id %) webdriver-id))
       first))

(s/defn ^:always-validate refresh-session
  [pool :- SessionPool
   id   :- s/Str]
  (car/wcar (:redis-conn pool)
