Permalink
Browse files

ignore disabled feeds - closes fsprojects#719

  • Loading branch information...
theimowski committed Mar 24, 2015
1 parent 9f734b5 commit 61bf6e5009fcd535d3d403ab82aa14887719ae33
Showing with 9 additions and 0 deletions.
  1. +9 −0 src/Paket.Core/NugetConvert.fs
@@ -106,10 +106,19 @@ type NugetConfig =
|> optGetNode (XmlConvert.EncodeLocalName key)
|> Option.bind getAuth'
let disabledSources =
configNode |> getNode "disabledPackageSources"
|> Option.toList
|> List.collect getKeyValueList
|> List.filter (fun (_,disabled) -> disabled.Equals("true", StringComparison.OrdinalIgnoreCase))
|> List.map fst
|> Set.ofList
let sources =
configNode |> getNode "packageSources"
|> Option.toList
|> List.collect getKeyValueList
|> List.filter (fun (key,_) -> Set.contains key disabledSources |> not)
|> List.map (fun (key,value) -> value, getAuth key)
{ PackageSources = if clearSources then sources else nugetConfig.PackageSources @ sources

2 comments on commit 61bf6e5

@colinbull

This comment has been minimized.

Show comment
Hide comment
@colinbull

colinbull Mar 24, 2015

LOL! Beat me to it..

colinbull replied Mar 24, 2015

LOL! Beat me to it..

@theimowski

This comment has been minimized.

Show comment
Hide comment
@theimowski

theimowski Mar 24, 2015

Owner

;) sorry!

Owner

theimowski replied Mar 24, 2015

;) sorry!

Please sign in to comment.