mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

redirect to /dashboard

Browse source
This commit is contained in:
Joey Hess 2013-12-09 17:24:53 -04:00
parent 0544818e59
commit 6f8693c59a
2 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
Assistant/WebApp/DashBoard.hs
View file

@ -83,9 +83,12 @@ getDashboardR = ifM inFirstRun
, page "" (Just DashBoard) $ dashboard True
)
getMainR :: Handler Html
getMainR = redirect DashboardR
{- Used to test if the webapp is running. -}
headDashboardR :: Handler ()
headDashboardR = noop
headMainR :: Handler ()
headMainR = noop
{- Same as DashboardR, except no autorefresh at all (and no noscript warning). -}
getNoScriptR :: Handler Html

4
Assistant/WebApp/routes
View file

@ -1,5 +1,5 @@
/ DashboardR GET HEAD
/dashboard DashboardR GET HEAD
/ MainR GET HEAD
/dashboard DashboardR GET
/noscript NoScriptR GET
/noscript/auto NoScriptAutoR GET