From 2e9320886fda78b18ab753680166720791da478a Mon Sep 17 00:00:00 2001
From: SJost <jost@tcs.ifi.lmu.de>
Date: Wed, 30 Jan 2019 11:27:41 +0100
Subject: [PATCH] Minor bugfix sheetCurrent

---
 src/Utils/Sheet.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Utils/Sheet.hs b/src/Utils/Sheet.hs
index ab6fa1bae..6525c7abb 100644
--- a/src/Utils/Sheet.hs
+++ b/src/Utils/Sheet.hs
@@ -16,7 +16,7 @@ sheetCurrent tid ssh csh = do
         E.&&. course E.^. CourseTerm      E.==. E.val tid
         E.&&. course E.^. CourseSchool    E.==. E.val ssh
         E.&&. course E.^. CourseShorthand E.==. E.val csh
-    E.orderBy [E.asc $ sheet E.^. SheetActiveFrom]
+    E.orderBy [E.asc $ sheet E.^. SheetActiveTo]
     E.limit 1
     return $ sheet E.^. SheetName
   return $ case sheets of