diff --git a/data/main.ui b/data/main.ui
--- a/data/main.ui
+++ b/data/main.ui
@@ -7,9 +7,9 @@
     <property name="border_width">5</property>
     <property name="type_hint">dialog</property>
     <property name="program_name">ghc-vis</property>
-    <property name="version">0.6</property>
     <property name="website">http://felsin9.de/nnis/ghc-vis</property>
-    <property name="authors">Dennis Felsing</property>
+    <property name="authors">Dennis Felsing
+Joachim Breitner</property>
     <child internal-child="vbox">
       <object class="GtkVBox" id="dialog-vbox3">
         <property name="visible">True</property>
diff --git a/ghc-vis.cabal b/ghc-vis.cabal
--- a/ghc-vis.cabal
+++ b/ghc-vis.cabal
@@ -1,5 +1,5 @@
 name:               ghc-vis
-version:            0.7
+version:            0.7.0.1
 license:            BSD3
 license-file:       LICENSE
 category:           GHC, Debug, Development
@@ -37,8 +37,8 @@
 --  Description: "SDL window"
 
 Library
-  Exposed-modules: GHC.Vis GHC.Vis.Internal 
-  Other-modules: GHC.Vis.Types GHC.Vis.View.List GHC.Vis.View.Common Paths_ghc_vis
+  Exposed-modules: GHC.Vis
+  Other-modules: GHC.Vis.Internal GHC.Vis.Types GHC.Vis.View.List GHC.Vis.View.Common Paths_ghc_vis
   Default-Language: Haskell2010
   Build-depends: base >= 4.5 && < 4.7,
                  mtl >= 2.0 && < 2.2,
diff --git a/src/GHC/Vis.hs b/src/GHC/Vis.hs
--- a/src/GHC/Vis.hs
+++ b/src/GHC/Vis.hs
@@ -67,6 +67,7 @@
 
 import Data.Char
 import Data.IORef
+import Data.Version
 
 import qualified Data.IntMap as M
 
@@ -610,6 +611,8 @@
   newFilter "*.svg" "SVG" saveDialog
   newFilter "*.ps" "PostScript" saveDialog
   newFilter "*.png" "PNG" saveDialog
+
+  set aboutDialog [aboutDialogVersion := showVersion My.version]
 
   onResponse saveDialog $ fileSave saveDialog
   onResponse aboutDialog $ const $ widgetHide aboutDialog