diff --git a/Utility/Touch.hs b/Utility/Touch.hs
index 0b5688a8ac..e0ca92d4a2 100644
--- a/Utility/Touch.hs
+++ b/Utility/Touch.hs
@@ -38,7 +38,7 @@ import Data.Time.Clock.POSIX
 touchBoth :: FilePath -> POSIXTime -> POSIXTime -> Bool -> IO ()
 touchBoth _ _ _ _ = return ()
 
-touch :: FilePath -> TimeSpec -> Bool -> IO ()
+touch :: FilePath -> POSIXTime -> Bool -> IO ()
 touch _ _ _ = return ()
 
 #endif