From 1d227d655c7391143baa7ce777be8103d5426e82 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 28 Aug 2010 22:58:27 +0000 Subject: [PATCH] Disambiguate a function name --- ghc/InteractiveUI.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index 9a578df..24079bb 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -497,7 +497,7 @@ checkPerms name = putStrLn $ "WARNING: " ++ name ++ " is owned by someone else, IGNORING!" return False else do - let mode = fileMode st + let mode = System.Posix.fileMode st if (groupWriteMode == (mode `intersectFileModes` groupWriteMode)) || (otherWriteMode == (mode `intersectFileModes` otherWriteMode)) then do -- 1.7.10.4