Simplify command

for the moment I didn't have better idea how to shrink the contents of dependencies.file but to filter lines where a package name belongs to the set of indirect packages.
this probably needs more test cases and docs and stuff
Yes. Or look for project files and take corresponding references files.
On Sep 23, 2014 2:17 PM, "Tomasz Heimowski" <notifications@github.com>
wrote:

> In src/Paket/Simplifier.fs:
>
> > +                    then refFiles
> > +                    else refFiles |> List.map (fun (fi, refs) -> fi, refs |> getSimplifiedDeps id |> Seq.toArray)
> > +
> > +    DependenciesFile(depFile.FileName, depFile.Strict, simplifiedDeps, depFile.RemoteFiles), refFiles'
> > +
> > +let Simplify () =
> > +    if not <| File.Exists(Constants.DependenciesFile) then
> > +        failwithf "%s file not found." Constants.DependenciesFile
> > +    let depFile = DependenciesFile.ReadFromFile(Constants.DependenciesFile)
> > +    let lockFilePath = depFile.FindLockfile()
> > +    if not <| File.Exists(lockFilePath.FullName) then
> > +        failwith "lock file not found. Create lock file by running paket install"
> > +    let lockFile = LockFile.LoadFrom lockFilePath.FullName
> > +    let packages = lockFile.ResolvedPackages |> Seq.map (fun kv -> kv.Value) |> List.ofSeq
> > +    let refFiles =
> > +        FindAllFiles(".", "Constants.ReferencesFile")
>
> nope, probably the pattern should be "*paket.references" rather than
> "paket.references" ?
>
> —
> Reply to this email directly or view it on GitHub
> <https://github.com/fsprojects/Paket/pull/152/files#r17904404>.
>