summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--CubeMap.hs2
-rw-r--r--MeshSketch.hs1
2 files changed, 2 insertions, 1 deletions
diff --git a/CubeMap.hs b/CubeMap.hs
index cfa6b0d..73fb1a9 100644
--- a/CubeMap.hs
+++ b/CubeMap.hs
@@ -61,7 +61,7 @@ data Skyboxes = Skyboxes
61loadSkyboxes :: IO Skyboxes 61loadSkyboxes :: IO Skyboxes
62loadSkyboxes = do 62loadSkyboxes = do
63 let dir = "./skyboxes" 63 let dir = "./skyboxes"
64 zips <- listDirectory dir 64 zips <- sort <$> listDirectory dir
65 let len = length zips 65 let len = length zips
66 return Skyboxes 66 return Skyboxes
67 { skyboxCount = len 67 { skyboxCount = len
diff --git a/MeshSketch.hs b/MeshSketch.hs
index 5ada40e..d06e905 100644
--- a/MeshSketch.hs
+++ b/MeshSketch.hs
@@ -1,4 +1,5 @@
1{-# LANGUAGE CPP #-} 1{-# LANGUAGE CPP #-}
2{-# LANGUAGE FlexibleContexts #-}
2{-# LANGUAGE LambdaCase #-} 3{-# LANGUAGE LambdaCase #-}
3{-# LANGUAGE OverloadedLabels #-} 4{-# LANGUAGE OverloadedLabels #-}
4{-# LANGUAGE OverloadedStrings #-} 5{-# LANGUAGE OverloadedStrings #-}