diff --git a/config/routes.yesodroutes b/config/routes.yesodroutes index 86f2549..9413671 100644 --- a/config/routes.yesodroutes +++ b/config/routes.yesodroutes @@ -16,11 +16,8 @@ /check/group/#GroupId/todolist/#TodolistId/#TodolistItemId CheckTodolistItemR POST /edit/group/#GroupId/todolist/#TodolistId EditTodolistItemsR GET POST -/sort/group/#GroupId/todolist/#TodolistId SortTodolistItemsR POST -/trim/group/#GroupId/todolist/#TodolistId TrimTodolistItemsR POST /edit/group/#GroupId EditTodolistR GET POST -/adduser/group/#GroupId AddUserR POST /edit EditGroupR GET POST /delete DeleteGroupR POST diff --git a/src/Handler/TodoEntry.hs b/src/Handler/TodoEntry.hs index 11f7fb2..b49ac60 100644 --- a/src/Handler/TodoEntry.hs +++ b/src/Handler/TodoEntry.hs @@ -12,7 +12,6 @@ module Handler.TodoEntry where import Import import Text.Read import Database.Persist.Sql (rawExecute, fromSqlKey, toSqlKey) -import GHC.RTS.Flags (TraceFlags(user)) -- TODO: move this back to another handler getHomeR :: Handler Html getHomeR = do @@ -72,21 +71,12 @@ getTodolistR groupId = do $maybe token <- mToken