fix build on windows

diff --git a/Utility/Touch.hs b/Utility/Touch.hs
index 136091db42b362c546a5bfdb03e93fceeb9a458d..8831f306a3bdd4e4293f28ced8b762456f7d2338 100644 (file)
--- a/Utility/Touch.hs
+++ b/Utility/Touch.hs
@@ -33,6 +33,7 @@ touch file mtime = touchBoth file mtime mtime
 #else
 
 import Data.Time.Clock.POSIX
+import Utility.RawFilePath
 
 {- Noop for Windows -}
 touchBoth :: RawFilePath -> POSIXTime -> POSIXTime -> Bool -> IO ()