diff --git a/CHANGES b/CHANGES
--- a/CHANGES
+++ b/CHANGES
@@ -1,2 +1,5 @@
 0.1:
 		* initial version
+
+0.1.0.1:
+		* unshadowed fig in Gtk.hs
diff --git a/lib/Graphics/Rendering/Plot/Gtk.hs b/lib/Graphics/Rendering/Plot/Gtk.hs
--- a/lib/Graphics/Rendering/Plot/Gtk.hs
+++ b/lib/Graphics/Rendering/Plot/Gtk.hs
@@ -75,8 +75,8 @@
                                                 ffn <- fileFilterGetName ff
                                                 let ot = filterNameType ffn
                                                 s <- widgetGetSize canvas
-                                                fig <- get canvas figure
-                                                writeFigureState ot fn s fig
+                                                fig' <- get canvas figure
+                                                writeFigureState ot fn s fig'
                                        ResponseCancel -> return ()
                                      widgetHide fc
 
diff --git a/plot-gtk.cabal b/plot-gtk.cabal
--- a/plot-gtk.cabal
+++ b/plot-gtk.cabal
@@ -1,5 +1,5 @@
 Name:                plot-gtk
-Version:             0.1
+Version:             0.1.0.1
 License:             BSD3
 License-file:        LICENSE
 Copyright:           (c) A.V.H. McPhail 2010