Merge pull request #2030 from vbfox/glob_frombasedir

Suggestion: a way to start globbing from a specific basedir
fsprojects · Jul 29, 2018 · e113e64 · e113e64
2 parents c130303 + 8e7fafc
commit e113e64
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/src/app/Fake.IO.FileSystem/GlobbingFileSystem.fs b/src/app/Fake.IO.FileSystem/GlobbingFileSystem.fs
@@ -127,6 +127,12 @@ module GlobbingPattern =
           Includes = [ x ]
           Excludes = [] } :> IGlobbingPattern
 
+    /// Start an empty globbing pattern from the specified directory
+    let createFrom (dir : string) =
+        { BaseDirectory = dir
+          Includes = []
+          Excludes = [] } :> IGlobbingPattern
+
     /// Sets a directory as baseDirectory for fileIncludes. 
     let setBaseDir (dir : string) (fileIncludes : IGlobbingPattern) = fileIncludes.SetBaseDirectory dir