anchor.diff:                      else verbosefn "  - custom nodes for %s in %s ==> skipping" fileItem.Include this.FileName
                   | None  ->
                       let firstNode = fileItemsInSameDir |> Seq.head
  -                    firstNode.ParentNode.InsertBefore(paketNode, firstNode) |> ignore
  +                    firstNode.ParentNode.InsertBefore(libReferenceNode, firstNode) |> ignore
           
           this.DeleteIfEmpty("PropertyGroup")
           this.DeleteIfEmpty("ItemGroup")
  
positive.code:         for node in nodesToDelete do
              node.ParentNode.RemoveChild(node) |> ignore
  
      member this.createFileItemNode fileItem =
          this.CreateNode(fileItem.BuildAction)
          |> addAttribute "Include" fileItem.Include
          |> addChild (this.CreateNode("Paket","True"))
          |> (fun n -> match fileItem.Link with
                       | Some link -> addChild (this.CreateNode("Link" ,link.Replace("\\","/"))) n
                       | _ -> n)
  
      member this.UpdateFileItems(fileItems : FileItem list, hard) = 
          this.DeletePaketNodes("Compile")
          this.DeletePaketNodes("Content")
  
negative.code:                  "Compile", node :?> XmlElement ] 
              |> dict
  
  
          for fileItem in fileItems |> List.rev do
              let libReferenceNode = 
                  this.CreateNode(fileItem.BuildAction)
                  |> addAttribute "Include" fileItem.Include
                  |> addChild (this.CreateNode("Paket","True"))
                  |> (fun n -> match fileItem.Link with
                               | Some link -> addChild (this.CreateNode("Link" ,link.Replace("\\","/"))) n
                               | _ -> n)
  
              let fileItemsInSameDir =
                  this.Document 
  