diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,3 +2,6 @@
 
 Initial version.
 
+# 0.1.0.1
+
+* Support portray-0.2.
diff --git a/rle.cabal b/rle.cabal
--- a/rle.cabal
+++ b/rle.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 5dd2df18ed4d9085540be3036e2efcf42e04d42f9c0549217d35bbef7e9f9aeb
+-- hash: f921b84e9183299835885681c7d364c24c83ec9be38b5c596114a4ec09655e6c
 
 name:           rle
-version:        0.1.0.0
+version:        0.1.0.1
 synopsis:       A data type of run-length-encoded lists
 description:    Provides an @RLE@ type that stores a sequence of elements in the form of
                 length/value pairs, stored in a normal form with no adjacent runs of equal
@@ -39,7 +39,7 @@
       base >=4.12 && <4.16
     , cereal >=0.5.2 && <0.6
     , deepseq >=1.4 && <1.5
-    , portray >=0.1 && <0.2
+    , portray >=0.1.1 && <0.3
     , portray-diff >=0.1 && <0.2
     , wrapped >=0.1 && <0.2
   default-language: Haskell2010
@@ -56,7 +56,7 @@
     , base >=4.12 && <4.16
     , cereal >=0.5.2 && <0.6
     , deepseq >=1.4 && <1.5
-    , portray >=0.1 && <0.2
+    , portray >=0.1.1 && <0.3
     , portray-diff >=0.1 && <0.2
     , rle
     , test-framework
diff --git a/src/Data/RLE.hs b/src/Data/RLE.hs
--- a/src/Data/RLE.hs
+++ b/src/Data/RLE.hs
@@ -12,7 +12,6 @@
 -- See the License for the specific language governing permissions and
 -- limitations under the License.
 
-{-# LANGUAGE CPP #-}
 {-# LANGUAGE DeriveGeneric #-}
 {-# LANGUAGE DeriveFunctor #-}
 {-# LANGUAGE DeriveFoldable #-}
@@ -107,10 +106,10 @@
   deriving anyclass (NFData, Serialize)
 
 instance Portray a => Portray (RLE a) where
-  portray rle = Apply "fromRuns" [List $ portray <$> toRuns rle]
+  portray rle = Apply (Name "fromRuns") [List $ portray <$> toRuns rle]
 
 instance (Portray a, Diff a) => Diff (RLE a) where
-  diff x y = Apply "fromRuns" . pure <$> diff (toRuns x) (toRuns y)
+  diff x y = Apply (Name "fromRuns") . pure <$> diff (toRuns x) (toRuns y)
 
 instance Eq a => IsList (RLE a) where
   type Item (RLE a) = a