fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Minor cleanup

Browse Source
This commit is contained in:
Gregor Kleen 2018-10-08 08:24:13 +02:00
parent 7068b3462e
commit 542ee8bb30
2 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Utils/Templates.hs
View File

@ -14,7 +14,7 @@ modal modalTrigger modalContent = do
let modalDynamic = isLeft modalContent let modalDynamic = isLeft modalContent
modalId <- newIdent modalId <- newIdent
triggerId <- newIdent triggerId <- newIdent
$(widgetFile "widgets/modalWidget") $(widgetFile "widgets/modal")
case modalContent of case modalContent of
Left route -> [whamlet|<a .btn ##{triggerId} href=@{route}>^{modalTrigger}|] Left route -> [whamlet|<a .btn ##{triggerId} href=@{route}>^{modalTrigger}|]
Right content -> [whamlet|<div .btn ##{triggerId}>^{modalTrigger}|] Right content -> [whamlet|<div .btn ##{triggerId}>^{modalTrigger}|]

0
templates/widgets/modalWidget.hamlet → templates/widgets/modal.hamlet
View File