From df28d9de4e6c7986bcf5db53a9c1a0b5bfbe752d Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <sarah.vaupel@ifi.lmu.de>
Date: Thu, 15 Dec 2022 19:11:47 +0100
Subject: [PATCH] chore: reintroduce warnings as errors

---
 package.yaml               | 7 +++++--
 src/Handler/Course/List.hs | 1 -
 2 files changed, 5 insertions(+), 3 deletions(-)

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