diff --git a/src/Handler/Utils/Exam.hs b/src/Handler/Utils/Exam.hs
index 28c3b2403..4eab1eb0b 100644
--- a/src/Handler/Utils/Exam.hs
+++ b/src/Handler/Utils/Exam.hs
@@ -48,7 +48,7 @@ import Data.List (findIndex, unfoldr)
 import qualified Data.List as List
 
 import Data.ExtendedReal
-import Data.Ratio (Ratio())
+import Data.Ratio (Ratio)
 
 import qualified Data.RFC5051 as RFC5051