Additional changes for GHC 7.4 & 7.6 compatibility

2 files changed, 8 insertions, 1 deletions

diff --git a/src/compiler/GF/Compile.hs b/src/compiler/GF/Compile.hs
index 9b71c0f39..84aa3d7d9 100644
--- a/src/compiler/GF/Compile.hs
+++ b/src/compiler/GF/Compile.hs
@@ -27,7 +27,7 @@ import GF.Data.Operations
 
 import Control.Monad
 import System.IO
-import System.Directory
+import GF.System.Directory
 import System.FilePath
 import qualified Data.Map as Map
 --import qualified Data.Set as Set
diff --git a/src/compiler/GF/System/Directory.hs b/src/compiler/GF/System/Directory.hs
new file mode 100644
index 000000000..3ee1f3550
--- /dev/null
+++ b/src/compiler/GF/System/Directory.hs
@@ -0,0 +1,7 @@
+-- | Isolate backwards incompatible library changes to 'getModificationTime'
+module GF.System.Directory(getModificationTime,module D) where
+import qualified System.Directory as D
+import System.Directory as D hiding (getModificationTime)
+import Data.Time.Compat
+
+getModificationTime path = fmap toUTCTime (D.getModificationTime path)