Advertisement
Guest User

Untitled

a guest
Dec 21st, 2015
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ;;Style 1 - dependency defined in surrounding namespace
  2. (defn to-bool [s]
  3.   (wd/to s)
  4.   (wd/implicit-wait 3000)
  5.   (= (wd/current-url) s))
  6.  
  7.  
  8. ;;Style 2 - dependencies passed in makes mocking easier in testing
  9. (defn to-bool [s to implicit-wait current-url]
  10.   (to s)
  11.   (implicit-wait 3000)
  12.   (= (current-url) s))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement