Commit 894aa96e authored by Mikhail Glushenkov's avatar Mikhail Glushenkov

80-col violation.

parent 3f4b20b0
...@@ -69,7 +69,8 @@ import Distribution.Client.Init.Types ...@@ -69,7 +69,8 @@ import Distribution.Client.Init.Types
import Distribution.Client.Init.Licenses import Distribution.Client.Init.Licenses
( bsd3, gplv2, gplv3, lgpl2, lgpl3, apache20 ) ( bsd3, gplv2, gplv3, lgpl2, lgpl3, apache20 )
import Distribution.Client.Init.Heuristics import Distribution.Client.Init.Heuristics
( guessPackageName, guessAuthorNameMail, SourceFileEntry(..), scanForModules, neededBuildPrograms ) ( guessPackageName, guessAuthorNameMail, SourceFileEntry(..),
scanForModules, neededBuildPrograms )
import Distribution.License import Distribution.License
( License(..), knownLicenses ) ( License(..), knownLicenses )
...@@ -794,4 +795,3 @@ generateWarnings flags = do ...@@ -794,4 +795,3 @@ generateWarnings flags = do
message :: InitFlags -> String -> IO () message :: InitFlags -> String -> IO ()
message (InitFlags{quiet = Flag True}) _ = return () message (InitFlags{quiet = Flag True}) _ = return ()
message _ s = putStrLn s message _ s = putStrLn s
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment