Forgot some files
This commit is contained in:
@ -36,7 +36,7 @@ import Graphics.Rendering.OpenGL.Raw.Core31
|
||||
import Data.Time (getCurrentTime, UTCTime, diffUTCTime)
|
||||
|
||||
-- Our modules
|
||||
import Map.Map
|
||||
import Map.Graphics
|
||||
import Render.Misc (checkError,
|
||||
createFrustum, getCam,
|
||||
lookAt, up, curb)
|
||||
@ -420,4 +420,4 @@ processEvent e = do
|
||||
Quit -> modify $ \s -> s {stateWinClose = True}
|
||||
-- there is more (joystic, touchInterface, ...), but currently ignored
|
||||
_ -> return ()
|
||||
liftIO $ putStrLn $ unwords ["Processing Event:",(show e)]
|
||||
liftIO $ putStrLn $ unwords ["Processing Event:",(show e)]
|
||||
|
Reference in New Issue
Block a user