 
 (defn refresh-session [session-id]
    (with-car*
-     (info (format "Refreshing session %s..." session-id))
+     (debug (format "Refreshing session %s..." session-id))
      (car/watch session-set-key)
      (let [sess-key (format session-key-template session-id)]
        (car/watch sess-key)


(defn refresh-sessions [ids]
  (with-car*
    (info "Refreshing sessions...")
    (car/watch session-set-key)
    (doseq [session-id (or ids (session-ids))]
      (refresh-session session-id)))

      :current-url  (= arg (session-model :current-url))
      :not          (not     (matches-requirement arg session-model))
      :and          (every? #(matches-requirement % session-model) arg)
      :or           (some   #(matches-requirement % session-model) arg))))

(declare view-model view-models resume-webdriver-from-id destroy-session)

