diff --git a/hfoil.cabal b/hfoil.cabal
--- a/hfoil.cabal
+++ b/hfoil.cabal
@@ -1,5 +1,5 @@
 Name:                hfoil
-Version:             0.2.0.1
+Version:             0.2.0.2
 Stability:           Experimental
 Synopsis:            Hess-Smith panel code for inviscid 2-d airfoil analysis
 License:             BSD3
@@ -48,14 +48,14 @@
 --  Other-modules:
 
   Build-depends:       base >= 4 && < 5
-                       , not-gloss >= 0.7.2.0
+                       , not-gloss >= 0.7.4.0
                        , linear
                        , hmatrix >= 0.12
                        , haskeline >= 0.6
                        , transformers >= 0.2
                        , directory >= 1.1
                        , HTTP >= 4000.2
-                       , parsec >= 3
+                       , parsec >= 3.1.6
 
   Ghc-Options:         -Wall
   Ghc-Prof-Options:    -prof -auto-all
diff --git a/src/HFoil/Drawing.hs b/src/HFoil/Drawing.hs
--- a/src/HFoil/Drawing.hs
+++ b/src/HFoil/Drawing.hs
@@ -28,7 +28,7 @@
 normalLengths = 0.01
 
 drawLine :: Num a => Color -> [(a,a)] -> VisObject a
-drawLine col coords = Line (map (\(x,y) -> V3 x y 0) coords) col
+drawLine col coords = Line Nothing (map (\(x,y) -> V3 x y 0) coords) col
 
 drawCircle :: Num a => Color -> (a, a) -> a -> VisObject a
 drawCircle col (x,y) size = Trans (V3 x y 0) $ Sphere size Solid col
@@ -38,7 +38,7 @@
 --                            $ Circle size
 
 drawLineV :: (Num a, Storable a) => Color -> (Vector a, Vector a) -> VisObject a
-drawLineV col (vx, vy) = Line (zipWith (\x y -> V3 x y 0) (toList vx) (toList vy)) col
+drawLineV col (vx, vy) = Line Nothing (zipWith (\x y -> V3 x y 0) (toList vx) (toList vy)) col
 
 drawFoil :: (Num a, Storable a) => Foil a -> VisObject a
 drawFoil (Foil elements _) = VisObjects $ map drawElement elements