Add Review.Test.expectGlobalErrors function

src/Review/Test.elm

@@ -1,6 +1,7 @@
 module Review.Test exposing
     ( ReviewResult, run, runWithProjectData, runOnModules, runOnModulesWithProjectData
     , ExpectedError, expectNoErrors, expectErrors, error, atExactly, whenFixed, expectErrorsForModules, expectErrorsForElmJson, expectErrorsForReadme
+    , expectGlobalErrors
     )
 
 {-| Module that helps you test your rules, using [`elm-test`](https://package.elm-lang.org/packages/elm-explorations/test/latest/).
@@ -668,7 +669,7 @@ expectErrorsForModules expectedErrorsList reviewResult =
                 maybeUnknownModule =
                     Set.diff
                         (expectedErrorsList |> List.map Tuple.first |> Set.fromList)
-                        (runResults |> List.map .moduleName |> Set.fromList)
+                        (Set.fromList ("GLOBAL ERROR" :: List.map .moduleName runResults))
                         |> Set.toList
                         |> List.head
             in
@@ -731,6 +732,11 @@ expectErrorsForElmJson expectedErrors reviewResult =
     expectErrorsForModules [ ( "elm.json", expectedErrors ) ] reviewResult
 
 
+expectGlobalErrors : List ExpectedError -> ReviewResult -> Expectation
+expectGlobalErrors expectedErrors reviewResult =
+    expectErrorsForModules [ ( "GLOBAL ERROR", expectedErrors ) ] reviewResult
+
+
 {-| Assert that the rule reported some errors for the `README.md` file, by specifying which ones.
 
     test "report an error when a module is unused" <|

tests/NoUnsafeRegexFromLiteralTest.elm

@@ -165,7 +165,7 @@ import SomeModule.Regex
 a = SomeModule.Regex.fromLiteralFunc "^abc$"
 """
                     |> Review.Test.runWithProjectData project (rule configuration)
-                    |> Review.Test.expectErrorsForElmJson
+                    |> Review.Test.expectGlobalErrors
                         [ Review.Test.error
                             { message = "Could not find SomeModule.Regex"
                             , details =