Fixed bad query

This commit is contained in:
iko 2020-02-25 19:12:12 +03:00
parent 2de68b5e53
commit 15bbe146fd

View File

@ -112,7 +112,9 @@ pickTasksQuery tasks limitCount = do
( from (table #tasks)
& where_ (#task `in_` (literal <$> tasks))
& where_ (not_ . notNull $ #started)
& orderBy [#creation_time & Asc]
& limit limitCount
& orderBy [#creation_time & Desc]
)
startedMan :: Manipulation_ Schema (String, Jsonb Value) ()
startedMan =