diff options
| author | James Crayne <jim.crayne@gmail.com> | 2016-04-27 02:23:24 -0400 |
|---|---|---|
| committer | James Crayne <jim.crayne@gmail.com> | 2016-04-27 02:23:24 -0400 |
| commit | 39c085fff40fcb2dfea17d1d8b20b1387ff1e2af (patch) | |
| tree | c1b7b73d8922116a84fea6dddbee959479af3184 /testkiki | |
| parent | 0feaf53a9d793b3970ff93a9fb24cd2893f3919e (diff) | |
typo
Diffstat (limited to 'testkiki')
| -rw-r--r-- | testkiki/testkiki.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testkiki/testkiki.hs b/testkiki/testkiki.hs index 606f268..b693601 100644 --- a/testkiki/testkiki.hs +++ b/testkiki/testkiki.hs | |||
| @@ -310,8 +310,8 @@ doTests tkConfig = hspec $ do | |||
| 310 | 310 | ||
| 311 | 311 | ||
| 312 | 312 | ||
| 313 | safeFileInfo :: FilePath -> IO (UTCTime,FilePath) | 313 | saveFileInfo :: FilePath -> IO (UTCTime,FilePath) |
| 314 | safeFileInfo file = do | 314 | saveFileInfo file = do |
| 315 | mtime <- getModificationTime file | 315 | mtime <- getModificationTime file |
| 316 | let folder = takeDirectory file | 316 | let folder = takeDirectory file |
| 317 | fileDotOld = file ++ ".old" | 317 | fileDotOld = file ++ ".old" |