Fix pagination showing 2 buttons with 0 available pages (#142)

Author: arthurxavierx

docs/Examples/Pagination.example.purs

@@ -37,6 +37,14 @@ docs = unit # make (createComponent "PaginationExample")
               , details = Just $ R.text "40 results"
               }
 
+        , example
+          $ pagination defaults
+              { currentPage = self.state.currentPage
+              , pages = 0
+              , onChange = self.setState <<< flip _{ currentPage = _ }
+              , details = Just $ R.text "0 results"
+              }
+
         , example
           $ pagination defaults
               { currentPage = self.state.currentPage

src/Lumi/Components/Pagination.purs

@@ -36,7 +36,7 @@ pagination = makeStateless (createComponent "Pagination") render
       let
         boundedPage = clamp 0 (props.pages - 1) props.currentPage
         rangeMin = max 0 (boundedPage - (props.focusWindow / 2))
-        rangeMax = min (props.pages - 1) (boundedPage + (props.focusWindow / 2))
+        rangeMax = max 0 $ min (props.pages - 1) (boundedPage + (props.focusWindow / 2))
 
         prevButton =
           keyed "prev" $ R.li_