anchor.diff:  let GitBookOnly setParams formats =
     let inner format =
       traceStartTask "gitbook" ""
  -    let parameters = setParams GitBookDefaults
  +    let parameters = setParams <| GitBookDefaults ()
       let args = buildGitBookArgs parameters format
       trace (parameters.ToolPath + " " + args)
       if 0 <> ExecProcess (fun info -> 
  
positive.code: let defaultBookBuilderDir = currentDirectory @@ "gitbook"
  let defaultNodeModulesPath = currentDirectory @@ "node_modules"
  
  let GitBookDefaults = {
    ToolPath =
      let name = if isUnix then "gitbook" else "gitbook.cmd"
      findToolInSubPath name defaultNodeModulesPath
  
negative.code:          Command = Install Standard
           WorkingDirectory = currentDirectory
        })
    let parameters = setParams <| GitBookDefaults ()
    match parameters.FsiEvaluator with
    | Some fsi -> GitBook.Generate(parameters.SrcDir, parameters.CompiledSrcDir, fsi)
    | None -> GitBook.Generate(parameters.SrcDir, parameters.CompiledSrcDir)
  