diff options
author | Joey Hess <joey@kitenet.net> | 2012-11-05 19:39:08 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-11-05 19:39:08 -0400 |
commit | d61d6e1f8ae90cb5babbe1334bc7fd13c4eb90eb (patch) | |
tree | d8c81de580907c1c09284409f803cfdf56795958 /Command/WebApp.hs | |
parent | b3d1a85c2068d42d5399fa659dc94735664da579 (diff) |
better handling of lifting from XMPP -> Assistant
Diffstat (limited to 'Command/WebApp.hs')
-rw-r--r-- | Command/WebApp.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/WebApp.hs b/Command/WebApp.hs index 26afa2791..43b090fc8 100644 --- a/Command/WebApp.hs +++ b/Command/WebApp.hs @@ -107,7 +107,7 @@ firstRun = do urlrenderer <- newUrlRenderer v <- newEmptyMVar let callback a = Just $ a v - void $ flip runAssistant d $ runNamedThread $ + void $ runAssistant d $ runNamedThread $ webAppThread d urlrenderer True (callback signaler) (callback mainthread) |