diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-08-01 16:10:26 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-08-01 16:10:26 -0400 |
| commit | ecc168aba30a0477381bcd2037c8d301368f3449 (patch) | |
| tree | 13efe09744264cea284f87a0179a6b6023f987d6 /Assistant/WebApp.hs | |
| parent | 1efe4f3332680be5ad9d5d496939d6757fbd2b0a (diff) | |
implemented firstrun repository creation and redirection to full webapp
Some of the trickiest code I've possibly ever written.
Diffstat (limited to 'Assistant/WebApp.hs')
| -rw-r--r-- | Assistant/WebApp.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Assistant/WebApp.hs b/Assistant/WebApp.hs index c2a021246..1b767c642 100644 --- a/Assistant/WebApp.hs +++ b/Assistant/WebApp.hs @@ -37,6 +37,7 @@ data WebApp = WebApp , relDir :: Maybe FilePath , getStatic :: Static , webAppState :: TMVar WebAppState + , postFirstRun :: Maybe (IO String) } data NavBarItem = DashBoard | Config | About |