[htoolkit-cvs] gio/src/Graphics/UI/GIO ToolBar.hs,1.4,1.5

[<kr_...@us...>]

Update of /cvsroot/htoolkit/gio/src/Graphics/UI/GIO
In directory sc8-pr-cvs1:/tmp/cvs-serv30280/gio/src/Graphics/UI/GIO

Modified Files:
	ToolBar.hs 
Log Message:
The DockPlace type is renamed to PositionType. The new type should be used for both ToolBar and Notebook control.


Index: ToolBar.hs
===================================================================
RCS file: /cvsroot/htoolkit/gio/src/Graphics/UI/GIO/ToolBar.hs,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** ToolBar.hs	23 Aug 2003 00:04:47 -0000	1.4
--- ToolBar.hs	23 Aug 2003 11:05:59 -0000	1.5
***************
*** 20,24 ****
  		, ToolDropDownButton, toolDropDownButtonAt, toolDropDownButton
  		, ToolLine,   toolLineAt,   toolLine
! 		, DockPlace(..)
               	) where
  
--- 20,24 ----
  		, ToolDropDownButton, toolDropDownButtonAt, toolDropDownButton
  		, ToolLine,   toolLineAt,   toolLine
! 		, PositionType(..)
               	) where
  
***************
*** 28,32 ****
  import Graphics.UI.GIO.Menu
  import qualified Graphics.UI.Port as Lib
! import Graphics.UI.Port(DockPlace(..))
  
  --------------------------------------------------------------------
--- 28,32 ----
  import Graphics.UI.GIO.Menu
  import qualified Graphics.UI.Port as Lib
! import Graphics.UI.Port(PositionType(..))
  
  --------------------------------------------------------------------
***************
*** 36,40 ****
  data ToolBar = ToolBar {htoolbar :: WindowHandle}
  
! toolBar :: String -> DockPlace -> Int -> Int -> Int -> [Prop ToolBar] -> IO ToolBar
  toolBar name place band_num band_position offset props = do
  	bar <- do hwnd <- Lib.createToolBar name place band_num band_position offset
--- 36,40 ----
  data ToolBar = ToolBar {htoolbar :: WindowHandle}
  
! toolBar :: String -> PositionType -> Int -> Int -> Int -> [Prop ToolBar] -> IO ToolBar
  toolBar name place band_num band_position offset props = do
  	bar <- do hwnd <- Lib.createToolBar name place band_num band_position offset