[commit: hsc2hs] master: Make the code -Werror safe (286dd5d)

[git at git.haskell.org]

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

On branch  : master
Link       : http://git.haskell.org/hsc2hs.git/commitdiff/286dd5d6bf83115404ec6e9e194711554390e976

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

commit 286dd5d6bf83115404ec6e9e194711554390e976
Author: Joachim Breitner <mail at joachim-breitner.de>
Date:   Wed Oct 1 12:02:11 2014 +0200

    Make the code -Werror safe


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

286dd5d6bf83115404ec6e9e194711554390e976
 CrossCodegen.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/CrossCodegen.hs b/CrossCodegen.hs
index 5a62d05..687f5be 100644
--- a/CrossCodegen.hs
+++ b/CrossCodegen.hs
@@ -433,7 +433,7 @@ haskellize (firstLetter:next) = toLower firstLetter : loop False next
 -- mangling.
 stringify :: String -> String
 -- Spec: stringify = unwords . words
-stringify xs = go False (dropWhile isSpace xs)
+stringify = go False . dropWhile isSpace
   where
     go _haveSpace [] = []
     go  haveSpace (x:xs)