From 8d90b081e52ace46423f2e3157d6ab15ef8d5724 Mon Sep 17 00:00:00 2001
From: Jean-Paul Calderone <exarkun@twistedmatrix.com>
Date: Mon, 26 Aug 2019 13:07:54 -0400
Subject: [PATCH] explain xtest_
---
test/SpecStripe.hs | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/test/SpecStripe.hs b/test/SpecStripe.hs
index d825bbe..0576c8b 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
--
GitLab