diff --git a/Data/List/PointedList.hs b/Data/List/PointedList.hs
--- a/Data/List/PointedList.hs
+++ b/Data/List/PointedList.hs
@@ -14,7 +14,7 @@
 import Data.List hiding (length, foldl, foldr, find, elem)
 import qualified Data.List as List
 import Data.Maybe
-import Data.Record.Label
+import qualified Data.Label as Label
 import Data.Traversable
 
 -- | The implementation of the pointed list structure which tracks the current
@@ -26,7 +26,7 @@
   } deriving (Eq)
 
 $(derive makeBinary ''PointedList)
-$(mkLabels [''PointedList])
+$(Label.mkLabels [''PointedList])
 
 instance (Show a) => Show (PointedList a) where
  show (PointedList ls x rs) = show (reverse ls) ++ " " ++ show x ++ " " ++ show rs
@@ -66,7 +66,7 @@
 
 -- | Replace the focus of the list, retaining the prefix and suffix.
 replace :: a -> PointedList a -> PointedList a
-replace = setL focus
+replace = Label.set focus
 
 -- | Possibly move the focus to the next element in the list.
 next :: PointedList a -> Maybe (PointedList a)
@@ -192,7 +192,7 @@
 --   0.3.2. Improved again by Runar Bjarnason for version 0.3.3 to support
 --   infinite lists on both sides of the focus.
 find :: Eq a => a -> PointedList a -> Maybe (PointedList a)
-find x pl = find' ((x ==) . (getL focus)) $ positions pl
+find x pl = find' ((x ==) . (Label.get focus)) $ positions pl
   where find' pred (PointedList a b c) =
           if pred b then Just b
                     else List.find pred (merge a c)
diff --git a/pointedlist.cabal b/pointedlist.cabal
--- a/pointedlist.cabal
+++ b/pointedlist.cabal
@@ -1,5 +1,5 @@
 Name:          pointedlist
-Version:       0.4.0.2
+Version:       0.4.0.3
 Synopsis:      A zipper-like comonad which works as a list, tracking a position.
 Category:      Data
 Description:
@@ -24,7 +24,7 @@
 Library
   Build-depends: base >= 4 && < 5
   Build-depends: binary
-  Build-depends: fclabels > 0.11.0 && < 0.12
+  Build-depends: fclabels == 1.0.*
   Build-depends: derive
 
   Exposed-modules: Data.List.PointedList