diff --git a/hoodle-core.cabal b/hoodle-core.cabal
--- a/hoodle-core.cabal
+++ b/hoodle-core.cabal
@@ -1,5 +1,5 @@
 Name:		hoodle-core
-Version:	0.13.0
+Version:	0.13.0.0
 Synopsis:	Core library for hoodle
 Description: 	Hoodle is a pen notetaking program written in haskell. 
                 hoodle-core is the core library written in haskell and 
diff --git a/src/Hoodle/Type/HoodleState.hs b/src/Hoodle/Type/HoodleState.hs
--- a/src/Hoodle/Type/HoodleState.hs
+++ b/src/Hoodle/Type/HoodleState.hs
@@ -94,7 +94,7 @@
 import qualified Data.IntMap as M
 import           Data.Maybe
 import           Data.Time.Clock
-import           Graphics.UI.Gtk hiding (Clipboard, get,set)
+import qualified Graphics.UI.Gtk as Gtk hiding (Clipboard, get,set)
 -- from hoodle-platform
 import           Control.Monad.Trans.Crtn.Event 
 import           Control.Monad.Trans.Crtn.Queue 
@@ -134,15 +134,15 @@
                 , _cvsInfoMap :: CanvasInfoMap 
                 , _currentCanvas :: (CanvasId,CanvasInfoBox)
                 , _frameState :: WindowConfig 
-                , _rootWindow :: Widget
-                , _rootContainer :: Box
-                , _rootOfRootWindow :: Window
+                , _rootWindow :: Gtk.Widget
+                , _rootContainer :: Gtk.Box
+                , _rootOfRootWindow :: Gtk.Window
                 , _currentPenDraw :: PenDraw
                 , _callBack ::  AllEvent -> IO ()
                 , _deviceList :: DeviceList
                 , _penInfo :: PenInfo
                 , _selectInfo :: SelectInfo 
-                , _gtkUIManager :: UIManager 
+                , _gtkUIManager :: Gtk.UIManager 
                 , _isSaved :: Bool 
                 , _undoTable :: UndoTable HoodleModeState
                 , _backgroundStyle :: BackgroundStyle 
@@ -154,7 +154,8 @@
                 , _hookSet :: Maybe Hook
                 , _tempQueue :: Queue (Either (ActionOrder AllEvent) AllEvent)
                 , _tempLog :: String -> String 
-                , _statusBar :: Maybe Statusbar
+                , _statusBar :: Maybe Gtk.Statusbar
+                -- , _cursorInfo :: Maybe Cursor
                 } 
 
 
@@ -183,15 +184,15 @@
 frameState = lens _frameState (\f a -> f { _frameState = a } )
 
 -- | lens for rootWindow
-rootWindow :: Simple Lens HoodleState Widget
+rootWindow :: Simple Lens HoodleState Gtk.Widget
 rootWindow = lens _rootWindow (\f a -> f { _rootWindow = a } )
 
 -- | lens for rootContainer
-rootContainer :: Simple Lens HoodleState Box
+rootContainer :: Simple Lens HoodleState Gtk.Box
 rootContainer = lens _rootContainer (\f a -> f { _rootContainer = a } )
 
 -- | lens for rootOfRootWindow
-rootOfRootWindow :: Simple Lens HoodleState Window
+rootOfRootWindow :: Simple Lens HoodleState Gtk.Window
 rootOfRootWindow = lens _rootOfRootWindow (\f a -> f { _rootOfRootWindow = a } )
 
 -- | lens for currentPenDraw
@@ -215,7 +216,7 @@
 selectInfo = lens _selectInfo (\f a -> f { _selectInfo = a } )
 
 -- | lens for gtkUIManager
-gtkUIManager :: Simple Lens HoodleState UIManager
+gtkUIManager :: Simple Lens HoodleState Gtk.UIManager
 gtkUIManager = lens _gtkUIManager (\f a -> f { _gtkUIManager = a } )
 
 -- | lens for isSaved
@@ -265,7 +266,7 @@
 tempLog = lens _tempLog (\f a -> f { _tempLog = a } )
 
 -- | 
-statusBar :: Simple Lens HoodleState (Maybe Statusbar)
+statusBar :: Simple Lens HoodleState (Maybe Gtk.Statusbar)
 statusBar = lens _statusBar (\f a -> f { _statusBar = a })
 
 -- | 
@@ -285,27 +286,27 @@
 
 
 -- | 
-data UIComponentSignalHandler = 
-  UIComponentSignalHandler{ _penModeSignal :: Maybe (ConnectId RadioAction)
-                          , _pageModeSignal :: Maybe (ConnectId RadioAction)
-                          , _penPointSignal :: Maybe (ConnectId RadioAction)
-                          , _penColorSignal :: Maybe (ConnectId RadioAction)
-                          } 
+data UIComponentSignalHandler = UIComponentSignalHandler
+       { _penModeSignal :: Maybe (Gtk.ConnectId Gtk.RadioAction)
+       , _pageModeSignal :: Maybe (Gtk.ConnectId Gtk.RadioAction)
+       , _penPointSignal :: Maybe (Gtk.ConnectId Gtk.RadioAction)
+       , _penColorSignal :: Maybe (Gtk.ConnectId Gtk.RadioAction)
+       } 
 
 -- | lens for penModeSignal
-penModeSignal :: Simple Lens UIComponentSignalHandler (Maybe (ConnectId RadioAction))
+penModeSignal :: Simple Lens UIComponentSignalHandler (Maybe (Gtk.ConnectId Gtk.RadioAction))
 penModeSignal = lens _penModeSignal (\f a -> f { _penModeSignal = a } )
 
 -- | lens for pageModeSignal
-pageModeSignal :: Simple Lens UIComponentSignalHandler (Maybe (ConnectId RadioAction))
+pageModeSignal :: Simple Lens UIComponentSignalHandler (Maybe (Gtk.ConnectId Gtk.RadioAction))
 pageModeSignal = lens _pageModeSignal (\f a -> f { _pageModeSignal = a } )
 
 -- | lens for penPointSignal
-penPointSignal :: Simple Lens UIComponentSignalHandler (Maybe (ConnectId RadioAction))
+penPointSignal :: Simple Lens UIComponentSignalHandler (Maybe (Gtk.ConnectId Gtk.RadioAction))
 penPointSignal = lens _penPointSignal (\f a -> f { _penPointSignal = a } )
 
 -- | lens for penColorSignal
-penColorSignal :: Simple Lens UIComponentSignalHandler (Maybe (ConnectId RadioAction))
+penColorSignal :: Simple Lens UIComponentSignalHandler (Maybe (Gtk.ConnectId Gtk.RadioAction))
 penColorSignal = lens _penColorSignal (\f a -> f { _penColorSignal = a } )