[commit: ghc] wip/nfs-locking: Fix putSuccess (1080ebf)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/1080ebfc611e8cdae0b4efb166f166a9cebfa6e8/ghc

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

commit 1080ebfc611e8cdae0b4efb166f166a9cebfa6e8
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Wed May 18 00:53:54 2016 +0100

    Fix putSuccess


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

1080ebfc611e8cdae0b4efb166f166a9cebfa6e8
 src/Settings/User.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Settings/User.hs b/src/Settings/User.hs
index 60aeb89..16c7c25 100644
--- a/src/Settings/User.hs
+++ b/src/Settings/User.hs
@@ -102,4 +102,4 @@ putBuild = putColoured Vivid White
 
 -- | Customise build success messages (e.g. a package is built successfully).
 putSuccess :: String -> Action ()
-putSuccess = withVerbosity Loud . putColoured Vivid Green
+putSuccess = putColoured Vivid Green