module GI.Gtk.Objects.AppChooserWidget
(
AppChooserWidget(..) ,
AppChooserWidgetK ,
toAppChooserWidget ,
noAppChooserWidget ,
appChooserWidgetGetDefaultText ,
appChooserWidgetGetShowAll ,
appChooserWidgetGetShowDefault ,
appChooserWidgetGetShowFallback ,
appChooserWidgetGetShowOther ,
appChooserWidgetGetShowRecommended ,
appChooserWidgetNew ,
appChooserWidgetSetDefaultText ,
appChooserWidgetSetShowAll ,
appChooserWidgetSetShowDefault ,
appChooserWidgetSetShowFallback ,
appChooserWidgetSetShowOther ,
appChooserWidgetSetShowRecommended ,
AppChooserWidgetDefaultTextPropertyInfo ,
constructAppChooserWidgetDefaultText ,
getAppChooserWidgetDefaultText ,
setAppChooserWidgetDefaultText ,
AppChooserWidgetShowAllPropertyInfo ,
constructAppChooserWidgetShowAll ,
getAppChooserWidgetShowAll ,
setAppChooserWidgetShowAll ,
AppChooserWidgetShowDefaultPropertyInfo ,
constructAppChooserWidgetShowDefault ,
getAppChooserWidgetShowDefault ,
setAppChooserWidgetShowDefault ,
AppChooserWidgetShowFallbackPropertyInfo,
constructAppChooserWidgetShowFallback ,
getAppChooserWidgetShowFallback ,
setAppChooserWidgetShowFallback ,
AppChooserWidgetShowOtherPropertyInfo ,
constructAppChooserWidgetShowOther ,
getAppChooserWidgetShowOther ,
setAppChooserWidgetShowOther ,
AppChooserWidgetShowRecommendedPropertyInfo,
constructAppChooserWidgetShowRecommended,
getAppChooserWidgetShowRecommended ,
setAppChooserWidgetShowRecommended ,
AppChooserWidgetApplicationActivatedCallback,
AppChooserWidgetApplicationActivatedCallbackC,
AppChooserWidgetApplicationActivatedSignalInfo,
afterAppChooserWidgetApplicationActivated,
appChooserWidgetApplicationActivatedCallbackWrapper,
appChooserWidgetApplicationActivatedClosure,
mkAppChooserWidgetApplicationActivatedCallback,
noAppChooserWidgetApplicationActivatedCallback,
onAppChooserWidgetApplicationActivated ,
AppChooserWidgetApplicationSelectedCallback,
AppChooserWidgetApplicationSelectedCallbackC,
AppChooserWidgetApplicationSelectedSignalInfo,
afterAppChooserWidgetApplicationSelected,
appChooserWidgetApplicationSelectedCallbackWrapper,
appChooserWidgetApplicationSelectedClosure,
mkAppChooserWidgetApplicationSelectedCallback,
noAppChooserWidgetApplicationSelectedCallback,
onAppChooserWidgetApplicationSelected ,
AppChooserWidgetPopulatePopupCallback ,
AppChooserWidgetPopulatePopupCallbackC ,
AppChooserWidgetPopulatePopupSignalInfo ,
afterAppChooserWidgetPopulatePopup ,
appChooserWidgetPopulatePopupCallbackWrapper,
appChooserWidgetPopulatePopupClosure ,
mkAppChooserWidgetPopulatePopupCallback ,
noAppChooserWidgetPopulatePopupCallback ,
onAppChooserWidgetPopulatePopup ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.Gtk.Types
import GI.Gtk.Callbacks
import qualified GI.Atk as Atk
import qualified GI.GObject as GObject
import qualified GI.Gio as Gio
newtype AppChooserWidget = AppChooserWidget (ForeignPtr AppChooserWidget)
foreign import ccall "gtk_app_chooser_widget_get_type"
c_gtk_app_chooser_widget_get_type :: IO GType
type instance ParentTypes AppChooserWidget = AppChooserWidgetParentTypes
type AppChooserWidgetParentTypes = '[Box, Container, Widget, GObject.Object, Atk.ImplementorIface, AppChooser, Buildable, Orientable]
instance GObject AppChooserWidget where
gobjectIsInitiallyUnowned _ = True
gobjectType _ = c_gtk_app_chooser_widget_get_type
class GObject o => AppChooserWidgetK o
instance (GObject o, IsDescendantOf AppChooserWidget o) => AppChooserWidgetK o
toAppChooserWidget :: AppChooserWidgetK o => o -> IO AppChooserWidget
toAppChooserWidget = unsafeCastTo AppChooserWidget
noAppChooserWidget :: Maybe AppChooserWidget
noAppChooserWidget = Nothing
type AppChooserWidgetApplicationActivatedCallback =
Gio.AppInfo ->
IO ()
noAppChooserWidgetApplicationActivatedCallback :: Maybe AppChooserWidgetApplicationActivatedCallback
noAppChooserWidgetApplicationActivatedCallback = Nothing
type AppChooserWidgetApplicationActivatedCallbackC =
Ptr () ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mkAppChooserWidgetApplicationActivatedCallback :: AppChooserWidgetApplicationActivatedCallbackC -> IO (FunPtr AppChooserWidgetApplicationActivatedCallbackC)
appChooserWidgetApplicationActivatedClosure :: AppChooserWidgetApplicationActivatedCallback -> IO Closure
appChooserWidgetApplicationActivatedClosure cb = newCClosure =<< mkAppChooserWidgetApplicationActivatedCallback wrapped
where wrapped = appChooserWidgetApplicationActivatedCallbackWrapper cb
appChooserWidgetApplicationActivatedCallbackWrapper ::
AppChooserWidgetApplicationActivatedCallback ->
Ptr () ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
appChooserWidgetApplicationActivatedCallbackWrapper _cb _ application _ = do
application' <- (newObject Gio.AppInfo) application
_cb application'
onAppChooserWidgetApplicationActivated :: (GObject a, MonadIO m) => a -> AppChooserWidgetApplicationActivatedCallback -> m SignalHandlerId
onAppChooserWidgetApplicationActivated obj cb = liftIO $ connectAppChooserWidgetApplicationActivated obj cb SignalConnectBefore
afterAppChooserWidgetApplicationActivated :: (GObject a, MonadIO m) => a -> AppChooserWidgetApplicationActivatedCallback -> m SignalHandlerId
afterAppChooserWidgetApplicationActivated obj cb = connectAppChooserWidgetApplicationActivated obj cb SignalConnectAfter
connectAppChooserWidgetApplicationActivated :: (GObject a, MonadIO m) =>
a -> AppChooserWidgetApplicationActivatedCallback -> SignalConnectMode -> m SignalHandlerId
connectAppChooserWidgetApplicationActivated obj cb after = liftIO $ do
cb' <- mkAppChooserWidgetApplicationActivatedCallback (appChooserWidgetApplicationActivatedCallbackWrapper cb)
connectSignalFunPtr obj "application-activated" cb' after
type AppChooserWidgetApplicationSelectedCallback =
Gio.AppInfo ->
IO ()
noAppChooserWidgetApplicationSelectedCallback :: Maybe AppChooserWidgetApplicationSelectedCallback
noAppChooserWidgetApplicationSelectedCallback = Nothing
type AppChooserWidgetApplicationSelectedCallbackC =
Ptr () ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mkAppChooserWidgetApplicationSelectedCallback :: AppChooserWidgetApplicationSelectedCallbackC -> IO (FunPtr AppChooserWidgetApplicationSelectedCallbackC)
appChooserWidgetApplicationSelectedClosure :: AppChooserWidgetApplicationSelectedCallback -> IO Closure
appChooserWidgetApplicationSelectedClosure cb = newCClosure =<< mkAppChooserWidgetApplicationSelectedCallback wrapped
where wrapped = appChooserWidgetApplicationSelectedCallbackWrapper cb
appChooserWidgetApplicationSelectedCallbackWrapper ::
AppChooserWidgetApplicationSelectedCallback ->
Ptr () ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
appChooserWidgetApplicationSelectedCallbackWrapper _cb _ application _ = do
application' <- (newObject Gio.AppInfo) application
_cb application'
onAppChooserWidgetApplicationSelected :: (GObject a, MonadIO m) => a -> AppChooserWidgetApplicationSelectedCallback -> m SignalHandlerId
onAppChooserWidgetApplicationSelected obj cb = liftIO $ connectAppChooserWidgetApplicationSelected obj cb SignalConnectBefore
afterAppChooserWidgetApplicationSelected :: (GObject a, MonadIO m) => a -> AppChooserWidgetApplicationSelectedCallback -> m SignalHandlerId
afterAppChooserWidgetApplicationSelected obj cb = connectAppChooserWidgetApplicationSelected obj cb SignalConnectAfter
connectAppChooserWidgetApplicationSelected :: (GObject a, MonadIO m) =>
a -> AppChooserWidgetApplicationSelectedCallback -> SignalConnectMode -> m SignalHandlerId
connectAppChooserWidgetApplicationSelected obj cb after = liftIO $ do
cb' <- mkAppChooserWidgetApplicationSelectedCallback (appChooserWidgetApplicationSelectedCallbackWrapper cb)
connectSignalFunPtr obj "application-selected" cb' after
type AppChooserWidgetPopulatePopupCallback =
Menu ->
Gio.AppInfo ->
IO ()
noAppChooserWidgetPopulatePopupCallback :: Maybe AppChooserWidgetPopulatePopupCallback
noAppChooserWidgetPopulatePopupCallback = Nothing
type AppChooserWidgetPopulatePopupCallbackC =
Ptr () ->
Ptr Menu ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mkAppChooserWidgetPopulatePopupCallback :: AppChooserWidgetPopulatePopupCallbackC -> IO (FunPtr AppChooserWidgetPopulatePopupCallbackC)
appChooserWidgetPopulatePopupClosure :: AppChooserWidgetPopulatePopupCallback -> IO Closure
appChooserWidgetPopulatePopupClosure cb = newCClosure =<< mkAppChooserWidgetPopulatePopupCallback wrapped
where wrapped = appChooserWidgetPopulatePopupCallbackWrapper cb
appChooserWidgetPopulatePopupCallbackWrapper ::
AppChooserWidgetPopulatePopupCallback ->
Ptr () ->
Ptr Menu ->
Ptr Gio.AppInfo ->
Ptr () ->
IO ()
appChooserWidgetPopulatePopupCallbackWrapper _cb _ menu application _ = do
menu' <- (newObject Menu) menu
application' <- (newObject Gio.AppInfo) application
_cb menu' application'
onAppChooserWidgetPopulatePopup :: (GObject a, MonadIO m) => a -> AppChooserWidgetPopulatePopupCallback -> m SignalHandlerId
onAppChooserWidgetPopulatePopup obj cb = liftIO $ connectAppChooserWidgetPopulatePopup obj cb SignalConnectBefore
afterAppChooserWidgetPopulatePopup :: (GObject a, MonadIO m) => a -> AppChooserWidgetPopulatePopupCallback -> m SignalHandlerId
afterAppChooserWidgetPopulatePopup obj cb = connectAppChooserWidgetPopulatePopup obj cb SignalConnectAfter
connectAppChooserWidgetPopulatePopup :: (GObject a, MonadIO m) =>
a -> AppChooserWidgetPopulatePopupCallback -> SignalConnectMode -> m SignalHandlerId
connectAppChooserWidgetPopulatePopup obj cb after = liftIO $ do
cb' <- mkAppChooserWidgetPopulatePopupCallback (appChooserWidgetPopulatePopupCallbackWrapper cb)
connectSignalFunPtr obj "populate-popup" cb' after
getAppChooserWidgetDefaultText :: (MonadIO m, AppChooserWidgetK o) => o -> m T.Text
getAppChooserWidgetDefaultText obj = liftIO $ getObjectPropertyString obj "default-text"
setAppChooserWidgetDefaultText :: (MonadIO m, AppChooserWidgetK o) => o -> T.Text -> m ()
setAppChooserWidgetDefaultText obj val = liftIO $ setObjectPropertyString obj "default-text" val
constructAppChooserWidgetDefaultText :: T.Text -> IO ([Char], GValue)
constructAppChooserWidgetDefaultText val = constructObjectPropertyString "default-text" val
data AppChooserWidgetDefaultTextPropertyInfo
instance AttrInfo AppChooserWidgetDefaultTextPropertyInfo where
type AttrAllowedOps AppChooserWidgetDefaultTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetDefaultTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint AppChooserWidgetDefaultTextPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetDefaultTextPropertyInfo = T.Text
type AttrLabel AppChooserWidgetDefaultTextPropertyInfo = "AppChooserWidget::default-text"
attrGet _ = getAppChooserWidgetDefaultText
attrSet _ = setAppChooserWidgetDefaultText
attrConstruct _ = constructAppChooserWidgetDefaultText
getAppChooserWidgetShowAll :: (MonadIO m, AppChooserWidgetK o) => o -> m Bool
getAppChooserWidgetShowAll obj = liftIO $ getObjectPropertyBool obj "show-all"
setAppChooserWidgetShowAll :: (MonadIO m, AppChooserWidgetK o) => o -> Bool -> m ()
setAppChooserWidgetShowAll obj val = liftIO $ setObjectPropertyBool obj "show-all" val
constructAppChooserWidgetShowAll :: Bool -> IO ([Char], GValue)
constructAppChooserWidgetShowAll val = constructObjectPropertyBool "show-all" val
data AppChooserWidgetShowAllPropertyInfo
instance AttrInfo AppChooserWidgetShowAllPropertyInfo where
type AttrAllowedOps AppChooserWidgetShowAllPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetShowAllPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AppChooserWidgetShowAllPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetShowAllPropertyInfo = Bool
type AttrLabel AppChooserWidgetShowAllPropertyInfo = "AppChooserWidget::show-all"
attrGet _ = getAppChooserWidgetShowAll
attrSet _ = setAppChooserWidgetShowAll
attrConstruct _ = constructAppChooserWidgetShowAll
getAppChooserWidgetShowDefault :: (MonadIO m, AppChooserWidgetK o) => o -> m Bool
getAppChooserWidgetShowDefault obj = liftIO $ getObjectPropertyBool obj "show-default"
setAppChooserWidgetShowDefault :: (MonadIO m, AppChooserWidgetK o) => o -> Bool -> m ()
setAppChooserWidgetShowDefault obj val = liftIO $ setObjectPropertyBool obj "show-default" val
constructAppChooserWidgetShowDefault :: Bool -> IO ([Char], GValue)
constructAppChooserWidgetShowDefault val = constructObjectPropertyBool "show-default" val
data AppChooserWidgetShowDefaultPropertyInfo
instance AttrInfo AppChooserWidgetShowDefaultPropertyInfo where
type AttrAllowedOps AppChooserWidgetShowDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetShowDefaultPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AppChooserWidgetShowDefaultPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetShowDefaultPropertyInfo = Bool
type AttrLabel AppChooserWidgetShowDefaultPropertyInfo = "AppChooserWidget::show-default"
attrGet _ = getAppChooserWidgetShowDefault
attrSet _ = setAppChooserWidgetShowDefault
attrConstruct _ = constructAppChooserWidgetShowDefault
getAppChooserWidgetShowFallback :: (MonadIO m, AppChooserWidgetK o) => o -> m Bool
getAppChooserWidgetShowFallback obj = liftIO $ getObjectPropertyBool obj "show-fallback"
setAppChooserWidgetShowFallback :: (MonadIO m, AppChooserWidgetK o) => o -> Bool -> m ()
setAppChooserWidgetShowFallback obj val = liftIO $ setObjectPropertyBool obj "show-fallback" val
constructAppChooserWidgetShowFallback :: Bool -> IO ([Char], GValue)
constructAppChooserWidgetShowFallback val = constructObjectPropertyBool "show-fallback" val
data AppChooserWidgetShowFallbackPropertyInfo
instance AttrInfo AppChooserWidgetShowFallbackPropertyInfo where
type AttrAllowedOps AppChooserWidgetShowFallbackPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetShowFallbackPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AppChooserWidgetShowFallbackPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetShowFallbackPropertyInfo = Bool
type AttrLabel AppChooserWidgetShowFallbackPropertyInfo = "AppChooserWidget::show-fallback"
attrGet _ = getAppChooserWidgetShowFallback
attrSet _ = setAppChooserWidgetShowFallback
attrConstruct _ = constructAppChooserWidgetShowFallback
getAppChooserWidgetShowOther :: (MonadIO m, AppChooserWidgetK o) => o -> m Bool
getAppChooserWidgetShowOther obj = liftIO $ getObjectPropertyBool obj "show-other"
setAppChooserWidgetShowOther :: (MonadIO m, AppChooserWidgetK o) => o -> Bool -> m ()
setAppChooserWidgetShowOther obj val = liftIO $ setObjectPropertyBool obj "show-other" val
constructAppChooserWidgetShowOther :: Bool -> IO ([Char], GValue)
constructAppChooserWidgetShowOther val = constructObjectPropertyBool "show-other" val
data AppChooserWidgetShowOtherPropertyInfo
instance AttrInfo AppChooserWidgetShowOtherPropertyInfo where
type AttrAllowedOps AppChooserWidgetShowOtherPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetShowOtherPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AppChooserWidgetShowOtherPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetShowOtherPropertyInfo = Bool
type AttrLabel AppChooserWidgetShowOtherPropertyInfo = "AppChooserWidget::show-other"
attrGet _ = getAppChooserWidgetShowOther
attrSet _ = setAppChooserWidgetShowOther
attrConstruct _ = constructAppChooserWidgetShowOther
getAppChooserWidgetShowRecommended :: (MonadIO m, AppChooserWidgetK o) => o -> m Bool
getAppChooserWidgetShowRecommended obj = liftIO $ getObjectPropertyBool obj "show-recommended"
setAppChooserWidgetShowRecommended :: (MonadIO m, AppChooserWidgetK o) => o -> Bool -> m ()
setAppChooserWidgetShowRecommended obj val = liftIO $ setObjectPropertyBool obj "show-recommended" val
constructAppChooserWidgetShowRecommended :: Bool -> IO ([Char], GValue)
constructAppChooserWidgetShowRecommended val = constructObjectPropertyBool "show-recommended" val
data AppChooserWidgetShowRecommendedPropertyInfo
instance AttrInfo AppChooserWidgetShowRecommendedPropertyInfo where
type AttrAllowedOps AppChooserWidgetShowRecommendedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint AppChooserWidgetShowRecommendedPropertyInfo = (~) Bool
type AttrBaseTypeConstraint AppChooserWidgetShowRecommendedPropertyInfo = AppChooserWidgetK
type AttrGetType AppChooserWidgetShowRecommendedPropertyInfo = Bool
type AttrLabel AppChooserWidgetShowRecommendedPropertyInfo = "AppChooserWidget::show-recommended"
attrGet _ = getAppChooserWidgetShowRecommended
attrSet _ = setAppChooserWidgetShowRecommended
attrConstruct _ = constructAppChooserWidgetShowRecommended
type instance AttributeList AppChooserWidget = AppChooserWidgetAttributeList
type AppChooserWidgetAttributeList = ('[ '("app-paintable", WidgetAppPaintablePropertyInfo), '("baseline-position", BoxBaselinePositionPropertyInfo), '("border-width", ContainerBorderWidthPropertyInfo), '("can-default", WidgetCanDefaultPropertyInfo), '("can-focus", WidgetCanFocusPropertyInfo), '("child", ContainerChildPropertyInfo), '("composite-child", WidgetCompositeChildPropertyInfo), '("content-type", AppChooserContentTypePropertyInfo), '("default-text", AppChooserWidgetDefaultTextPropertyInfo), '("double-buffered", WidgetDoubleBufferedPropertyInfo), '("events", WidgetEventsPropertyInfo), '("expand", WidgetExpandPropertyInfo), '("halign", WidgetHalignPropertyInfo), '("has-default", WidgetHasDefaultPropertyInfo), '("has-focus", WidgetHasFocusPropertyInfo), '("has-tooltip", WidgetHasTooltipPropertyInfo), '("height-request", WidgetHeightRequestPropertyInfo), '("hexpand", WidgetHexpandPropertyInfo), '("hexpand-set", WidgetHexpandSetPropertyInfo), '("homogeneous", BoxHomogeneousPropertyInfo), '("is-focus", WidgetIsFocusPropertyInfo), '("margin", WidgetMarginPropertyInfo), '("margin-bottom", WidgetMarginBottomPropertyInfo), '("margin-end", WidgetMarginEndPropertyInfo), '("margin-left", WidgetMarginLeftPropertyInfo), '("margin-right", WidgetMarginRightPropertyInfo), '("margin-start", WidgetMarginStartPropertyInfo), '("margin-top", WidgetMarginTopPropertyInfo), '("name", WidgetNamePropertyInfo), '("no-show-all", WidgetNoShowAllPropertyInfo), '("opacity", WidgetOpacityPropertyInfo), '("orientation", OrientableOrientationPropertyInfo), '("parent", WidgetParentPropertyInfo), '("receives-default", WidgetReceivesDefaultPropertyInfo), '("resize-mode", ContainerResizeModePropertyInfo), '("scale-factor", WidgetScaleFactorPropertyInfo), '("sensitive", WidgetSensitivePropertyInfo), '("show-all", AppChooserWidgetShowAllPropertyInfo), '("show-default", AppChooserWidgetShowDefaultPropertyInfo), '("show-fallback", AppChooserWidgetShowFallbackPropertyInfo), '("show-other", AppChooserWidgetShowOtherPropertyInfo), '("show-recommended", AppChooserWidgetShowRecommendedPropertyInfo), '("spacing", BoxSpacingPropertyInfo), '("style", WidgetStylePropertyInfo), '("tooltip-markup", WidgetTooltipMarkupPropertyInfo), '("tooltip-text", WidgetTooltipTextPropertyInfo), '("valign", WidgetValignPropertyInfo), '("vexpand", WidgetVexpandPropertyInfo), '("vexpand-set", WidgetVexpandSetPropertyInfo), '("visible", WidgetVisiblePropertyInfo), '("width-request", WidgetWidthRequestPropertyInfo), '("window", WidgetWindowPropertyInfo)] :: [(Symbol, *)])
data AppChooserWidgetApplicationActivatedSignalInfo
instance SignalInfo AppChooserWidgetApplicationActivatedSignalInfo where
type HaskellCallbackType AppChooserWidgetApplicationActivatedSignalInfo = AppChooserWidgetApplicationActivatedCallback
connectSignal _ = connectAppChooserWidgetApplicationActivated
data AppChooserWidgetApplicationSelectedSignalInfo
instance SignalInfo AppChooserWidgetApplicationSelectedSignalInfo where
type HaskellCallbackType AppChooserWidgetApplicationSelectedSignalInfo = AppChooserWidgetApplicationSelectedCallback
connectSignal _ = connectAppChooserWidgetApplicationSelected
data AppChooserWidgetPopulatePopupSignalInfo
instance SignalInfo AppChooserWidgetPopulatePopupSignalInfo where
type HaskellCallbackType AppChooserWidgetPopulatePopupSignalInfo = AppChooserWidgetPopulatePopupCallback
connectSignal _ = connectAppChooserWidgetPopulatePopup
type instance SignalList AppChooserWidget = AppChooserWidgetSignalList
type AppChooserWidgetSignalList = ('[ '("accel-closures-changed", WidgetAccelClosuresChangedSignalInfo), '("add", ContainerAddSignalInfo), '("application-activated", AppChooserWidgetApplicationActivatedSignalInfo), '("application-selected", AppChooserWidgetApplicationSelectedSignalInfo), '("button-press-event", WidgetButtonPressEventSignalInfo), '("button-release-event", WidgetButtonReleaseEventSignalInfo), '("can-activate-accel", WidgetCanActivateAccelSignalInfo), '("check-resize", ContainerCheckResizeSignalInfo), '("child-notify", WidgetChildNotifySignalInfo), '("composited-changed", WidgetCompositedChangedSignalInfo), '("configure-event", WidgetConfigureEventSignalInfo), '("damage-event", WidgetDamageEventSignalInfo), '("delete-event", WidgetDeleteEventSignalInfo), '("destroy", WidgetDestroySignalInfo), '("destroy-event", WidgetDestroyEventSignalInfo), '("direction-changed", WidgetDirectionChangedSignalInfo), '("drag-begin", WidgetDragBeginSignalInfo), '("drag-data-delete", WidgetDragDataDeleteSignalInfo), '("drag-data-get", WidgetDragDataGetSignalInfo), '("drag-data-received", WidgetDragDataReceivedSignalInfo), '("drag-drop", WidgetDragDropSignalInfo), '("drag-end", WidgetDragEndSignalInfo), '("drag-failed", WidgetDragFailedSignalInfo), '("drag-leave", WidgetDragLeaveSignalInfo), '("drag-motion", WidgetDragMotionSignalInfo), '("draw", WidgetDrawSignalInfo), '("enter-notify-event", WidgetEnterNotifyEventSignalInfo), '("event", WidgetEventSignalInfo), '("event-after", WidgetEventAfterSignalInfo), '("focus", WidgetFocusSignalInfo), '("focus-in-event", WidgetFocusInEventSignalInfo), '("focus-out-event", WidgetFocusOutEventSignalInfo), '("grab-broken-event", WidgetGrabBrokenEventSignalInfo), '("grab-focus", WidgetGrabFocusSignalInfo), '("grab-notify", WidgetGrabNotifySignalInfo), '("hide", WidgetHideSignalInfo), '("hierarchy-changed", WidgetHierarchyChangedSignalInfo), '("key-press-event", WidgetKeyPressEventSignalInfo), '("key-release-event", WidgetKeyReleaseEventSignalInfo), '("keynav-failed", WidgetKeynavFailedSignalInfo), '("leave-notify-event", WidgetLeaveNotifyEventSignalInfo), '("map", WidgetMapSignalInfo), '("map-event", WidgetMapEventSignalInfo), '("mnemonic-activate", WidgetMnemonicActivateSignalInfo), '("motion-notify-event", WidgetMotionNotifyEventSignalInfo), '("move-focus", WidgetMoveFocusSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parent-set", WidgetParentSetSignalInfo), '("populate-popup", AppChooserWidgetPopulatePopupSignalInfo), '("popup-menu", WidgetPopupMenuSignalInfo), '("property-notify-event", WidgetPropertyNotifyEventSignalInfo), '("proximity-in-event", WidgetProximityInEventSignalInfo), '("proximity-out-event", WidgetProximityOutEventSignalInfo), '("query-tooltip", WidgetQueryTooltipSignalInfo), '("realize", WidgetRealizeSignalInfo), '("remove", ContainerRemoveSignalInfo), '("screen-changed", WidgetScreenChangedSignalInfo), '("scroll-event", WidgetScrollEventSignalInfo), '("selection-clear-event", WidgetSelectionClearEventSignalInfo), '("selection-get", WidgetSelectionGetSignalInfo), '("selection-notify-event", WidgetSelectionNotifyEventSignalInfo), '("selection-received", WidgetSelectionReceivedSignalInfo), '("selection-request-event", WidgetSelectionRequestEventSignalInfo), '("set-focus-child", ContainerSetFocusChildSignalInfo), '("show", WidgetShowSignalInfo), '("show-help", WidgetShowHelpSignalInfo), '("size-allocate", WidgetSizeAllocateSignalInfo), '("state-changed", WidgetStateChangedSignalInfo), '("state-flags-changed", WidgetStateFlagsChangedSignalInfo), '("style-set", WidgetStyleSetSignalInfo), '("style-updated", WidgetStyleUpdatedSignalInfo), '("touch-event", WidgetTouchEventSignalInfo), '("unmap", WidgetUnmapSignalInfo), '("unmap-event", WidgetUnmapEventSignalInfo), '("unrealize", WidgetUnrealizeSignalInfo), '("visibility-notify-event", WidgetVisibilityNotifyEventSignalInfo), '("window-state-event", WidgetWindowStateEventSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "gtk_app_chooser_widget_new" gtk_app_chooser_widget_new ::
CString ->
IO (Ptr AppChooserWidget)
appChooserWidgetNew ::
(MonadIO m) =>
T.Text ->
m AppChooserWidget
appChooserWidgetNew content_type = liftIO $ do
content_type' <- textToCString content_type
result <- gtk_app_chooser_widget_new content_type'
checkUnexpectedReturnNULL "gtk_app_chooser_widget_new" result
result' <- (newObject AppChooserWidget) result
freeMem content_type'
return result'
foreign import ccall "gtk_app_chooser_widget_get_default_text" gtk_app_chooser_widget_get_default_text ::
Ptr AppChooserWidget ->
IO CString
appChooserWidgetGetDefaultText ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m T.Text
appChooserWidgetGetDefaultText _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_default_text _obj'
checkUnexpectedReturnNULL "gtk_app_chooser_widget_get_default_text" result
result' <- cstringToText result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_get_show_all" gtk_app_chooser_widget_get_show_all ::
Ptr AppChooserWidget ->
IO CInt
appChooserWidgetGetShowAll ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m Bool
appChooserWidgetGetShowAll _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_show_all _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_get_show_default" gtk_app_chooser_widget_get_show_default ::
Ptr AppChooserWidget ->
IO CInt
appChooserWidgetGetShowDefault ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m Bool
appChooserWidgetGetShowDefault _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_show_default _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_get_show_fallback" gtk_app_chooser_widget_get_show_fallback ::
Ptr AppChooserWidget ->
IO CInt
appChooserWidgetGetShowFallback ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m Bool
appChooserWidgetGetShowFallback _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_show_fallback _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_get_show_other" gtk_app_chooser_widget_get_show_other ::
Ptr AppChooserWidget ->
IO CInt
appChooserWidgetGetShowOther ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m Bool
appChooserWidgetGetShowOther _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_show_other _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_get_show_recommended" gtk_app_chooser_widget_get_show_recommended ::
Ptr AppChooserWidget ->
IO CInt
appChooserWidgetGetShowRecommended ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
m Bool
appChooserWidgetGetShowRecommended _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- gtk_app_chooser_widget_get_show_recommended _obj'
let result' = (/= 0) result
touchManagedPtr _obj
return result'
foreign import ccall "gtk_app_chooser_widget_set_default_text" gtk_app_chooser_widget_set_default_text ::
Ptr AppChooserWidget ->
CString ->
IO ()
appChooserWidgetSetDefaultText ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
T.Text ->
m ()
appChooserWidgetSetDefaultText _obj text = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
text' <- textToCString text
gtk_app_chooser_widget_set_default_text _obj' text'
touchManagedPtr _obj
freeMem text'
return ()
foreign import ccall "gtk_app_chooser_widget_set_show_all" gtk_app_chooser_widget_set_show_all ::
Ptr AppChooserWidget ->
CInt ->
IO ()
appChooserWidgetSetShowAll ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
Bool ->
m ()
appChooserWidgetSetShowAll _obj setting = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let setting' = (fromIntegral . fromEnum) setting
gtk_app_chooser_widget_set_show_all _obj' setting'
touchManagedPtr _obj
return ()
foreign import ccall "gtk_app_chooser_widget_set_show_default" gtk_app_chooser_widget_set_show_default ::
Ptr AppChooserWidget ->
CInt ->
IO ()
appChooserWidgetSetShowDefault ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
Bool ->
m ()
appChooserWidgetSetShowDefault _obj setting = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let setting' = (fromIntegral . fromEnum) setting
gtk_app_chooser_widget_set_show_default _obj' setting'
touchManagedPtr _obj
return ()
foreign import ccall "gtk_app_chooser_widget_set_show_fallback" gtk_app_chooser_widget_set_show_fallback ::
Ptr AppChooserWidget ->
CInt ->
IO ()
appChooserWidgetSetShowFallback ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
Bool ->
m ()
appChooserWidgetSetShowFallback _obj setting = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let setting' = (fromIntegral . fromEnum) setting
gtk_app_chooser_widget_set_show_fallback _obj' setting'
touchManagedPtr _obj
return ()
foreign import ccall "gtk_app_chooser_widget_set_show_other" gtk_app_chooser_widget_set_show_other ::
Ptr AppChooserWidget ->
CInt ->
IO ()
appChooserWidgetSetShowOther ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
Bool ->
m ()
appChooserWidgetSetShowOther _obj setting = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let setting' = (fromIntegral . fromEnum) setting
gtk_app_chooser_widget_set_show_other _obj' setting'
touchManagedPtr _obj
return ()
foreign import ccall "gtk_app_chooser_widget_set_show_recommended" gtk_app_chooser_widget_set_show_recommended ::
Ptr AppChooserWidget ->
CInt ->
IO ()
appChooserWidgetSetShowRecommended ::
(MonadIO m, AppChooserWidgetK a) =>
a ->
Bool ->
m ()
appChooserWidgetSetShowRecommended _obj setting = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
let setting' = (fromIntegral . fromEnum) setting
gtk_app_chooser_widget_set_show_recommended _obj' setting'
touchManagedPtr _obj
return ()