Skip to content
Snippets Groups Projects
Commit eacefec6 authored by Reuben Thomas's avatar Reuben Thomas
Browse files

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

Fixed a bracket-o.
parent 11ca4ec6
No related merge requests found
...@@ -604,7 +604,7 @@ checkConfigAccess = do ...@@ -604,7 +604,7 @@ checkConfigAccess = do
conf_file <- readIORef package_config conf_file <- readIORef package_config
access <- getPermissions conf_file access <- getPermissions conf_file
unless (writable access) 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 :: String -> IO () -> IO ()
maybeRestoreOldConfig conf_file io maybeRestoreOldConfig conf_file io
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment