anchor.diff:      let pageLoaded () = 
           (element "#wait_for").Text = "Done!"
       
  -    !^ "http://localhost:4567/waitFor"
  +    !^ "http://lefthandedgoat.github.io/canopy/testpages/waitFor"
       waitFor pageLoaded
       "#wait_for" == "Done!")
   
   "another example of another wait for, waiting on opacity to be 100% before clicking" &&& (fun _ ->
       compareTimeout <- 10.0
  -    !^ "http://localhost:4567/noClickTilVisible"
  +    !^ "http://lefthandedgoat.github.io/canopy/testpages/noClickTilVisible"
       waitFor (fadedIn "#link")
       click "#link"
  -    on "http://localhost:4567/home")
  +    on "http://lefthandedgoat.github.io/canopy/testpages/home")
   
   "define a custom wait for using any function that takes in unit and returns bool, example using lists" &&& (fun _ ->
       let fiveNumbersShown () = 
           (elements ".number").Length = 5
       
  -    !^ "http://localhost:4567/waitFor"
  +    !^ "http://lefthandedgoat.github.io/canopy/testpages/waitFor"
       waitFor fiveNumbersShown
       (elements ".number").Length === 5)
   
  
positive.code:     "#firstName" == "John1")
  
  context "alert tests"
  before (fun _ -> !^ "http://localhost:4567/alert")
  
  "alert box should have 'Alert Test'" &&& (fun _ ->    
      click "#alert_test"
  
negative.code: 
  "readonly should throw error on read only field with clear" &&& (fun _ ->
      failsWith "element #read_only is marked as read only, you can not clear read only elements"
      !^ "http://lefthandedgoat.github.io/canopy/testpages/readonly"    
      clear "#read_only")
          
  "readonly should throw error on read only field with write" &&& (fun _ ->
      failsWith "element #read_only is marked as read only, you can not write to read only elements"
      !^ "http://lefthandedgoat.github.io/canopy/testpages/readonly"    
      "#read_only" << "new text")
  
  "when value is wrong and changes to empty string prior to time out, it should show wrong value, not empty string" &&& (fun _ ->
  