mirror of
https://github.com/ilyakooo0/reflex-dom.git
synced 2024-09-11 06:35:30 +03:00
Merge branch 'develop' into MonadAtomicRef-UnrunnableT
This commit is contained in:
commit
441f6e245f
@ -1,5 +1,5 @@
|
||||
Name: chrome-test-utils
|
||||
Version: 0.4
|
||||
Version: 0.5
|
||||
Synopsis: Utilities to write headless Chromium tests
|
||||
License: BSD3
|
||||
License-file: LICENSE
|
||||
|
@ -4,8 +4,8 @@ import System.Linux.Namespaces
|
||||
import System.Posix
|
||||
import System.Process
|
||||
|
||||
unshareNetork :: IO ()
|
||||
unshareNetork = do
|
||||
unshareNetwork :: IO ()
|
||||
unshareNetwork = do
|
||||
uid <- getEffectiveUserID
|
||||
unshare [User, Network]
|
||||
writeUserMappings Nothing [UserMapping 0 uid 1]
|
||||
|
@ -47,7 +47,7 @@ failureLimit = 0
|
||||
|
||||
main :: IO ()
|
||||
main = do
|
||||
handle (\(_ :: IOError) -> return ()) $ unshareNetork -- If we run into an exception with sandboxing, just don't bother
|
||||
handle (\(_ :: IOError) -> return ()) $ unshareNetwork -- If we run into an exception with sandboxing, just don't bother
|
||||
withSandboxedChromeFlags True $ \chromeFlags -> do
|
||||
mainThread <- myThreadId
|
||||
browserProcess <- spawnCommand $ mconcat
|
||||
|
@ -137,7 +137,7 @@ deriving instance MonadFail WD
|
||||
|
||||
main :: IO ()
|
||||
main = do
|
||||
unshareNetork
|
||||
unshareNetwork
|
||||
isHeadless <- (== Nothing) <$> lookupEnv "NO_HEADLESS"
|
||||
withSandboxedChromeFlags isHeadless $ \chromeFlags -> do
|
||||
withSeleniumServer $ \selenium -> do
|
||||
|
Loading…
Reference in New Issue
Block a user