Update of /cvsroot/htoolkit/port/src/Port
In directory sc8-pr-cvs1:/tmp/cvs-serv2409/src/Port
Modified Files:
Controls.hs
Log Message:
Complete implementation for ListBox for GTK/Gnome.
Index: Controls.hs
===================================================================
RCS file: /cvsroot/htoolkit/port/src/Port/Controls.hs,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** Controls.hs 27 Mar 2003 13:36:21 -0000 1.13
--- Controls.hs 10 Jul 2003 19:39:56 -0000 1.14
***************
*** 70,73 ****
--- 70,74 ----
, getListBoxSingleSelection, setListBoxSingleSelection
, getListBoxItemSelectState, setListBoxItemSelectState
+ , getListBoxCurrentItem
-- * Slider
, createHorzSlider, createVertSlider, getSliderRequestSize
***************
*** 296,301 ****
foreign import ccall osSetListBoxItemSelectState :: WindowHandle -> CInt -> CBool -> IO ()
-----------------------------------------------------------------------------------------
! -- Popup
-----------------------------------------------------------------------------------------
-- | Create a new popup box.
--- 297,304 ----
foreign import ccall osSetListBoxItemSelectState :: WindowHandle -> CInt -> CBool -> IO ()
+ foreign import ccall "osGetListBoxCurrentItem" getListBoxCurrentItem :: WindowHandle -> IO Int
+
-----------------------------------------------------------------------------------------
! -- Popup
-----------------------------------------------------------------------------------------
-- | Create a new popup box.
|
