diff options
Diffstat (limited to 'Utility/LogFile.hs')
| -rw-r--r-- | Utility/LogFile.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Utility/LogFile.hs b/Utility/LogFile.hs index 7ffb63f52..c45a1d405 100644 --- a/Utility/LogFile.hs +++ b/Utility/LogFile.hs @@ -23,9 +23,9 @@ rotateLog logfile num | otherwise = whenM (doesFileExist currfile) $ do rotateLog logfile (num + 1) renameFile currfile nextfile - where - currfile = filename num - nextfile = filename (num + 1) - filename n - | n == 0 = logfile - | otherwise = logfile ++ "." ++ show n + where + currfile = filename num + nextfile = filename (num + 1) + filename n + | n == 0 = logfile + | otherwise = logfile ++ "." ++ show n |