@@ -79,12 +79,12 @@ which allows you to refine an existing ``DBType``::
7979 printer Shipped = "Shipped"
8080
8181Deriving ``DBType`` via ``ReadShow``
82−^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
82+------------------------------------
8383
84−This is a perfectly reasonable definition, though it is quite verbose and
85−tedious. Rel8 makes it easy to map Haskell types that are encoded using
86−``Read``/``Show`` via the ``ReadShow`` wrapper. An equivalent ``DBType``
87−definition using ``ReadShow`` is::
84+The ``DBType`` definition for ``OrderStatus`` above is a perfectly reasonable
85+definition, though it is quite verbose and tedious. Rel8 makes it easy to map
86+Haskell types that are encoded using ``Read``/``Show`` via the ``ReadShow``
87+wrapper. An equivalent ``DBType`` definition using ``ReadShow`` is::
8888
8989 data OrderStatus = PaymentPending | Paid | Packed | Shipped
9090 deriving stock (Read, Show)