too much space

This commit is contained in:
nek0 2017-12-03 04:00:52 +01:00
parent 4525c7c08b
commit ea4ec9b349
1 changed files with 1 additions and 1 deletions

View File

@ -160,7 +160,7 @@ main =
sortIdentifiersByDate :: [Identifier] -> [Identifier]
sortIdentifiersByDate =
sortBy byDate
sortBy byDate
where
byDate id1 id2 =
let fn1 = takeFileName $ toFilePath id1