too much space
This commit is contained in:
parent
4525c7c08b
commit
ea4ec9b349
1 changed files with 1 additions and 1 deletions
|
@ -160,7 +160,7 @@ main =
|
||||||
|
|
||||||
sortIdentifiersByDate :: [Identifier] -> [Identifier]
|
sortIdentifiersByDate :: [Identifier] -> [Identifier]
|
||||||
sortIdentifiersByDate =
|
sortIdentifiersByDate =
|
||||||
sortBy byDate
|
sortBy byDate
|
||||||
where
|
where
|
||||||
byDate id1 id2 =
|
byDate id1 id2 =
|
||||||
let fn1 = takeFileName $ toFilePath id1
|
let fn1 = takeFileName $ toFilePath id1
|
||||||
|
|
Loading…
Reference in a new issue