diff --git a/changelog.txt b/changelog.txt
--- a/changelog.txt
+++ b/changelog.txt
@@ -1,3 +1,6 @@
+0.7.1.0:
+- add an interface which makes a movie
+
 0.7.0.0:
 - pass in user options with Options type
 - add an optional background color argument
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.1.0
+version:             0.7.1.1
 stability:           Experimental
 synopsis:            Painless 3D graphics, no affiliation with gloss
 description:{
diff --git a/src/Vis/Vis.hs b/src/Vis/Vis.hs
--- a/src/Vis/Vis.hs
+++ b/src/Vis/Vis.hs
@@ -41,14 +41,10 @@
 
 data Options =
   Options
-  { -- ^ optional background color
-    optBackgroundColor :: Maybe GC.Color
-    -- ^ optional (x,y) window size in pixels
-  , optWindowSize :: Maybe (Int,Int)
-    -- ^ optional (x,y) window origin in pixels
-  , optWindowPosition :: Maybe (Int,Int)
-    -- ^ window name
-  , optWindowName :: String
+  { optBackgroundColor :: Maybe GC.Color -- ^ optional background color
+  , optWindowSize :: Maybe (Int,Int) -- ^ optional (x,y) window size in pixels
+  , optWindowPosition :: Maybe (Int,Int) -- ^ optional (x,y) window origin in pixels
+  , optWindowName :: String -- ^ window name
   } deriving Show
 
 myGlInit :: Options -> IO ()