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

icon should have worked, but did not. does now
2019-07-10 20:47:46 +02:00 · 2019-07-10 20:47:46 +02:00 · a075b1648e
commit a075b1648e
parent 99ffd7b6c3
2 changed files with 7 additions and 3 deletions
--- a/src/Handler/Utils/Table/Pagination.hs
+++ b/src/Handler/Utils/Table/Pagination.hs
@ -283,7 +283,7 @@ instance Button UniWorX ButtonCsvMode where
  btnLabel BtnCsvExport
    = [whamlet|
        $newline never
-        #{fontAwesomeIcon "file-csv"}
+        #{iconCSV}
        \ _{BtnCsvExport}
      |]
  btnLabel BtnCsvImport
--- a/src/Utils.hs
+++ b/src/Utils.hs
@ -166,6 +166,10 @@ fileDownload = fontAwesomeIcon "file-download"
 zipDownload :: Markup
 zipDownload = fontAwesomeIcon "file-archive"

+iconCSV :: Markup
+iconCSV = fontAwesomeIcon "file-csv"
+
+
 -- Conditional icons

 isVisible :: Bool -> Markup