From bca6fd69e112f85cebfb7a5265c54e995355e25d Mon Sep 17 00:00:00 2001 From: nek0 Date: Fri, 16 Oct 2020 06:00:30 +0200 Subject: [PATCH] typo --- src/Affection.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Affection.hs b/src/Affection.hs index 48ea606..e3de186 100644 --- a/src/Affection.hs +++ b/src/Affection.hs @@ -80,7 +80,7 @@ withAffection AffectionConfig{..} = do -- SDL.swapInterval $= SDL.SynchronizedUpdates -- <- causes Problems with windows liftIO $ logIO Debug "Getting Time" -- print current used GL Version - version <- peerArray0 (0 :: Word8) =<< GLRaw.glGetString GLRaw.GL_VERSION + version <- peekArray0 (0 :: Word8) =<< GLRaw.glGetString GLRaw.GL_VERSION print (B.pack version) -- get current time execTime <- getTime Monotonic