diff --git a/amazonka-core.cabal b/amazonka-core.cabal
--- a/amazonka-core.cabal
+++ b/amazonka-core.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-core
-version:               1.2.0.2
+version:               1.3.0
 synopsis:              Core data types and functionality for Amazonka libraries.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
diff --git a/src/Network/AWS/Data/List1.hs b/src/Network/AWS/Data/List1.hs
--- a/src/Network/AWS/Data/List1.hs
+++ b/src/Network/AWS/Data/List1.hs
@@ -22,6 +22,7 @@
 import           Data.Coerce
 import           Data.Data            (Data, Typeable)
 import           Data.Foldable        (Foldable)
+import qualified Data.Foldable        as Fold
 import           Data.List.NonEmpty   (NonEmpty (..))
 import qualified Data.List.NonEmpty   as NonEmpty
 import           Data.Semigroup
@@ -66,7 +67,7 @@
         go = maybe (fail "Error parsing empty List1 when expecting at least one element.")
                    (pure . List1)
            . NonEmpty.nonEmpty
-           . toList
+           . Fold.toList
 
 instance ToJSON a => ToJSON (List1 a) where
     toJSON = toJSON . toList
diff --git a/src/Network/AWS/Pager.hs b/src/Network/AWS/Pager.hs
--- a/src/Network/AWS/Pager.hs
+++ b/src/Network/AWS/Pager.hs
@@ -39,6 +39,10 @@
 instance AWSTruncated Bool where
     truncated = id
 
+instance AWSTruncated (Maybe Int) where
+    truncated (Just _) = True
+    truncated Nothing  = False
+
 instance AWSTruncated (Maybe Bool) where
     truncated (Just x) = x
     truncated Nothing  = False
