diff --git a/package.yaml b/package.yaml index 456b436a3..ed307feb6 100644 --- a/package.yaml +++ b/package.yaml @@ -245,8 +245,10 @@ default-extensions: - StandaloneKindSignatures - NoStarIsType ghc-options: - - -w + - -Wall - -Wmissing-home-modules + - -Wredundant-constraints + - -Widentities - -Wincomplete-uni-patterns - -fno-warn-type-defaults - -fno-warn-unrecognised-pragmas @@ -256,7 +258,8 @@ ghc-options: - -freduction-depth=0 when: - condition: flag(pedantic) - ghc-options: + ghc-options: + - -Werror - -fwarn-tabs - condition: flag(dev) then: diff --git a/src/Handler/Course/List.hs b/src/Handler/Course/List.hs index 0215d0dbf..f6c63d741 100644 --- a/src/Handler/Course/List.hs +++ b/src/Handler/Course/List.hs @@ -215,7 +215,6 @@ makeCourseTable colChoices psValidator' = do getCourseListR :: Handler Html getCourseListR = do - let varNotUsed = "just a test to see whether warnings are disabled properly" muid <- maybeAuthId let colonnade = widgetColonnade $ mconcat [ colCourse -- colCourseDescr