anchor.diff:                  | Choice2Of2 f -> failP file f
               sr.Dispose()
               let! type' = parsePackageConfigType file map
  +
  +            let currentVersion = 
  +                match currentVersion with
  +                | None -> Map.tryFind "version" map |> Option.map SemVer.Parse
  +                | _ -> currentVersion
  +
               match type' with
               | ProjectType -> 
                   let core : ProjectCoreInfo = 
  
positive.code:         | Some m -> ok m
          | None -> failP file "No description line in paket.template file."
      
      let private getDependencies (map : Map<string, string>,currentVersion:SemVerInfo option) = 
          Map.tryFind "dependencies" map
          |> Option.map (fun d -> d.Split '\n')
          |> Option.map (Array.map (fun d -> 
  
negative.code:         |> Option.map List.ofSeq
          |> fun x -> defaultArg x []
      
      let private getOptionalInfo (fileName, map : Map<string, string>, currentVersion) = 
          let get (n : string) = Map.tryFind (n.ToLowerInvariant()) map
  
          let title = get "title"
  