reorg templates
This commit is contained in:
parent
58dfa3fa5b
commit
5fed026bcd
11 changed files with 8 additions and 8 deletions
|
@ -34,7 +34,7 @@ sideBarDisplay = do
|
|||
mapM_ renderalert $
|
||||
take displayAlerts $ reverse $ sortAlertPairs alertpairs
|
||||
let ident = "sidebar"
|
||||
$(widgetFile "sidebar")
|
||||
$(widgetFile "sidebar/main")
|
||||
autoUpdate ident NotifierSideBarR (10 :: Int) (10 :: Int)
|
||||
where
|
||||
bootstrapclass Activity = "alert-info"
|
||||
|
@ -60,7 +60,7 @@ sideBarDisplay = do
|
|||
addalert i closable block divclass heading widget = do
|
||||
let alertid = show i
|
||||
let closealert = CloseAlert i
|
||||
$(widgetFile "alert")
|
||||
$(widgetFile "sidebar/alert")
|
||||
|
||||
{- Called by client to get a sidebar display.
|
||||
-
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue