diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-07-26 05:20:52 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-07-26 05:20:52 -0400 |
| commit | b89b8015677febfb905bf1fd50546dc981d83ded (patch) | |
| tree | f7a2e773081745d8ed5eec6f1eecd1a55ac020cd | |
| parent | 6cecc26206c4a539999b04664136c6f785211a41 (diff) | |
update
| -rw-r--r-- | Assistant/Threads/WebApp.hs | 6 | ||||
| -rw-r--r-- | doc/design/assistant/webapp.mdwn | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/Assistant/Threads/WebApp.hs b/Assistant/Threads/WebApp.hs index 50add3735..3e53828af 100644 --- a/Assistant/Threads/WebApp.hs +++ b/Assistant/Threads/WebApp.hs @@ -38,9 +38,9 @@ data WebApp = WebApp staticFiles "static" mkYesod "WebApp" [parseRoutes| -/static StaticR Static getStatic / HomeR GET /config ConfigR GET +/static StaticR Static getStatic |] instance Yesod WebApp where @@ -62,12 +62,12 @@ instance Yesod WebApp where getHomeR :: Handler RepHtml getHomeR = defaultLayout $ do - [whamlet|Hello, World<p><a href=@{ConfigR}>config|] + [whamlet|Hello, World<p><a href="@{ConfigR}">config|] getConfigR :: Handler RepHtml getConfigR = defaultLayout $ do setTitle "configuration" - [whamlet|<a href=@{HomeR}>main|] + [whamlet|<a href="@{HomeR}">main|] webAppThread :: ThreadState -> DaemonStatusHandle -> IO () webAppThread st dstatus = do diff --git a/doc/design/assistant/webapp.mdwn b/doc/design/assistant/webapp.mdwn index cec766c57..0f6051d6d 100644 --- a/doc/design/assistant/webapp.mdwn +++ b/doc/design/assistant/webapp.mdwn @@ -4,7 +4,7 @@ The webapp is a web server that displays a shiny interface. * Listen only to localhost. **done** * Instruct the user's web browser to open an url that contains a secret - token. This guards against other users on the same system. + token. This guards against other users on the same system. **done** * I would like to avoid passwords or other authentication methods, it's your local system. * Alternative for Linux at least would be to write a small program using |