anchor.diff:      Æøå"""
     let doc = Literate.ParseMarkdownString(content, formatAgent=getFormatAgent())
     let html = Literate.WriteHtml(doc)
  -  html |> should contain (sprintf ">Æøå%s<" System.Environment.NewLine)
  +  html |> shouldContainText (sprintf ">Æøå%s<" System.Environment.NewLine)
   
   [<Test>]
   let ``Correctly handles code starting with whitespace`` () =
  
positive.code: let a2 = 2"""
    let doc = Literate.ParseScriptString(content, formatAgent=getFormatAgent())
    let html = Literate.WriteHtml(doc, lineNumbers=true)
    html |> should contain "<p>Hello</p>"
    html |> should contain "1:"
    html |> should contain "2:"
    html |> shouldNotContainText "3:"
  
  [<Test>]
  
negative.code:       inner"""
    let doc = Literate.ParseMarkdownString(content, formatAgent=getFormatAgent())
    let html = Literate.WriteHtml(doc)
    html |> shouldContainText ">  inner"
  
  [<Test>]
  let ``Correctly handles code which garbage after commands`` () =
  