summaryrefslogtreecommitdiff
path: root/Omni/Jr
diff options
context:
space:
mode:
Diffstat (limited to 'Omni/Jr')
-rw-r--r--Omni/Jr/Web.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Omni/Jr/Web.hs b/Omni/Jr/Web.hs
index 6a2d826..2a10cb5 100644
--- a/Omni/Jr/Web.hs
+++ b/Omni/Jr/Web.hs
@@ -3093,7 +3093,7 @@ server =
Just sid -> liftIO (streamAgentEvents tid sid)
taskToUnixTs :: TaskCore.Task -> Int
-taskToUnixTs t = round (utcTimeToPOSIXSeconds (TaskCore.taskUpdatedAt t))
+taskToUnixTs t = ceiling (utcTimeToPOSIXSeconds (TaskCore.taskUpdatedAt t))
getReviewInfo :: Text -> IO ReviewInfo
getReviewInfo tid = do