From: ross <unknown>
Date: Thu, 16 Oct 2003 16:26:43 +0000 (+0000)
Subject: [project @ 2003-10-16 16:26:43 by ross]
X-Git-Tag: nhc98-1-18-release~472
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=939762d006a3ce057a11ba091e2cb4fb5dcb0a95;hp=ca606df5fd7f8ba284659c44c0eff67ab79fa93f;p=ghc-base.git

[project @ 2003-10-16 16:26:43 by ross]
fix a couple of id references in haddock docs
---

diff --git a/System/Environment.hs b/System/Environment.hs
index 25131da..245a9db 100644
--- a/System/Environment.hs
+++ b/System/Environment.hs
@@ -126,7 +126,7 @@ foreign import ccall unsafe "getenv"
    c_getenv :: CString -> IO (Ptr CChar)
 
 {-|
-@withArgs args act@ - while executing action @act@, have 'System.getArgs'
+'withArgs' @args act@ - while executing action @act@, have 'getArgs'
 return @args@.
 -}
 withArgs :: [String] -> IO a -> IO a
@@ -135,8 +135,8 @@ withArgs xs act = do
    withArgv (p:xs) act
 
 {-|
-@withProgName name act@ - while executing action @act@,
-have 'System.getProgName' return @name@.
+'withProgName' @name act@ - while executing action @act@,
+have 'getProgName' return @name@.
 -}
 withProgName :: String -> IO a -> IO a
 withProgName nm act = do