diff --git a/Test/Framework/Runners/Console.hs b/Test/Framework/Runners/Console.hs
--- a/Test/Framework/Runners/Console.hs
+++ b/Test/Framework/Runners/Console.hs
@@ -71,11 +71,8 @@
             (NoArg (mempty { ropt_xml_nested = Just True }))
             "use nested testsuites to represent groups in JUnit XML (not standards compliant)",
         Option [] ["plain"]
-            (NoArg (mempty { ropt_color_mode = Just ColorNever }))
+            (NoArg (mempty { ropt_plain_output = Just True }))
             "do not use any ANSI terminal features to display the test run",
-        Option [] ["color"]
-            (NoArg (mempty { ropt_color_mode = Just ColorAlways }))
-            "use ANSI terminal features to display the test run",
         Option [] ["hide-successes"]
             (NoArg (mempty { ropt_hide_successes = Just True }))
             "hide sucessful tests, and only show failures"
@@ -126,14 +123,9 @@
     
     -- Get a lazy list of the test results, as executed in parallel
     running_tests <- runTests ropts' tests
-
-    isplain <- case unK $ ropt_color_mode ropts' of
-        ColorAuto   -> not `fmap` hIsTerminalDevice stdout
-        ColorNever  -> return True
-        ColorAlways -> return False
-
+    
     -- Show those test results to the user as we get them
-    fin_tests <- showRunTestsTop isplain (unK $ ropt_hide_successes ropts') running_tests
+    fin_tests <- showRunTestsTop (unK $ ropt_plain_output ropts') (unK $ ropt_hide_successes ropts') running_tests
     let test_statistics' = gatherStatistics fin_tests
     
     -- Output XML report (if requested)
@@ -154,6 +146,6 @@
             ropt_test_patterns = K $ ropt_test_patterns ro `orElse` mempty,
             ropt_xml_output = K $ ropt_xml_output ro `orElse` Nothing,
             ropt_xml_nested = K $ ropt_xml_nested ro `orElse` False,
-            ropt_color_mode = K $ ropt_color_mode ro `orElse` ColorAuto,
+            ropt_plain_output = K $ ropt_plain_output ro `orElse` False,
             ropt_hide_successes = K $ ropt_hide_successes ro `orElse` False
         }
diff --git a/Test/Framework/Runners/Console/Run.hs b/Test/Framework/Runners/Console/Run.hs
--- a/Test/Framework/Runners/Console/Run.hs
+++ b/Test/Framework/Runners/Console/Run.hs
@@ -18,7 +18,7 @@
 
 import Text.PrettyPrint.ANSI.Leijen
 
-import Data.Monoid (mempty)
+import Data.Monoid
 
 import Control.Arrow (second, (&&&))
 import Control.Monad (unless)
diff --git a/Test/Framework/Runners/Options.hs b/Test/Framework/Runners/Options.hs
--- a/Test/Framework/Runners/Options.hs
+++ b/Test/Framework/Runners/Options.hs
@@ -6,7 +6,6 @@
 
 import Data.Monoid
 
-data ColorMode = ColorAuto | ColorNever | ColorAlways
 
 type RunnerOptions = RunnerOptions' Maybe
 type CompleteRunnerOptions = RunnerOptions' K
@@ -16,7 +15,7 @@
         ropt_test_patterns :: f [TestPattern],
         ropt_xml_output :: f (Maybe FilePath),
         ropt_xml_nested :: f Bool,
-        ropt_color_mode :: f ColorMode,
+        ropt_plain_output :: f Bool,
         ropt_hide_successes :: f Bool
     }
 
@@ -27,7 +26,7 @@
             ropt_test_patterns = Nothing,
             ropt_xml_output = Nothing,
             ropt_xml_nested = Nothing,
-            ropt_color_mode = Nothing,
+            ropt_plain_output = Nothing,
             ropt_hide_successes = Nothing
         }
 
@@ -37,6 +36,6 @@
             ropt_test_patterns = mappendBy ropt_test_patterns ro1 ro2,
             ropt_xml_output = mappendBy ropt_xml_output ro1 ro2,
             ropt_xml_nested = getLast (mappendBy (Last . ropt_xml_nested) ro1 ro2),
-            ropt_color_mode = getLast (mappendBy (Last . ropt_color_mode) ro1 ro2),
+            ropt_plain_output = getLast (mappendBy (Last . ropt_plain_output) ro1 ro2),
             ropt_hide_successes = getLast (mappendBy (Last . ropt_hide_successes) ro1 ro2)
         }
diff --git a/test-framework.cabal b/test-framework.cabal
--- a/test-framework.cabal
+++ b/test-framework.cabal
@@ -1,5 +1,5 @@
 Name:                test-framework
-Version:             0.4.2.1
+Version:             0.4.2.2
 Cabal-Version:       >= 1.2.3
 Category:            Testing
 Synopsis:            Framework for running and organising tests, with HUnit and QuickCheck support