diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2014-12-29 17:25:59 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2014-12-29 17:30:20 -0400 |
| commit | e79780c0cac64c7b74754e47fc066aa0fc104345 (patch) | |
| tree | 1baa2628f02698a883f8d0bfc8d362307cfa1d11 /Utility/InodeCache.hs | |
| parent | daa420a9f299c331b24488d133d068ddc451b9aa (diff) | |
fixed all remaining build warnings on Windows
Diffstat (limited to 'Utility/InodeCache.hs')
| -rw-r--r-- | Utility/InodeCache.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Utility/InodeCache.hs b/Utility/InodeCache.hs index 328b77595..8a182449b 100644 --- a/Utility/InodeCache.hs +++ b/Utility/InodeCache.hs @@ -7,6 +7,7 @@ -} {-# LANGUAGE CPP #-} +{-# OPTIONS_GHC -fno-warn-orphans #-} module Utility.InodeCache ( InodeCache, @@ -182,7 +183,10 @@ checkSentinalFile s = do SentinalStatus (not unchanged) tsdelta where #ifdef mingw32_HOST_OS - unchanged = oldinode == newinode && oldsize == newsize + -- Since mtime can appear to change when the time zone is + -- changed in windows, we cannot look at the mtime for the + -- sentinal file. + unchanged = oldinode == newinode && oldsize == newsize && (newmtime == newmtime) tsdelta = TSDelta $ do -- Run when generating an InodeCache, -- to get the current delta. |