settei-preflight-0.3.0.0: test/Main.hs

module Main (main) where

import Settei.Preflight.Fixture (fixtureMain)
import Settei.Preflight.RequestTest qualified as Request
import Settei.PreflightTest (tests)
import System.Environment (lookupEnv)
import Test.Tasty (defaultMain, testGroup)

main :: IO ()
main = do
  fixture <- lookupEnv "SETTEI_PREFLIGHT_FIXTURE"
  case fixture of Just _ -> fixtureMain; Nothing -> defaultMain (testGroup "preflight" [tests, Request.tests])