diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,6 +1,11 @@
 Changes
 =======
 
+Version 3.1.13
+--------------
+
+* Add option to disable ansi tricks (#18, thanks to L-TChen)
+
 Version 3.1.12
 --------------
 
diff --git a/Test/Tasty/Silver/Interactive.hs b/Test/Tasty/Silver/Interactive.hs
--- a/Test/Tasty/Silver/Interactive.hs
+++ b/Test/Tasty/Silver/Interactive.hs
@@ -107,6 +107,7 @@
 interactiveTests dis = TestManager
     [ Option (Proxy :: Proxy Interactive)
     , Option (Proxy :: Proxy HideSuccesses)
+    , Option (Proxy :: Proxy AnsiTricks)
     , Option (Proxy :: Proxy UseColor)
     , Option (Proxy :: Proxy NumThreads)
     , Option (Proxy :: Proxy ExcludeFilters)
@@ -151,6 +152,7 @@
       let
         whenColor = lookupOption opts
         HideSuccesses hideSuccesses = lookupOption opts
+        AnsiTricks ansiTricks = lookupOption opts
 
       let
         ?colors = useColor whenColor isTerm
@@ -159,7 +161,7 @@
         outp = produceOutput opts tests
 
       stats <- case () of { _
-        | hideSuccesses && isTerm ->
+        | hideSuccesses && isTerm && ansiTricks ->
             consoleOutputHidingSuccesses outp smap
         | hideSuccesses && not isTerm ->
             streamOutputHidingSuccesses outp smap
@@ -633,6 +635,18 @@
   optionName = return "hide-successes"
   optionHelp = return "Do not print tests that passed successfully"
   optionCLParser = flagCLParser Nothing (HideSuccesses True)
+
+newtype AnsiTricks = AnsiTricks Bool
+   deriving Typeable
+
+instance IsOption AnsiTricks where
+  defaultValue = AnsiTricks True
+  parseValue = fmap AnsiTricks . safeReadBool
+  optionName = return "ansi-tricks"
+  optionHelp = return $
+    -- Multiline literals don't work because of -XCPP.
+    "Enable various ANSI terminal tricks. " ++
+    "Can be set to 'true' (default) or 'false'."
 
 -- | When to use color on the output
 data UseColor
diff --git a/tasty-silver.cabal b/tasty-silver.cabal
--- a/tasty-silver.cabal
+++ b/tasty-silver.cabal
@@ -1,5 +1,5 @@
 name:                tasty-silver
-version:             3.1.12
+version:             3.1.13
 synopsis:            A fancy test runner, including support for golden tests.
 description:
   This package provides a fancy test runner and support for «golden testing».