diff --git a/CHANGELOG.txt b/CHANGELOG.txt
--- a/CHANGELOG.txt
+++ b/CHANGELOG.txt
@@ -1,3 +1,7 @@
+0.7.11, 2016-08-08:
+	Got rid of tests/Utils.hs to fix test compilation on case-insensitive
+	filesystems (tests/Utils.hs vs tests/Tests/Utils.hs).
+
 0.7.10, 2016-07-18:
 	Update dependencies to allow dlist-0.8.
 
diff --git a/Glob.cabal b/Glob.cabal
--- a/Glob.cabal
+++ b/Glob.cabal
@@ -1,7 +1,7 @@
 Cabal-Version: >= 1.9.2
 
 Name:        Glob
-Version:     0.7.10
+Version:     0.7.11
 Homepage:    http://iki.fi/matti.niemenmaa/glob/
 Synopsis:    Globbing library
 Category:    System
@@ -85,4 +85,3 @@
                   Tests.Regression
                   Tests.Simplifier
                   Tests.Utils
-                  Utils
diff --git a/tests/Tests/Base.hs b/tests/Tests/Base.hs
--- a/tests/Tests/Base.hs
+++ b/tests/Tests/Base.hs
@@ -1,7 +1,7 @@
 -- File created: 2008-10-10 22:03:00
 
 module Tests.Base ( PString(unPS), Path(unP), COpts(unCOpts)
-                  , fromRight, isRight
+                  , (-->), fromRight, isRight
                   ) where
 
 import System.FilePath (extSeparator, pathSeparators)
@@ -9,8 +9,6 @@
 
 import System.FilePath.Glob.Base (CompOptions(..))
 
-import Utils (fromRight, isRight)
-
 newtype PString = PatString { unPS    :: String } deriving Show
 newtype Path    = Path      { unP     :: String } deriving Show
 newtype COpts   = COpts     { unCOpts :: CompOptions } deriving Show
@@ -72,3 +70,11 @@
       , maybe "" show (b :: Maybe Int)
       , ">"
       ]
+
+fromRight (Right x) = x
+fromRight _         = error "fromRight :: Left"
+
+isRight (Right _) = True
+isRight _         = False
+
+a --> b = not a || b
diff --git a/tests/Tests/Utils.hs b/tests/Tests/Utils.hs
--- a/tests/Tests/Utils.hs
+++ b/tests/Tests/Utils.hs
@@ -9,7 +9,7 @@
 
 import System.FilePath.Glob.Utils
 
-import Utils
+import Tests.Base ((-->))
 
 tests = testGroup "Utils"
    [ testProperty "overlapperLosesNoInfo" prop_overlapperLosesNoInfo
diff --git a/tests/Utils.hs b/tests/Utils.hs
deleted file mode 100644
--- a/tests/Utils.hs
+++ /dev/null
@@ -1,11 +0,0 @@
--- File created: 2008-10-15 20:50:31
-
-module Utils where
-
-fromRight (Right x) = x
-fromRight _         = error "fromRight :: Left"
-
-isRight (Right _) = True
-isRight _         = False
-
-a --> b = not a || b