getArticleIdList :: From -> Size -> OrderBy -> MySQL [ID]
getArticleIdList from size o prefix conn = map fromOnly <$> query conn sql (from, size)
  where sql = fromString $ concat [ "SELECT `id` FROM `", prefix, "_articles` ", show o, " LIMIT ?,?" ]
getArticleIdList :: From -> Size -> OrderBy -> MySQL [ID]
getArticleIdList from size o prefix conn = map fromOnly <$> query conn sql (from, size)
  where sql = fromString $ concat [ "SELECT `id` FROM `", prefix, "_articles` ", show o, " LIMIT ?,?" ]
getArticleIdList from size o prefix conn = map fromOnly <$> query conn sql (from, size)
  where sql = fromString $ concat [ "SELECT `id` FROM `", prefix, "_articles` ", show o, " LIMIT ?,?" ]