anchor.diff:      member x.``Will log an error if you don't have the import file on disk``() =
           x.TextReader.AddCommand "Y"
           async {
  -            let! contentTypeImportResponse = x.ImportDocType
  +            let! contentTypeImportResponse = x.ImportDocType()
               let messages = x.TextWriter.Messages
               List.head messages |> should equal (sprintf"Unable to located the import script '%s'" doctypeName)
           }
  
positive.code: 
      let doctypeName = "blog-post"
  
      member private x.ImportDocType = async {
          let run = x.Host.Run
          do! x.TextWriter.WriteLineAsync x.DatabaseLocation |> Async.AwaitTask
          let! installResponse = run [| "install" |] |> Async.AwaitTask
  
negative.code:                             sprintf "%s.xml" doctypeName |]
          File.WriteAllText(filePath, packageXml)
          async {
              let! contentTypeImportResponse = x.ImportDocType()
              x.TextWriter.Flush()
              let! contentTypeInfoResponse = run [| "ct"; "get"; "BlogPost" |] |> Async.AwaitTask
              let messages = x.TextWriter.Messages
  