buildEnv :: Region -> IO Env
buildEnv r = do
    lgr <- newLogger Error stdout
    newEnv Discover <&> set envLogger lgr . set envRegion r <&>
        set
            envRetryCheck
            (\_ _ ->
                  True)
buildEnv :: Region -> IO Env
buildEnv r = do
    lgr <- newLogger Error stdout
    newEnv Discover <&> set envLogger lgr . set envRegion r <&>
        set
            envRetryCheck
            (\_ _ ->
                  True)
buildEnv r = do
    lgr <- newLogger Error stdout
    newEnv Discover <&> set envLogger lgr . set envRegion r <&>
        set
            envRetryCheck
            (\_ _ ->
                  True)