diff --git a/Test/QuickCheck/Monadic/WebDriver.hs b/Test/QuickCheck/Monadic/WebDriver.hs
--- a/Test/QuickCheck/Monadic/WebDriver.hs
+++ b/Test/QuickCheck/Monadic/WebDriver.hs
@@ -5,8 +5,6 @@
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE OverloadedStrings   #-}
 
-
-
 -- |
 -- Module:      Test.QuickCheck.Monadic.WebDriver
 -- Copyright:   (c) 2014 Christian Brink
@@ -14,18 +12,17 @@
 -- Maintainer:  Christian Brink
 -- 
 -- Example usage:
---
 -- > import Test.QuickCheck
 -- > import Test.QuickCheck.Monadic (run, pick, assert)
 -- > import Test.WebDriver
--- > prop_Example = monadicWD context $ do
--- >     url <- pick $ oneof ("http://www.yesodweb.com", "http://snapframework.com/")
--- >     run $ openPage url
--- >     assert True
--- >     runIO $ putStrLn $ "We've just evaluated a `Gen a` using `pick` and \
--- >                        \a `WD ()` using `run`, then asserted a that a \
--- >                        \property holds using `assert`."
--- >  where context = SessionParams allCaps (return ())
+-- prop_Example = monadicWD context $ do
+--     url :: String <- pick $ elements ["http://www.yesodweb.com", "http://snapframework.com/"]
+--     run $ openPage url
+--     assert True
+--     runIO $ putStrLn $ "We've just evaluated a `Gen a` using `pick` and \
+--                        \a `WD ()` using `run`, then asserted a that a \
+--                        \property holds using `assert`."
+--   where context = SessionParams allCaps (return ())
 
 module Test.QuickCheck.Monadic.WebDriver where
 
@@ -55,7 +52,7 @@
 
 chrome' = chrome { chromeOptions = chromeOpts }
 
-caps browser = allCaps {browser=browser} 
+caps browser = allCaps { browser = browser } 
 
 capsChrome = caps chrome'
 capsFirefox = caps firefox
@@ -65,5 +62,11 @@
 seshParamsChrome   = seshParams chrome'
 seshParamsFirefox' = seshParams firefox
 
--- $example
---
+prop_Example = monadicWD context $ do
+    url :: String <- pick $ elements ["http://www.yesodweb.com", "http://snapframework.com/"]
+    run $ openPage url
+    assert True
+    runIO $ putStrLn $ "We've just evaluated a `Gen a` using `pick` and \
+                       \a `WD ()` using `run`, then asserted a that a \
+                       \property holds using `assert`."
+  where context = SessionParams allCaps (return ())
diff --git a/quickcheck-webdriver.cabal b/quickcheck-webdriver.cabal
--- a/quickcheck-webdriver.cabal
+++ b/quickcheck-webdriver.cabal
@@ -2,7 +2,7 @@
 --  documentation, see http://haskell.org/cabal/users-guide/
 
 name:                quickcheck-webdriver
-version:             0.1.0.4
+version:             0.1.0.6
 synopsis:            Utilities for using WebDriver with QuickCheck
 -- description:         
 license:             MIT