diff --git a/src/Main.hs b/src/Main.hs index a8f09e7..b8e4855 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -160,7 +160,7 @@ main = sortIdentifiersByDate :: [Identifier] -> [Identifier] sortIdentifiersByDate = - sortBy byDate + sortBy byDate where byDate id1 id2 = let fn1 = takeFileName $ toFilePath id1