From b98a751748ae939a8522fb77d2b40c9c61253d8c Mon Sep 17 00:00:00 2001 From: Felix Hamann Date: Sat, 9 Feb 2019 21:07:43 +0100 Subject: [PATCH] revert change to course description modal wording --- src/Handler/Course.hs | 2 +- src/Handler/Utils/Table/Cells.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Handler/Course.hs b/src/Handler/Course.hs index 81f69adc1..9a55c4943 100644 --- a/src/Handler/Course.hs +++ b/src/Handler/Course.hs @@ -59,7 +59,7 @@ colCShortDescr = sortable (Just "cshort") (i18nCell MsgCourseShort) [whamlet| $newline never
- ^{modal "Beschreibung anzeigen" (Right $ toWidget descr)} + ^{modal "Beschreibung" (Right $ toWidget descr)} |] ) diff --git a/src/Handler/Utils/Table/Cells.hs b/src/Handler/Utils/Table/Cells.hs index dd95183de..a164e9f96 100644 --- a/src/Handler/Utils/Table/Cells.hs +++ b/src/Handler/Utils/Table/Cells.hs @@ -82,7 +82,7 @@ courseCell Course{..} = anchorCell link name `mappend` desc (Just descr) -> cell [whamlet| $newline never
- ^{modal "Beschreibung anzeigen" (Right $ toWidget descr)} + ^{modal "Beschreibung" (Right $ toWidget descr)} |] sheetCell :: IsDBTable m a => CourseLink -> SheetName -> DBCell m a