[project @ 2003-11-28 11:08:54 by simonmar]

[ghc-base.git] / System / IO.hs

diff --git a/System/IO.hs b/System/IO.hs
index f33a167..d189ac1 100644 (file)
--- a/System/IO.hs
+++ b/System/IO.hs
@@ -244,7 +244,7 @@ putChar c       =  hPutChar stdout c
 putStr          :: String -> IO ()
 putStr s        =  hPutStr stdout s
 
--- | The same as 'putStrLn', but adds a newline character.
+-- | The same as 'putStr', but adds a newline character.
 
 putStrLn        :: String -> IO ()
 putStrLn s      =  do putStr s