fix test errors

fsprojects · Jun 13, 2017 · 120d645 · 120d645
1 parent 83f73a8
commit 120d645
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/Paket.Core/PaketConfigFiles/ProjectFile.fs b/src/Paket.Core/PaketConfigFiles/ProjectFile.fs
@@ -159,9 +159,11 @@ type ProjectFile =
 
 [<CompilationRepresentation(CompilationRepresentationFlags.ModuleSuffix)>]
 module ProjectFile =
+    let supportedEndings = [ ".csproj"; ".fsproj"; ".vbproj"; ".wixproj"; ".nproj"; ".vcxproj"]
 
     let isSupportedFile (fi:FileInfo) =
-        fi.Extension = ".csproj" || fi.Extension = ".fsproj" || fi.Extension = ".vbproj" || fi.Extension = ".wixproj" || fi.Extension = ".nproj" || fi.Extension = ".vcxproj"
+        supportedEndings
+        |> List.exists (fun e -> fi.Extension.Contains e)
 
     let name (projectFile:ProjectFile) = FileInfo(projectFile.FileName).Name