diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,4 +1,11 @@
 
+0.1.0.1 - 2026-05-12
+====================
+- Fix haddock rendering of examples
+- Call myself Mike Ledger and not Michael Ledger; just because I've been going
+  by "Mike" for forever anyway, it's probably just confusing to have a mix of
+  packages with differing names.
+
 0.1.0.0 - 2026-02-10
 ====================
 Export gtupleToJSON, gtupleToEncoding, gtupleParseJSON
diff --git a/aeson-openapi-record-as-tuple.cabal b/aeson-openapi-record-as-tuple.cabal
--- a/aeson-openapi-record-as-tuple.cabal
+++ b/aeson-openapi-record-as-tuple.cabal
@@ -1,9 +1,9 @@
 cabal-version: 2.4
 name: aeson-openapi-record-as-tuple
-version: 1.0.0
+version: 1.0.0.1
 build-type: Simple
 license: MPL-2.0
-author: Michael Ledger
+author: Mike Ledger
 maintainer: mike@quasimal.com
 category: Default
 synopsis: Encode and decode Haskell records as JSON tuples
@@ -13,7 +13,7 @@
 
 source-repository head
   type: git
-  location: https://gitlab.com/_mike/aeson-record-as-tuple
+  location: https://gitlab.com/combobulate.systems/aeson-record-as-tuple
 
 library
   build-depends:
diff --git a/src/Data/Aeson/RecordAsTuple.hs b/src/Data/Aeson/RecordAsTuple.hs
--- a/src/Data/Aeson/RecordAsTuple.hs
+++ b/src/Data/Aeson/RecordAsTuple.hs
@@ -1,8 +1,8 @@
 -- |
 -- Module      : Data.Aeson.RecordAsTuple
--- Copyright   : (c) Michael Ledger 2026
+-- Copyright   : (c) Mike Ledger 2026
 -- License     : MPL-2.0
--- Maintainer  : Michael Ledger <mike@quasimal.com>
+-- Maintainer  : Mike Ledger <mike@quasimal.com>
 module Data.Aeson.RecordAsTuple (
   RecordAsTuple (..),
   gtupleToJSON,
@@ -42,6 +42,8 @@
 -- record types which encode the record as a JSON array rather than object.
 --
 -- Examples
+--
+-- @
 -- >>> data P = P {x,y,z,w::Float} deriving stock (Show,Generic) deriving (ToJSON,FromJSON) via (RecordAsTuple P)
 -- >>> JSON.toJSON (P 1 2 3 4)
 -- Array [Number 1.0,Number 2.0,Number 3.0,Number 4.0]
@@ -50,6 +52,7 @@
 -- >>> data T = T {a,b,c::Float} deriving stock (Generic)
 -- >>> JSON.toJSON (RecordAsTuple (T 1 2 3))
 -- Array [Number 1.0,Number 2.0,Number 3.0]
+-- @
 newtype RecordAsTuple a = RecordAsTuple a
   deriving stock (Eq, Ord, Show, Read)