diff --git a/test/SpecStripe.hs b/test/SpecStripe.hs
index d825bbe0a32527376e70131812c1e0b3466cf466..0576c8b7642ae702a97f94a99fa1affda8d6cb46 100644
--- a/test/SpecStripe.hs
+++ b/test/SpecStripe.hs
@@ -99,7 +99,10 @@ spec_webhook = with app $ do
       test e =
         postJSON "/webhook" (encode e) `shouldRespondWith` 200 { matchBody = MatchBody bodyMatcher }
       -- For now these are the same.  Maybe they always will be?  The HTTP
-      -- behavior is the same though the backend behavior may differ.
+      -- behavior is the same though the backend behavior may differ.  Note
+      -- that a "test_" prefix would cause tasty-discover to find this and try
+      -- to call it - but it can't since it's not a top-level, let alone
+      -- exported.
       xtest_postWithEventBody (GoodChargeEvent e) = test e
       xtest_postWithEventBody (BadChargeEvent e) = test e
     in