mirror of
https://github.com/jfmengels/elm-review.git
synced 2024-09-11 16:16:09 +03:00
Remove excess filtering
This commit is contained in:
parent
a64f4fe18d
commit
7460c22e1a
@ -1177,8 +1177,8 @@ compactProjectDataVisitors getData maybeVisitor =
|
||||
compactArbitraryFilesVisitor : Maybe ( List { a | path : String } -> moduleContext -> moduleContext, List String ) -> Maybe (List { a | path : String } -> moduleContext -> ( List nothing, moduleContext ))
|
||||
compactArbitraryFilesVisitor maybeArbitraryFilesVisitor =
|
||||
case maybeArbitraryFilesVisitor of
|
||||
Just ( arbitraryFilesVisitor, requestedFiles ) ->
|
||||
Just (\files moduleContext -> ( [], arbitraryFilesVisitor (List.filter (globMatch requestedFiles) files) moduleContext ))
|
||||
Just ( arbitraryFilesVisitor, _ ) ->
|
||||
Just (\files moduleContext -> ( [], arbitraryFilesVisitor files moduleContext ))
|
||||
|
||||
Nothing ->
|
||||
Nothing
|
||||
|
Loading…
Reference in New Issue
Block a user