git.iko.soy/typeable/wai
on master help sign in
fixing type.
366f108Kazu Yamamoto
warp/Network/Wai/Handler/Warp/FileInfoCache.hs+1−1
compare with master
unifiedsplit
@@ -93,7 +93,7 @@ withFileInfoCache duration action =
93 terminate
93 terminate
94 (action . getAndRegisterInfo)
94 (action . getAndRegisterInfo)
95
95
96−initialize :: Hash -> IO FileInfoCache
96+initialize :: Int -> IO FileInfoCache
97initialize duration = mkReaper settings
97initialize duration = mkReaper settings
98 where
98 where
99 settings = defaultReaperSettings {
99 settings = defaultReaperSettings {