[project @ 2000-07-17 16:02:02 by rrt]

Fixed a bracket-o.

diff --git a/ghc/driver/Main.hs b/ghc/driver/Main.hs
index 4cf93d0..856d7d0 100644 (file)
--- a/ghc/driver/Main.hs
+++ b/ghc/driver/Main.hs
@@ -604,7 +604,7 @@ checkConfigAccess = do
   conf_file <- readIORef package_config
   access <- getPermissions conf_file
   unless (writable access)
-       throwDyn (OtherError "you don't have permission to modify the package configuration file")
+       (throwDyn (OtherError "you don't have permission to modify the package configuration file"))
 
 maybeRestoreOldConfig :: String -> IO () -> IO ()
 maybeRestoreOldConfig conf_file io