yesod-pagination 1.0.0.0 → 1.1.0.0
raw patch · 2 files changed
+5/−2 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- src/Yesod/Paginate.hs +4/−1
- yesod-pagination.cabal +1/−1
src/Yesod/Paginate.hs view
@@ -66,11 +66,14 @@ sel u let route = pageRoute c . fromIntegral+ pp | cp == 1 = Nothing+ | cp == 2 = Just (firstPageRoute c)+ | otherwise = Just (route $ cp - 1) return Page { pageResults = take (fromIntegral $ pageSize c) es , firstPage = if cp >= 2 then Just (firstPageRoute c) else Nothing , nextPage = if fromIntegral (length es) == pageSize c + 1 then Just (route $ cp + 1) else Nothing- , previousPage = if cp == 1 then Nothing else Just (route $ cp - 1)+ , previousPage = pp }
yesod-pagination.cabal view
@@ -1,5 +1,5 @@ name: yesod-pagination-version: 1.0.0.0+version: 1.1.0.0 synopsis: Pagination in Yesod description: Easy pagination for Yesod. homepage: https://github.com/joelteon/yesod-pagination