anchor.diff:          | _ -> Guid.Empty
   
       let getInterProjectDependencies project =
  -        let forceGetInnerText node name =
  +        let forceGetName node name =
               match node |> getNode name with 
               | Some n -> Some n.InnerText
               | None ->
  
positive.code:                 Path.Combine(di.FullName,path) |> Path.GetFullPath
  
                RelativePath = path.Replace("/","\\")
                Name = forceGetInnerText node "Name"
                GUID = forceGetInnerText node "Project" |> Option.map Guid.Parse }]
  
      let replaceNuGetPackagesFile project =
          let noneAndContentNodes = 
  
negative.code:                     Some <| fi.Name.Replace(fi.Extension,"")
                  | None -> None
  
          let forceGetInnerText node name =
              node |> getNode name |> Option.map (fun n -> n.InnerText)
  
          [for node in project.Document |> getDescendants "ProjectReference" -> 
              let path =
                  let normalizedPath = node.Attributes.["Include"].Value |> normalizePath 
  