Default Filter corrections inactivated, depends on issue #371

This commit is contained in:
Steffen Jost 2019-05-15 09:49:42 +02:00
parent 008db4f56c
commit db915f5736

View File

@ -534,7 +534,7 @@ postCorrectionsR = do
& restrictFilter (\name _ -> name /= "corrector") -- We need to be careful to restrict allowed sorting/filter to not expose sensitive information
& restrictSorting (\name _ -> name /= "corrector")
& defaultSorting [SortAscBy "israted", SortDescBy "ratingTime", SortAscBy "assignedtime" ]
& defaultFilter (Map.fromList [("israted",["no"]), ("sheet-search",["foo"])]) -- this does not work. "no" is the form value that we wanted
-- & defaultFilter (Map.fromList [("israted",[toPathPiece False])]) -- DEPENDS ON ISSUE #371 UNCOMMENT THEN
correctionsR whereClause colonnade filterUI psValidator $ Map.fromList
[ downloadAction
]