anchor.diff:          |> Seq.cast<XmlNode>  
           |> Seq.filter (fun n -> n.Attributes.["source"].Value = source)
           |> Seq.toList
  -    
  +
  +
  +
  +
   // get the credential from the creedential store for a specific sourcee
   let getFromCredentialStore (source :string)=
       let doc =
  
positive.code:             Convert.FromBase64String(encrypted), 
              entropyBytes, 
              DataProtectionScope.CurrentUser))
              
  let getAuthFromNode (node : XmlNode) =
      Some { Username = AuthEntry.Create <| node.Attributes.["username"].Value
  
negative.code: open System.Text
  open System.IO
  
  let credentialStoreDirectory = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), "Paket")
  
  let credentialStoreFile = Path.Combine(credentialStoreDirectory, "credentials.xml")
  
  let entropyBytes = Encoding.UTF8.GetBytes("Paket");
  
  // Encrypts a string with a user specific keys
  