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

revert change to course description modal wording

Browse Source
This commit is contained in:
Felix Hamann 2019-02-09 21:07:43 +01:00
parent 6af0ebe400
commit b98a751748
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Course.hs
View File

@ -59,7 +59,7 @@ colCShortDescr = sortable (Just "cshort") (i18nCell MsgCourseShort)
[whamlet| [whamlet|
$newline never $newline never
<div> <div>
^{modal "Beschreibung anzeigen" (Right $ toWidget descr)} ^{modal "Beschreibung" (Right $ toWidget descr)}
|] |]
) )

2
src/Handler/Utils/Table/Cells.hs
View File

@ -82,7 +82,7 @@ courseCell Course{..} = anchorCell link name `mappend` desc
(Just descr) -> cell [whamlet| (Just descr) -> cell [whamlet|
$newline never $newline never
<div> <div>
^{modal "Beschreibung anzeigen" (Right $ toWidget descr)} ^{modal "Beschreibung" (Right $ toWidget descr)}
|] |]
sheetCell :: IsDBTable m a => CourseLink -> SheetName -> DBCell m a sheetCell :: IsDBTable m a => CourseLink -> SheetName -> DBCell m a