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

made navbar work

Browse source 
also added an About page and a stub Config page.
This commit is contained in:
Joey Hess 2012-07-31 02:30:26 -04:00
parent 5fed026bcd
commit 2c8bbdf307
10 changed files with 89 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Assistant/WebApp/Configurators.hs
View file

@ -44,13 +44,12 @@ introDisplay ident = do
counter = map show ([1..] :: [Int])
getConfigR :: Handler RepHtml
getConfigR = defaultLayout $ do
getConfigR = bootstrap (Just Config) $ do
sideBarDisplay
setTitle "Configuration"
[whamlet|<a href="@{HomeR}">main|]
$(widgetFile "configurators/main")
getAddRepositoryR :: Handler RepHtml
getAddRepositoryR = defaultLayout $ do
getAddRepositoryR = bootstrap (Just Config) $ do
sideBarDisplay
setTitle "Add repository"
[whamlet|<a href="@{HomeR}">main|]