anchor.diff:  #
   """
   
  -let [<Literal>] defaultGirUrl = "https://github.com"
  -let [<Literal>] defaultGirRawUrl = "https://raw.githubusercontent.com"
  +let [<Literal>] defaultGitUrl = "https://github.com"
  +let [<Literal>] defaultGitRawUrl = "https://raw.githubusercontent.com"
   
   let vars = Dictionary<string,string option>()
   vars.["##ProjectName##"] <- promptForNoSpaces "Project Name (used for solution/project files)"
  
positive.code:     |> replaceWithVarOrMsg "##Description##" "Project has no description; update build.fsx"
      |> replaceWithVarOrMsg "##Author##" "Update Author in build.fsx"
      |> replaceWithVarOrMsg "##Tags##" ""
      |> replaceWithVarOrMsg "##GitUrl##" defaultGirUrl
      |> replaceWithVarOrMsg "##GitRawUrl##" defaultGirRawUrl
      |> replaceWithVarOrMsg "##GitHome##" "Update GitHome in build.fsx"
      |> replaceWithVarOrMsg "##GitName##" projectName
  
  
negative.code: vars.["##Description##"] <- promptFor "Description (longer description used by NuGet)"
  vars.["##Author##"]      <- promptFor "Author"
  vars.["##Tags##"]        <- promptFor "Tags (separated by spaces)"
  vars.["##GitUrl##"]      <- promptFor (sprintf "Github url (leave blank to use \"%s\")" defaultGitUrl)
  vars.["##GitRawUrl##"]   <- promptFor (sprintf "Github raw url (leave blank to use \"%s\")" defaultGitRawUrl)
  vars.["##GitHome##"]     <- promptFor "Github User or Organization"
  vars.["##GitName##"]     <- promptFor "Github Project Name (leave blank to use Project Name)"
  
  