anchor.diff:    CopyRecursive (formatting @@ "styles") (output @@ "content") true 
       |> Log "Copying styles and scripts: "
   
  +// When called from 'build.fsx', use the public project URL as <root>
  +// otherwise, use the current 'output' directory.
  +#if RELEASE
  +let refRoot = website + "/.."
  +#else
  +let refRoot = "file://" + (__SOURCE_DIRECTORY__ @@ "../output")
  +#endif
  +
   // Build API reference from XML comments
   let buildReference () =
     CleanDir (output @@ "reference")
  -  let binaries =
  -    referenceBinaries
  -    |> List.map (fun lib-> bin @@ lib)
  -  MetadataFormat.Generate
  -    ( binaries, output @@ "reference", layoutRoots, 
  -      parameters = ("root", root)::info,
  -      sourceRepo = githubLink @@ "tree/master",
  -      sourceFolder = __SOURCE_DIRECTORY__ @@ ".." @@ "..",
  -      publicOnly = true )
  +  for lib in referenceBinaries do
  +    MetadataFormat.Generate
  +      ( bin @@ lib, output @@ "reference", layoutRoots, 
  +        parameters = ("root", refRoot)::info,
  +        sourceRepo = githubLink @@ "tree/master",
  +        sourceFolder = __SOURCE_DIRECTORY__ @@ ".." @@ "..",
  +        libDirs = [ bin ] )
  +
  +#if RELEASE
  +let docRoot = website
  +#else
  +let docRoot = "file://" + (__SOURCE_DIRECTORY__ @@ "../output")
  +#endif
   
   // Build documentation from `fsx` and `md` files in `docs/content`
   let buildDocumentation () =
  
positive.code:   for dir in Seq.append [content] subdirs do
      let sub = if dir.Length > content.Length then dir.Substring(content.Length + 1) else "."
      Literate.ProcessDirectory
        ( dir, docTemplate, output @@ sub, replacements = ("root", root)::info,
          layoutRoots = layoutRoots,
          generateAnchors = true )
  
  
negative.code: // Binaries that have XML documentation (in a corresponding generated XML file)
  let referenceBinaries = [ "paket.exe" ]
  // Web site location for the generated documentation
  let website = "."
  
  let githubLink = "http://github.com/fsprojects/Paket"
  
  