{-# LINE 2 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
module Graphics.UI.Gtk.MenuComboToolbar.MenuShell (
MenuShell,
MenuShellClass,
castToMenuShell, gTypeMenuShell,
toMenuShell,
menuShellAppend,
menuShellPrepend,
menuShellInsert,
menuShellDeactivate,
menuShellActivateItem,
menuShellSelectItem,
menuShellDeselect,
menuShellSelectFirst,
menuShellCancel,
menuShellSetTakeFocus,
menuShellGetTakeFocus,
menuShellTakeFocus,
onActivateCurrent,
afterActivateCurrent,
onCancel,
afterCancel,
onDeactivated,
afterDeactivated,
MenuDirectionType(..),
onMoveCurrent,
afterMoveCurrent,
onSelectionDone,
afterSelectionDone
) where
import Control.Monad (liftM)
import System.Glib.FFI
import System.Glib.Attributes
import Graphics.UI.Gtk.Types
{-# LINE 100 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
import Graphics.UI.Gtk.Signals
{-# LINE 101 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
import Graphics.UI.Gtk.General.Enums (MenuDirectionType(..))
{-# LINE 104 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
menuShellAppend :: (MenuShellClass self, MenuItemClass child) => self
-> child
-> IO ()
menuShellAppend self child =
(\(MenuShell arg1) (Widget arg2) -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_menu_shell_append argPtr1 argPtr2)
{-# LINE 115 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(toWidget child)
menuShellPrepend :: (MenuShellClass self, MenuItemClass child) => self
-> child
-> IO ()
menuShellPrepend self child =
(\(MenuShell arg1) (Widget arg2) -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_menu_shell_prepend argPtr1 argPtr2)
{-# LINE 125 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(toWidget child)
menuShellInsert :: (MenuShellClass self, MenuItemClass child) => self
-> child
-> Int
-> IO ()
menuShellInsert self child position =
(\(MenuShell arg1) (Widget arg2) arg3 -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_menu_shell_insert argPtr1 argPtr2 arg3)
{-# LINE 138 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(toWidget child)
(fromIntegral position)
menuShellDeactivate :: MenuShellClass self => self -> IO ()
menuShellDeactivate self =
(\(MenuShell arg1) -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_deactivate argPtr1)
{-# LINE 148 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
menuShellActivateItem :: (MenuShellClass self, MenuItemClass menuItem) => self
-> menuItem
-> Bool
-> IO ()
menuShellActivateItem self menuItem forceDeactivate =
(\(MenuShell arg1) (Widget arg2) arg3 -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_menu_shell_activate_item argPtr1 argPtr2 arg3)
{-# LINE 160 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(toWidget menuItem)
(fromBool forceDeactivate)
menuShellSelectItem :: (MenuShellClass self, MenuItemClass menuItem) => self
-> menuItem
-> IO ()
menuShellSelectItem self menuItem =
(\(MenuShell arg1) (Widget arg2) -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_menu_shell_select_item argPtr1 argPtr2)
{-# LINE 171 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(toWidget menuItem)
menuShellDeselect :: MenuShellClass self => self -> IO ()
menuShellDeselect self =
(\(MenuShell arg1) -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_deselect argPtr1)
{-# LINE 179 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
menuShellSelectFirst :: MenuShellClass self => self
-> Bool
-> IO ()
menuShellSelectFirst self searchSensitive =
(\(MenuShell arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_select_first argPtr1 arg2)
{-# LINE 195 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(fromBool searchSensitive)
menuShellCancel :: MenuShellClass self => self -> IO ()
menuShellCancel self =
(\(MenuShell arg1) -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_cancel argPtr1)
{-# LINE 207 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
menuShellSetTakeFocus :: MenuShellClass self => self
-> Bool
-> IO ()
menuShellSetTakeFocus self takeFocus =
(\(MenuShell arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_set_take_focus argPtr1 arg2)
{-# LINE 242 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
(fromBool takeFocus)
menuShellGetTakeFocus :: MenuShellClass self => self
-> IO Bool
menuShellGetTakeFocus self =
liftM toBool $
(\(MenuShell arg1) -> withForeignPtr arg1 $ \argPtr1 ->gtk_menu_shell_get_take_focus argPtr1)
{-# LINE 255 "./Graphics/UI/Gtk/MenuComboToolbar/MenuShell.chs" #-}
(toMenuShell self)
menuShellTakeFocus :: MenuShellClass self => Attr self Bool
menuShellTakeFocus = newAttr
menuShellGetTakeFocus
menuShellSetTakeFocus
onActivateCurrent, afterActivateCurrent :: MenuShellClass self => self
-> (Bool -> IO ())
-> IO (ConnectId self)
onActivateCurrent = connect_BOOL__NONE "activate-current" False
afterActivateCurrent = connect_BOOL__NONE "activate-current" True
onCancel, afterCancel :: MenuShellClass self => self
-> IO ()
-> IO (ConnectId self)
onCancel = connect_NONE__NONE "cancel" False
afterCancel = connect_NONE__NONE "cancel" True
onDeactivated, afterDeactivated :: MenuShellClass self => self
-> IO ()
-> IO (ConnectId self)
onDeactivated = connect_NONE__NONE "deactivate" False
afterDeactivated = connect_NONE__NONE "deactivate" True
onMoveCurrent, afterMoveCurrent :: MenuShellClass self => self
-> (MenuDirectionType -> IO ())
-> IO (ConnectId self)
onMoveCurrent = connect_ENUM__NONE "move-current" False
afterMoveCurrent = connect_ENUM__NONE "move-current" True
onSelectionDone, afterSelectionDone :: MenuShellClass self => self
-> IO ()
-> IO (ConnectId self)
onSelectionDone = connect_NONE__NONE "selection-done" False
afterSelectionDone = connect_NONE__NONE "selection-done" True
foreign import ccall safe "gtk_menu_shell_append"
gtk_menu_shell_append :: ((Ptr MenuShell) -> ((Ptr Widget) -> (IO ())))
foreign import ccall safe "gtk_menu_shell_prepend"
gtk_menu_shell_prepend :: ((Ptr MenuShell) -> ((Ptr Widget) -> (IO ())))
foreign import ccall safe "gtk_menu_shell_insert"
gtk_menu_shell_insert :: ((Ptr MenuShell) -> ((Ptr Widget) -> (CInt -> (IO ()))))
foreign import ccall safe "gtk_menu_shell_deactivate"
gtk_menu_shell_deactivate :: ((Ptr MenuShell) -> (IO ()))
foreign import ccall safe "gtk_menu_shell_activate_item"
gtk_menu_shell_activate_item :: ((Ptr MenuShell) -> ((Ptr Widget) -> (CInt -> (IO ()))))
foreign import ccall safe "gtk_menu_shell_select_item"
gtk_menu_shell_select_item :: ((Ptr MenuShell) -> ((Ptr Widget) -> (IO ())))
foreign import ccall safe "gtk_menu_shell_deselect"
gtk_menu_shell_deselect :: ((Ptr MenuShell) -> (IO ()))
foreign import ccall safe "gtk_menu_shell_select_first"
gtk_menu_shell_select_first :: ((Ptr MenuShell) -> (CInt -> (IO ())))
foreign import ccall safe "gtk_menu_shell_cancel"
gtk_menu_shell_cancel :: ((Ptr MenuShell) -> (IO ()))
foreign import ccall safe "gtk_menu_shell_set_take_focus"
gtk_menu_shell_set_take_focus :: ((Ptr MenuShell) -> (CInt -> (IO ())))
foreign import ccall safe "gtk_menu_shell_get_take_focus"
gtk_menu_shell_get_take_focus :: ((Ptr MenuShell) -> (IO CInt))