diff --git a/not-gloss.cabal b/not-gloss.cabal
--- a/not-gloss.cabal
+++ b/not-gloss.cabal
@@ -1,5 +1,5 @@
 name:                not-gloss
-version:             0.7.6.5
+version:             0.7.7.0
 stability:           Experimental
 synopsis:            Painless 3D graphics, no affiliation with gloss
 description:{
@@ -43,9 +43,8 @@
                        OpenGL >= 3.0.0.1,
                        spatial-math >= 0.2.1.2,
                        vector,
-                       cereal,
                        binary,
-                       vector-binary-instances == 0.2.1.0,
+                       vector-binary-instances > 0.2.1.0,
                        bytestring,
                        bmp
 
diff --git a/src/Vis/VisObject.hs b/src/Vis/VisObject.hs
--- a/src/Vis/VisObject.hs
+++ b/src/Vis/VisObject.hs
@@ -17,9 +17,7 @@
 import qualified Data.Binary as B
 import qualified Data.Foldable as F
 import Data.Maybe ( fromJust, isJust )
-import qualified Data.Serialize as S
 import Data.Vector.Binary ()
-import Data.Vector.Cereal ()
 import qualified Data.Vector.Storable as VS
 import Data.Word ( Word8 )
 import Graphics.GL
@@ -71,7 +69,6 @@
 
 data LoadedObjModel = LoadedObjModel (VS.Vector Double) (VS.Vector Double) Int deriving (Generic)
 
-instance S.Serialize LoadedObjModel
 instance B.Binary LoadedObjModel
 
 toFlavour :: Bool -> Flavour
@@ -82,9 +79,6 @@
 fromFlavour Solid = False
 fromFlavour Wireframe = True
 
-instance S.Serialize Flavour where
-  put = S.put . fromFlavour
-  get = fmap toFlavour S.get
 instance B.Binary Flavour where
   put = B.put . fromFlavour
   get = fmap toFlavour B.get
@@ -109,9 +103,6 @@
 toBitmapFont 6 = Helvetica18
 toBitmapFont k = error $ "deserializing BitmapFont got bad value (" ++ show k ++ ")"
 
-instance S.Serialize BitmapFont where
-  put = S.put . fromBitmapFont
-  get = fmap toBitmapFont S.get
 instance B.Binary BitmapFont where
   put = B.put . fromBitmapFont
   get = fmap toBitmapFont B.get
@@ -123,15 +114,11 @@
 toColor :: (Float,Float,Float,Float) -> GlossColor.Color
 toColor (r,g,b,a) = GlossColor.makeColor r g b a
 
-instance S.Serialize (GlossColor.Color) where
-  put = S.put . fromColor
-  get = fmap toColor S.get
 instance B.Binary (GlossColor.Color) where
   put = B.put . fromColor
   get = fmap toColor B.get
 
 
-instance S.Serialize a => S.Serialize (VisObject a)
 instance B.Binary a => B.Binary (VisObject a)
 
 setPerspectiveMode :: IO ()