diff --git a/Data/Set/Extra.hs b/Data/Set/Extra.hs
--- a/Data/Set/Extra.hs
+++ b/Data/Set/Extra.hs
@@ -26,6 +26,7 @@
 
 import qualified Control.Monad as List (mapM, mapM_, filterM, foldM)
 import Control.Monad.State ()
+import qualified Data.Foldable as Foldable (all, any, and, or)
 import Data.Map as Map (Map, insertWith, empty)
 import Data.Set as Set
 import Data.Set.ExtraG
@@ -60,7 +61,7 @@
 concatMapM f s = mapM f s >>= return . flatten
 
 any :: Ord a => (a -> Bool) -> Set a -> Bool
-any f s = not . Set.null . Set.filter id . map f $ s
+any = Foldable.any
 
 {-
 anyM :: Monad m => (a -> m (Maybe Bool)) -> Set a -> m (Maybe Bool)
@@ -71,13 +72,13 @@
 -}
 
 all :: Ord a => (a -> Bool) -> Set a -> Bool
-all f s = not . Set.null . Set.filter not . map f $ s
+all = Foldable.all
 
 or :: Set Bool -> Bool
-or = any id
+or = Foldable.or
 
 and :: Set Bool -> Bool
-and = all id
+and = Foldable.and
 
 -- |Create a singleton set containing a singleton set of a.
 ss :: Ord a => a -> Set (Set a)
diff --git a/set-extra.cabal b/set-extra.cabal
--- a/set-extra.cabal
+++ b/set-extra.cabal
@@ -1,5 +1,5 @@
 Name:           set-extra
-Version:        1.3.1
+Version:        1.3.2
 License:        BSD3
 License-File:	COPYING
 Author:         David Fox
@@ -7,7 +7,7 @@
 Description:    Functions that could be added to Data.Set.
 Synopsis:       Functions that could be added to Data.Set.
 Maintainer:     David Fox <dsf@seereason.com>
-Homepage:       http://src.seereason.com/set-extra
+Homepage:       https://github.com/ddssff/set-extra
 ghc-options:	-O2 -Wall
 Exposed-modules: Data.Set.Extra, Data.Set.ExtraG
 Build-Depends: base < 5, containers, mtl, syb