@@ -67,7 +67,7 @@ readLTSHaskell dirPath = do
6767readStackageNightly :: FilePath -> IO Snapshot
6868readStackageNightly dirPath = do
6969 filePaths <- liftIO (listFiles dirPath)
70− let filePath = last (sort [ p | p <- filePaths, takeExtension p == ".yaml" ])
70+ let filePath = maximum [ p | p <- filePaths, takeExtension p == ".yaml" ]
7171 readSnapshot (dirPath </> filePath)
7272
7373readSnapshot :: FilePath -> IO Snapshot