diff --git a/System/Lock/FLock.hsc b/System/Lock/FLock.hsc
--- a/System/Lock/FLock.hsc
+++ b/System/Lock/FLock.hsc
@@ -1,7 +1,7 @@
 
 module System.Lock.FLock
       (withLock, lock, unlock,
-       SharedExclusive(Shared, Exclusive), Block(Block, NoBlock)) where
+       SharedExclusive(Shared, Exclusive), Block(Block, NoBlock), Lock) where
 
 import Control.Monad.Trans (MonadIO, liftIO)
 import Data.Bits ((.|.))
diff --git a/flock.cabal b/flock.cabal
--- a/flock.cabal
+++ b/flock.cabal
@@ -1,5 +1,5 @@
 Name:               flock
-Version:            0.2.1
+Version:            0.2.2
 License:            OtherLicense
 License-File:       COPYING
 Copyright:          Ian Lynagh, 2007