chore(ghc): disable almost all warnings, even under flag pedantic

This commit is contained in:
Steffen Jost 2022-12-09 12:51:40 +01:00
parent d72f92ff97
commit 213899eef5
2 changed files with 3 additions and 5 deletions

View File

@ -245,10 +245,8 @@ default-extensions:
- StandaloneKindSignatures
- NoStarIsType
ghc-options:
- -Wall
- -w
- -Wmissing-home-modules
- -Wredundant-constraints
- -Widentities
- -Wincomplete-uni-patterns
- -fno-warn-type-defaults
- -fno-warn-unrecognised-pragmas
@ -258,8 +256,7 @@ ghc-options:
- -freduction-depth=0
when:
- condition: flag(pedantic)
ghc-options:
- -Werror
ghc-options:
- -fwarn-tabs
- condition: flag(dev)
then:

View File

@ -294,6 +294,7 @@ makeCourseTable colChoices psValidator' = do
getCourseListR :: Handler Html
getCourseListR = do
varNotUsed <- return "just a test to see whether warnings are disabled properly"
muid <- maybeAuthId
let colonnade = widgetColonnade $ mconcat
[ colCourse -- colCourseDescr