anchor.diff:      | f when f.EndsWith("vbproj") -> Vbproj
       | _                           -> failwith (sprintf "Project file %s not supported. Unknown project type." projFileName)
   
  +let buildNumber =
  +    match environVar "BUILD_NUMBER" with
  +    | ""
  +    | null -> "0"
  +    | _ as nr -> nr
  +
  +let commitHash =
  +    match environVar "BUILD_VCS_NUMBER" with
  +    | ""
  +    | null -> Information.getCurrentSHA1(".")
  +    | _ as sha -> sha
  +
   // Generate assembly info files with the right version & up-to-date information
   Target "AssemblyInfo" (fun _ ->
  +    log (sprintf "##teamcity[buildNumber '%s.%s']" release.AssemblyVersion buildNumber)
  +
       let getAssemblyInfoAttributes projectName =
           [ Attribute.Title (projectName)
             Attribute.Product project
  
positive.code: // Build library & test project
  
  Target "Build" (fun _ ->
      !! solutionFile
      |> MSBuildRelease "" "Rebuild"
      |> ignore
  )
  
  // --------------------------------------------------------------------------------------
  
negative.code: // Build a NuGet package
  
  Target "NuGet" (fun _ ->
      log "##teamcity[progressStart 'NuGet']"
  
      Paket.Pack(fun p ->
          { p with
              OutputPath = "bin"
              Version = (sprintf "%s.%s" release.NugetVersion buildNumber)
              ReleaseNotes = toLines release.Notes})
  
      log "##teamcity[progressFinish 'NuGet']"
  )
  
  Target "PublishNuget" (fun _ ->
  