diff --git a/routes b/routes index ebd3e5973..99f6f5add 100644 --- a/routes +++ b/routes @@ -73,8 +73,8 @@ /subs CCorrectionsR GET POST /ex SheetListR GET !registered !materials !corrector !/ex/new SheetNewR GET POST - !/ex/current SheetCurrentR GET !free -- just a redirect - !/ex/lastinactive SheetOldUnassigned GET !free -- just a redirect + !/ex/current SheetCurrentR GET !registered !materials !corrector + !/ex/unassigned SheetOldUnassigned GET /ex/#SheetName SheetR: /show SShowR GET !timeANDregistered !timeANDmaterials !corrector /edit SEditR GET POST diff --git a/src/Foundation.hs b/src/Foundation.hs index 4840003f7..a01f6744f 100644 --- a/src/Foundation.hs +++ b/src/Foundation.hs @@ -1298,7 +1298,6 @@ pageActions (CourseR tid ssh csh SheetListR) = , menuItemRoute = SomeRoute $ CourseR tid ssh csh SheetOldUnassigned , menuItemModal = False , menuItemAccessCallback' = runDB . maybeT (return False) $ do - guardM $ (== Authorized) <$> evalAccessCorrector tid ssh csh void . MaybeT $ sheetOldUnassigned tid ssh csh return True }