Oops, correcting cut-and-paste error:

Documentation for foldMapDefault:

-- This function should be equivalent to `foldMap` in
-- the `Foldable` superclass instance. If you do not
-- already have a `Foldable` instance, you
-- can use this function to define one:
--
-- > instance Foldable T where
-- >   foldMap = foldMapDefault