diff --git a/src/Handler/Utils/Table/Pagination.hs b/src/Handler/Utils/Table/Pagination.hs
index 88e08be1f..15a2952f5 100644
--- a/src/Handler/Utils/Table/Pagination.hs
+++ b/src/Handler/Utils/Table/Pagination.hs
@@ -962,7 +962,8 @@ dbSelect :: forall x h r i a. (Headedness h, Ord i, PathPiece i, Monoid' x)
          -> Setter' a Bool
          -> (DBRow r -> MForm (HandlerT UniWorX IO) i)
          -> Colonnade h (DBRow r) (DBCell (MForm (HandlerT UniWorX IO)) x)
-dbSelect resLens selLens genIndex = Colonnade.singleton (headednessPure $ i18nCell MsgSelectColumn) $ formCell resLens genIndex genForm
+-- dbSelect resLens selLens genIndex = Colonnade.singleton (headednessPure $ i18nCell MsgSelectColumn) $ formCell resLens genIndex genForm
+dbSelect resLens selLens genIndex = Colonnade.singleton (headednessPure $ mempty) $ formCell resLens genIndex genForm
   where
     genForm _ mkUnique = do
       (selResult, selWidget) <- mreq checkBoxField (fsUniq mkUnique "select") (Just False)