diff options
Diffstat (limited to 'Graphics/Glyph/ObjLoader.hs')
| -rw-r--r-- | Graphics/Glyph/ObjLoader.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Graphics/Glyph/ObjLoader.hs b/Graphics/Glyph/ObjLoader.hs index 78f010a..b392a26 100644 --- a/Graphics/Glyph/ObjLoader.hs +++ b/Graphics/Glyph/ObjLoader.hs @@ -4,9 +4,9 @@ import Graphics.Glyph.BufferBuilder import Graphics.Glyph.Util import Debug.Trace +import Data.List.Split import Control.Monad import Data.Either -import Data.String.Utils import Data.Array import System.IO import qualified Data.Map as M @@ -82,7 +82,7 @@ loadObjFromBytestring _contents = "" -> -1 _ -> read str in - let s2t s = case split "/" s of + let s2t s = case splitOn "/" s of [a,b,c] -> Just (mapT3 mys2n (a,b,c)) [a,b] -> Just (mapT3 mys2n (a,b,"")) [a] -> Just (mapT3 mys2n (a,"","")) |