return $ A.object [ "result" .= map JSONWrapper result, "totalCount" .= (T.pack $ (\(Database.Esqueleto.Value v) -> show v) (head count)) ]