diff --git a/src/Handler/PrintCenter.hs b/src/Handler/PrintCenter.hs index ba2b30e87..d384cba73 100644 --- a/src/Handler/PrintCenter.hs +++ b/src/Handler/PrintCenter.hs @@ -203,7 +203,7 @@ mkPJTable = do ] dbtFilter = mconcat [ - single ("pj-name") , FilterColumn . E.mkContainsFilter $ views (to queryPrintJob) (E.^. PrintJobName) + single ("pj-name" , FilterColumn . E.mkContainsFilter $ views (to queryPrintJob) (E.^. PrintJobName)) -- TODO: continue here ] dbtFilterUI = mconcat