diff --git a/src/Foundation.hs b/src/Foundation.hs index 6d226e578..179789442 100644 --- a/src/Foundation.hs +++ b/src/Foundation.hs @@ -1248,7 +1248,7 @@ pageActions (CourseR tid ssh csh CShowR) = 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 case sheets of