diff --git a/src/Affection/Property.hs b/src/Affection/Property.hs
index 73a5bb8..dfebc79 100644
--- a/src/Affection/Property.hs
+++ b/src/Affection/Property.hs
@@ -5,7 +5,7 @@ module Affection.Property where
 import Control.Monad.State.Lazy
 import qualified GEGL as G
 import qualified BABL as B
-import GHC.Ptr (Ptr)
+import Foreign.Ptr (Ptr)
 
 type Props a = State [G.Property] a