[commit: Cabal] master: Fixed non-exhaustive pattern matches with new InstallOutcome. (b0777e2)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/Cabal

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/b0777e2ddf449ea22f0d6630a098b799c5735441

>---------------------------------------------------------------

commit b0777e2ddf449ea22f0d6630a098b799c5735441
Author: Thomas Tuegel <ttuegel at gmail.com>
Date:   Thu Feb 16 18:16:22 2012 +0000

    Fixed non-exhaustive pattern matches with new InstallOutcome.

>---------------------------------------------------------------

 .../Distribution/Client/BuildReports/Anonymous.hs  |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/cabal-install/Distribution/Client/BuildReports/Anonymous.hs b/cabal-install/Distribution/Client/BuildReports/Anonymous.hs
index 93b31cf..3849fd4 100644
--- a/cabal-install/Distribution/Client/BuildReports/Anonymous.hs
+++ b/cabal-install/Distribution/Client/BuildReports/Anonymous.hs
@@ -282,6 +282,7 @@ instance Text.Text InstallOutcome where
   disp SetupFailed     = Disp.text "SetupFailed"
   disp ConfigureFailed = Disp.text "ConfigureFailed"
   disp BuildFailed     = Disp.text "BuildFailed"
+  disp TestsFailed     = Disp.text "TestsFailed"
   disp InstallFailed   = Disp.text "InstallFailed"
   disp InstallOk       = Disp.text "InstallOk"
 
@@ -296,6 +297,7 @@ instance Text.Text InstallOutcome where
       "SetupFailed"      -> return SetupFailed
       "ConfigureFailed"  -> return ConfigureFailed
       "BuildFailed"      -> return BuildFailed
+      "TestsFailed"      -> return TestsFailed
       "InstallFailed"    -> return InstallFailed
       "InstallOk"        -> return InstallOk
       _                  -> Parse.pfail