fix(exam participant download): fix icon not being shown

icon should have worked, but did not. does now
This commit is contained in:
Steffen Jost 2019-07-10 20:47:46 +02:00
parent 99ffd7b6c3
commit a075b1648e
2 changed files with 7 additions and 3 deletions

View File

@ -283,7 +283,7 @@ instance Button UniWorX ButtonCsvMode where
btnLabel BtnCsvExport btnLabel BtnCsvExport
= [whamlet| = [whamlet|
$newline never $newline never
#{fontAwesomeIcon "file-csv"} #{iconCSV}
\ _{BtnCsvExport} \ _{BtnCsvExport}
|] |]
btnLabel BtnCsvImport btnLabel BtnCsvImport

View File

@ -166,6 +166,10 @@ fileDownload = fontAwesomeIcon "file-download"
zipDownload :: Markup zipDownload :: Markup
zipDownload = fontAwesomeIcon "file-archive" zipDownload = fontAwesomeIcon "file-archive"
iconCSV :: Markup
iconCSV = fontAwesomeIcon "file-csv"
-- Conditional icons -- Conditional icons
isVisible :: Bool -> Markup isVisible :: Bool -> Markup