12 lines
No EOL
265 B
Haskell
12 lines
No EOL
265 B
Haskell
module RPGEngine.Input.LvlSelect
|
|
( getLvlList
|
|
) where
|
|
|
|
import GHC.IO (unsafePerformIO)
|
|
import System.Directory (getDirectoryContents)
|
|
|
|
lvlFolder :: FilePath
|
|
lvlFolder = "levels"
|
|
|
|
getLvlList :: [FilePath]
|
|
getLvlList = unsafePerformIO $ getDirectoryContents lvlFolder |