diff --git a/ltk.cabal b/ltk.cabal
--- a/ltk.cabal
+++ b/ltk.cabal
@@ -1,5 +1,5 @@
 name: ltk
-version: 0.8
+version: 0.8.0.6
 cabal-version: -any
 build-type: Simple
 license: GPL
diff --git a/src/Graphics/UI/Editor/Simple.hs b/src/Graphics/UI/Editor/Simple.hs
--- a/src/Graphics/UI/Editor/Simple.hs
+++ b/src/Graphics/UI/Editor/Simple.hs
@@ -36,7 +36,11 @@
 ,   okCancelFields
 ) where
 
+#if MIN_VERSION_gtk(0,10,5)
+import Graphics.UI.Gtk hiding (eventKeyName, eventModifier)
+#else
 import Graphics.UI.Gtk
+#endif
 import qualified Graphics.UI.Gtk as Gtk
 import Control.Monad
 import Data.IORef
@@ -48,7 +52,11 @@
 import Graphics.UI.Editor.Basics
 import Graphics.UI.Editor.MakeEditor
 import Control.Event
+#if MIN_VERSION_gtk(0,10,5)
 import Graphics.UI.Gtk.Gdk.Events (Event(..))
+#else
+import Graphics.UI.Gtk.Gdk.Events (Event(..))
+#endif
 import MyMissing (allOf)
 
 -- ------------------------------------------------------------
@@ -656,10 +664,10 @@
         case mbFileName of
             Nothing -> return (e{gtkReturn=True})
             Just fn -> do
-                let relative = case mbFilePath of
-                                Nothing -> fn
-                                Just rel -> makeRelative rel fn
-                entrySetText entry relative
+--                let relative = case mbFilePath of
+--                                Nothing -> fn
+--                                Just rel -> makeRelative rel fn
+                entrySetText entry fn
 --                triggerEvent notifier SelectionChanged...
                 return (e{gtkReturn=True})
 
diff --git a/src/Graphics/UI/Frame/ViewFrame.hs b/src/Graphics/UI/Frame/ViewFrame.hs
--- a/src/Graphics/UI/Frame/ViewFrame.hs
+++ b/src/Graphics/UI/Frame/ViewFrame.hs
@@ -100,9 +100,17 @@
 import Graphics.UI.Frame.Panes
 import Graphics.UI.Editor.Parameters
 import System.Glib (GObjectClass(..), isA)
+#if MIN_VERSION_gtk(0,10,5)
+import Graphics.UI.Gtk.Layout.Notebook (gTypeNotebook)
+#else
 import Graphics.UI.Gtk.Types (gTypeNotebook)
+#endif
 import System.CPUTime (getCPUTime)
+#if MIN_VERSION_gtk(0,10,5)
+import Graphics.UI.Gtk.Gdk.EventM (Modifier(..))
+#else
 import Graphics.UI.Gtk.Gdk.Enums (Modifier(..))
+#endif
 import MyMissing
 import Graphics.UI.Gtk.Gdk.EventM (TimeStamp(..))
 import Graphics.UI.Editor.MakeEditor