diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 # Revision history for seakale-tests
 
+## 0.1.0.2  -- 2017-03-08
+
+* Make (StoreMock a) an instance of Show so Mock (StoreMock backend) a is too.
+
 ## 0.1.0.0  -- 2017-01-31
 
 * First version.
diff --git a/seakale-tests.cabal b/seakale-tests.cabal
--- a/seakale-tests.cabal
+++ b/seakale-tests.cabal
@@ -1,5 +1,5 @@
 name:                  seakale-tests
-version:               0.1.0.1
+version:               0.1.0.2
 synopsis:              Helpers to test code using Seakale
 description:           This package provides a way to run code written with Seakale with a fake database using mocks.
 license:               BSD3
@@ -14,7 +14,7 @@
 source-repository head
   type:                darcs
   location:            http://darcs.redspline.com/seakale
-  tag:                 seakale-tests-0.1.0.1
+  tag:                 seakale-tests-0.1.0.2
 
 library
   ghc-options:         -Wall
@@ -36,7 +36,7 @@
                        Database.Seakale.Tests.Store
 
   build-depends:       base >=4.8 && <4.10
-                     , seakale ==0.1.* || ==0.2.*
+                     , seakale >=0.1 && <0.3
                      , mtl
                      , bytestring
                      , free
diff --git a/src/Database/Seakale/Tests/Store.hs b/src/Database/Seakale/Tests/Store.hs
--- a/src/Database/Seakale/Tests/Store.hs
+++ b/src/Database/Seakale/Tests/Store.hs
@@ -1,5 +1,6 @@
 module Database.Seakale.Tests.Store
   ( StoreMock
+  -- * Mocking the database
   , mockSelect
   , mockSelect_
   , mockFailingSelect
@@ -25,6 +26,7 @@
   , mockDelete
   , mockFailingDeleteMany
   , mockFailingDelete
+  -- * Running in a fake environment
   , runSelect
   , runSelectT
   , runStore
@@ -68,6 +70,14 @@
                   (Either SeakaleError Integer)
   | forall k l a. Storable backend k l a
     => MockDelete (Condition backend a) (Either SeakaleError Integer)
+
+instance Show (StoreMock backend) where
+  show = \case
+    MockSelect _ _ _ _ -> "MockSelect"
+    MockCount  _ _ _   -> "MockSelect"
+    MockInsert _ _     -> "MockInsert"
+    MockUpdate _ _ _   -> "MockUpdate"
+    MockDelete _ _     -> "MockDelete"
 
 mockSelect :: Storable backend k l a => Condition backend a
            -> SelectClauses backend a -> [Entity a]