From f0b20a1b263a072a9811ff677f25e6518d314133 Mon Sep 17 00:00:00 2001
From: Steffen Jost <jost@tcs.ifi.lmu.de>
Date: Mon, 13 Feb 2023 12:56:56 +0100
Subject: [PATCH] fix(print): disable default filter for print acknowledged

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

diff --git a/src/Handler/PrintCenter.hs b/src/Handler/PrintCenter.hs
index 29e7a89a2..fd64b55a7 100644
--- a/src/Handler/PrintCenter.hs
+++ b/src/Handler/PrintCenter.hs
@@ -280,7 +280,7 @@ mkPJTable = do
         let jobSet = Map.keysSet . Map.filter id $ getDBFormResult (const False) jobMap
         return (act, jobSet)
     psValidator = def & defaultSorting [SortAscBy "created"]
-                      & defaultFilter (singletonMap "acknowledged" [toPathPiece False])
+                      -- & defaultFilter (singletonMap "acknowledged" [toPathPiece False]) -- TODO: interferes with sorting!
   over _1 postprocess <$> dbTable psValidator DBTable{..}
 
 getPrintCenterR,  postPrintCenterR :: Handler Html