diff --git a/apache2-log-parser.cabal b/apache2-log-parser.cabal index 199bb899efbdbcf45880c4b80f2d7a94e1c4bc01..64d053746faeb6dfcde8dc307a5944a9be050246 100644 --- a/apache2-log-parser.cabal +++ b/apache2-log-parser.cabal @@ -1,5 +1,5 @@ name: apache2-log-parser -version: 1.0.0 +version: 1.0.1 synopsis: Simple project template from stack description: Please see README.md homepage: http://github.com/githubuser/apache2-log-parser#readme diff --git a/src/Main.hs b/src/Main.hs index 0ccea9acc5f2f3ee380e1b9ec5982e17fbbe0508..902c1a70bd57bf07dbe36ceea761b16a534ee8c5 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -193,7 +193,7 @@ parseFile args = do let linesParsed = length logs finishTime <- getCurrentTime -- duration in seconds - let duration = (round . toRational) (diffUTCTime startTime finishTime) + let duration = (round . toRational) (diffUTCTime finishTime startTime) if duration == 0 then printf "parsed %d lines instantly.\n" linesParsed else