mirror of
https://github.com/jfmengels/elm-review.git
synced 2024-11-29 01:24:35 +03:00
Remove excess filtering
This commit is contained in:
parent
2af4f864cf
commit
5a30c8495d
@ -1173,8 +1173,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