Revision e455a3e8 test/hs/Test/Ganeti/Luxi.hs
b/test/hs/Test/Ganeti/Luxi.hs | ||
---|---|---|
126 | 126 |
-- we need to create the server first, otherwise (if we do it in the |
127 | 127 |
-- forked thread) the client could try to connect to it before it's |
128 | 128 |
-- ready |
129 |
server <- run $ Luxi.getServer fpath |
|
129 |
server <- run $ Luxi.getServer False fpath
|
|
130 | 130 |
-- fork the server responder |
131 | 131 |
_ <- run . forkIO $ |
132 | 132 |
bracket |
Also available in: Unified diff