diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,14 @@
 Brick changelog
 ---------------
 
+0.68.1
+------
+
+Bug fixes:
+ * Brick's internal book-keeping got a bug fix that caused mouse-click
+   coordinates to be wrong for clickable regions that were translated
+   partially off of the left or top edges of a rendered region.
+
 0.68
 ----
 
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -82,6 +82,7 @@
 | [`hledger-ui`](https://github.com/simonmichael/hledger) | A terminal UI for the hledger accounting system. |
 | [`hledger-iadd`](http://github.com/rootzlevel/hledger-iadd) | An interactive terminal UI for adding hledger journal entries |
 | [`wordle`](https://github.com/ivanjermakov/wordle) | An implementation of the Wordle game |
+| [`kpxhs`](https://github.com/akazukin5151/kpxhs) | An interactive [Keepass](https://github.com/keepassxreboot/keepassxc/) database viewer |
 
 These third-party packages also extend `brick`:
 
diff --git a/brick.cabal b/brick.cabal
--- a/brick.cabal
+++ b/brick.cabal
@@ -1,5 +1,5 @@
 name:                brick
-version:             0.68
+version:             0.68.1
 synopsis:            A declarative terminal user interface library
 description:
   Write terminal user interfaces (TUIs) painlessly with 'brick'! You
diff --git a/src/Brick/Widgets/Internal.hs b/src/Brick/Widgets/Internal.hs
--- a/src/Brick/Widgets/Internal.hs
+++ b/src/Brick/Widgets/Internal.hs
@@ -99,25 +99,21 @@
         --
         -- If its entirety is outside the context region, it is dropped.
         --
-        -- Otherwise its size and upper left corner are adjusted so that
-        -- they are contained within the context region.
+        -- Otherwise its size is adjusted so that it is contained within
+        -- the context region.
         cropExtent (Extent n (Location (c, r)) (w, h)) =
-            -- First, clamp the upper-left corner to at least (0, 0).
-            let c' = max c 0
-                r' = max r 0
-                -- Then, determine the new lower-right corner based on
-                -- the clamped corner.
-                endCol = c' + w
-                endRow = r' + h
+            -- Determine the new lower-right corner
+            let endCol = c + w
+                endRow = r + h
                 -- Then clamp the lower-right corner based on the
                 -- context
                 endCol' = min (ctx^.availWidthL) endCol
                 endRow' = min (ctx^.availHeightL) endRow
                 -- Then compute the new width and height from the
                 -- clamped lower-right corner.
-                w' = endCol' - c'
-                h' = endRow' - r'
-                e = Extent n (Location (c', r')) (w', h')
+                w' = endCol' - c
+                h' = endRow' - r
+                e = Extent n (Location (c, r)) (w', h')
             in if w' < 0 || h' < 0
                then Nothing
                else Just e