ENH add test
This commit is contained in:
parent
504c719bdd
commit
761653265d
|
@ -143,6 +143,8 @@ evalConf db@DBusState { dbSysClient = cl } = do
|
|||
tt <- evalAlways $ fsTabbedTheme fs
|
||||
io $ putStrLn "tabbed theme started"
|
||||
io $ hFlush stdout
|
||||
-- uninstallSignalHandlers
|
||||
-- io $ print =<< readCreateProcessWithExitCode (proc "echo" ["hi"]) ""
|
||||
startDBusInterfaces fs
|
||||
io $ putStrLn "dbus started"
|
||||
io $ hFlush stdout
|
||||
|
|
Loading…
Reference in New Issue