Skip to content

Commit

Permalink
Restyled by fourmolu
Browse files Browse the repository at this point in the history
  • Loading branch information
restyled-commits authored and pbrisbin committed Apr 5, 2024
1 parent d25776a commit 9607f20
Showing 1 changed file with 8 additions and 4 deletions.
12 changes: 8 additions & 4 deletions tests/Blammo/Logging/LogSettings/EnvSpec.hs
Original file line number Diff line number Diff line change
Expand Up @@ -34,10 +34,14 @@ spec = do
getLogSettingsConcurrency settings `shouldBe` Nothing

it "Respects explicit LOG_CONCURRENCY" $ do
settingsTTY1 <- parseLogSettings [("LOG_CONCURRENCY", "2"), ("LOG_FORMAT", "tty")]
settingsTTY2 <- parseLogSettings [("LOG_FORMAT", "tty"), ("LOG_CONCURRENCY", "3")]
settingsJSON1 <- parseLogSettings [("LOG_FORMAT", "json"), ("LOG_CONCURRENCY", "4")]
settingsJSON2 <- parseLogSettings [("LOG_CONCURRENCY", "5"), ("LOG_FORMAT", "json")]
settingsTTY1 <-
parseLogSettings [("LOG_CONCURRENCY", "2"), ("LOG_FORMAT", "tty")]
settingsTTY2 <-
parseLogSettings [("LOG_FORMAT", "tty"), ("LOG_CONCURRENCY", "3")]
settingsJSON1 <-
parseLogSettings [("LOG_FORMAT", "json"), ("LOG_CONCURRENCY", "4")]
settingsJSON2 <-
parseLogSettings [("LOG_CONCURRENCY", "5"), ("LOG_FORMAT", "json")]

getLogSettingsConcurrency settingsTTY1 `shouldBe` Just 2
getLogSettingsConcurrency settingsTTY2 `shouldBe` Just 3
Expand Down

0 comments on commit 9607f20

Please sign in to comment.