diff --git a/src/Handler/PrintCenter.hs b/src/Handler/PrintCenter.hs
index 606e8bfad..9d7cf0cd1 100644
--- a/src/Handler/PrintCenter.hs
+++ b/src/Handler/PrintCenter.hs
@@ -174,7 +174,6 @@ pjTableQuery (printJob `E.LeftOuterJoin` recipient
 
 mkPJTable :: DB (FormResult (PJTableActionData, Set PrintJobId), Widget)
 mkPJTable = do 
-  now <- liftIO getCurrentTime
   currentRoute <- fromMaybe (error "mkPJTable called from 404-handler") <$> liftHandler getCurrentRoute -- albeit we do know the route here
   let 
     dbtSQLQuery = pjTableQuery
@@ -183,11 +182,11 @@ mkPJTable = do
     dbtColonnade = mconcat 
       [ dbSelectIf (applying _2) id (return . view (resultPrintJob . _entityKey)) (\r -> isNothing $ r ^? resultPrintJob . _entityVal . _printJobAcknowledged)
       , sortable (Just "pj-name")         (i18nCell MsgPrintJobName)          $ \(   view $ resultPrintJob  . _entityVal . _printJobName         -> n) -> textCell n
-      , sortable (Just "pj-id")           (i18nCell MsgPrintJobId)            $ \(   view $ resultPrintJob  . _entityKey                         -> k) -> numCell  k
+      , sortable (Just "pj-id")           (i18nCell MsgPrintJobId)            $ \(   view $ resultPrintJob  . _entityKey                         -> k) -> textCell (tshow k)
       , sortable (Just "pj-created")      (i18nCell MsgPrintJobCreated)       $ \(   view $ resultPrintJob  . _entityVal . _printJobCreated      -> t) ->      dateTimeCell t
       , sortable (Just "pj-acknowledged") (i18nCell MsgPrintJobAcknowledged)  $ \(   view $ resultPrintJob  . _entityVal . _printJobAcknowledged -> t) -> maybeDateTimeCell t
-      , sortable (Just "pj-recipient")    (i18nCell MsgPrintRecipient)        $ \(preview $ resultRecipient . _entityVal                         -> u) -> maybeCell u $ cellHasUserLink AdminUserR
-      , sortable (Just "pj-sender")       (i18nCell MsgPrintSender)           $ \(preview $ resultSender    . _entityVal                         -> u) -> maybeCell u $ cellHasUserLink AdminUserR
+      , sortable (Just "pj-recipient")    (i18nCell MsgPrintRecipient)        $ \(preview $ resultRecipient -> u) -> maybeCell u $ cellHasUserLink AdminUserR
+      , sortable (Just "pj-sender")       (i18nCell MsgPrintSender)           $ \(preview $ resultSender -> u) -> maybeCell u $ cellHasUserLink AdminUserR
       , sortable (Just "pj-course")       (i18nCell MsgPrintCourse)           $ \(preview $ resultCourse    . _entityVal                         -> c) -> maybeCell c courseCell
       , sortable (Just "pj-qualification")(i18nCell MsgPrintQualification)    $ \(preview $ resultQualification . _entityVal                     -> q) -> maybeCell q qualificationCell
       ]