anchor.diff:  
   let AppDataFolder =
       getEnvDir Environment.SpecialFolder.ApplicationData 
  -    |> Option.defaultValue (
  +    |> Option.defaultWith (fun _ ->
           let fallback = Path.GetFullPath ".paket"
  -        if Logging.verbose then
  -            Logging.tracefn "Could not find AppDataFolder, try to set the APPDATA environment variable. Using '%s' instead." fallback
  +        Logging.traceWarnfn "Could not find AppDataFolder, try to set the APPDATA environment variable. Using '%s' instead." fallback
           fallback)
   
   let PaketConfigFolder   = Path.Combine(AppDataFolder, "Paket")
  
positive.code:             if not di.Exists then
                  di.Create ()
              Some di.FullName
      ))|> Option.defaultValue (
          let fallback = Path.GetFullPath ".paket"
          if Logging.verbose then
              Logging.tracefn "Could not find LocalApplicationData folder, try to set the 'LocalAppData' environment variable. Using '%s' instead" fallback
          fallback
      )
  
negative.code: let LocalRootForTempData =
      getEnvDir Environment.SpecialFolder.UserProfile 
      |> Option.orElse (getEnvDir Environment.SpecialFolder.LocalApplicationData)
      |> Option.defaultWith (fun _ ->
          let fallback = Path.GetFullPath ".paket"
          Logging.traceWarnfn "Could not detect a root for our (user specific) temporary files. Try to set the 'HOME' or 'LocalAppData' environment variable!. Using '%s' instead." fallback
          fallback
      )
  
  