By | Chris Done |
At | 2013-02-28 |
Title | changed paths of caches |
Description |
Edit file src/Amelie/Controller/Cache.hs 33188 → 33188
57 57 let cachePath = tmpdir ++ "/" ++ keyToString key
58 58 exists <- io $ doesFileExist cachePath
59 59 when exists $ removeFile cachePath
60 60 61 61 keyToString :: Key -> String
- 62 keyToString Home = "home"
- 63 keyToString Activity = "activity"
- 64 keyToString (Paste i) = "paste-" ++ show i
+ 62 keyToString Home = "home.html"
+ 63 keyToString Activity = "activity.html"
+ 64 keyToString (Paste i) = show i ++ ".html"
… … … …