reorg templates
This commit is contained in:
parent
52f8ec3dc7
commit
48d9a3182f
4 changed files with 3 additions and 3 deletions
|
@ -32,10 +32,10 @@ getConfigurationR = ifM (inFirstRun)
|
||||||
getAddRepositoryR :: Handler RepHtml
|
getAddRepositoryR :: Handler RepHtml
|
||||||
getAddRepositoryR = page "Add Repository" (Just Configuration) $ do
|
getAddRepositoryR = page "Add Repository" (Just Configuration) $ do
|
||||||
let repolist = repoListDisplay mainRepoSelector
|
let repolist = repoListDisplay mainRepoSelector
|
||||||
$(widgetFile "configurators/repositories")
|
$(widgetFile "configurators/addrepository")
|
||||||
|
|
||||||
makeMiscRepositories :: Widget
|
makeMiscRepositories :: Widget
|
||||||
makeMiscRepositories = $(widgetFile "configurators/repositories/misc")
|
makeMiscRepositories = $(widgetFile "configurators/addrepository/misc")
|
||||||
|
|
||||||
makeCloudRepositories :: Bool -> Widget
|
makeCloudRepositories :: Bool -> Widget
|
||||||
makeCloudRepositories onlyTransfer = $(widgetFile "configurators/repositories/cloud")
|
makeCloudRepositories onlyTransfer = $(widgetFile "configurators/addrepository/cloud")
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue