{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.SearchEntry
(
SearchEntry(..) ,
IsSearchEntry ,
toSearchEntry ,
#if defined(ENABLE_OVERLOADING)
ResolveSearchEntryMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
SearchEntryGetKeyCaptureWidgetMethodInfo,
#endif
searchEntryGetKeyCaptureWidget ,
searchEntryNew ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySetKeyCaptureWidgetMethodInfo,
#endif
searchEntrySetKeyCaptureWidget ,
#if defined(ENABLE_OVERLOADING)
SearchEntryActivatesDefaultPropertyInfo ,
#endif
constructSearchEntryActivatesDefault ,
getSearchEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
searchEntryActivatesDefault ,
#endif
setSearchEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
SearchEntryPlaceholderTextPropertyInfo ,
#endif
clearSearchEntryPlaceholderText ,
constructSearchEntryPlaceholderText ,
getSearchEntryPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
searchEntryPlaceholderText ,
#endif
setSearchEntryPlaceholderText ,
C_SearchEntryActivateCallback ,
SearchEntryActivateCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryActivateSignalInfo ,
#endif
afterSearchEntryActivate ,
genClosure_SearchEntryActivate ,
mk_SearchEntryActivateCallback ,
noSearchEntryActivateCallback ,
onSearchEntryActivate ,
wrap_SearchEntryActivateCallback ,
C_SearchEntryNextMatchCallback ,
SearchEntryNextMatchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryNextMatchSignalInfo ,
#endif
afterSearchEntryNextMatch ,
genClosure_SearchEntryNextMatch ,
mk_SearchEntryNextMatchCallback ,
noSearchEntryNextMatchCallback ,
onSearchEntryNextMatch ,
wrap_SearchEntryNextMatchCallback ,
C_SearchEntryPreviousMatchCallback ,
SearchEntryPreviousMatchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryPreviousMatchSignalInfo ,
#endif
afterSearchEntryPreviousMatch ,
genClosure_SearchEntryPreviousMatch ,
mk_SearchEntryPreviousMatchCallback ,
noSearchEntryPreviousMatchCallback ,
onSearchEntryPreviousMatch ,
wrap_SearchEntryPreviousMatchCallback ,
C_SearchEntrySearchChangedCallback ,
SearchEntrySearchChangedCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySearchChangedSignalInfo ,
#endif
afterSearchEntrySearchChanged ,
genClosure_SearchEntrySearchChanged ,
mk_SearchEntrySearchChangedCallback ,
noSearchEntrySearchChangedCallback ,
onSearchEntrySearchChanged ,
wrap_SearchEntrySearchChangedCallback ,
C_SearchEntrySearchStartedCallback ,
SearchEntrySearchStartedCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySearchStartedSignalInfo ,
#endif
afterSearchEntrySearchStarted ,
genClosure_SearchEntrySearchStarted ,
mk_SearchEntrySearchStartedCallback ,
noSearchEntrySearchStartedCallback ,
onSearchEntrySearchStarted ,
wrap_SearchEntrySearchStartedCallback ,
C_SearchEntryStopSearchCallback ,
SearchEntryStopSearchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryStopSearchSignalInfo ,
#endif
afterSearchEntryStopSearch ,
genClosure_SearchEntryStopSearch ,
mk_SearchEntryStopSearchCallback ,
noSearchEntryStopSearchCallback ,
onSearchEntryStopSearch ,
wrap_SearchEntryStopSearchCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype SearchEntry = SearchEntry (SP.ManagedPtr SearchEntry)
deriving (SearchEntry -> SearchEntry -> Bool
(SearchEntry -> SearchEntry -> Bool)
-> (SearchEntry -> SearchEntry -> Bool) -> Eq SearchEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SearchEntry -> SearchEntry -> Bool
$c/= :: SearchEntry -> SearchEntry -> Bool
== :: SearchEntry -> SearchEntry -> Bool
$c== :: SearchEntry -> SearchEntry -> Bool
Eq)
instance SP.ManagedPtrNewtype SearchEntry where
toManagedPtr :: SearchEntry -> ManagedPtr SearchEntry
toManagedPtr (SearchEntry ManagedPtr SearchEntry
p) = ManagedPtr SearchEntry
p
foreign import ccall "gtk_search_entry_get_type"
c_gtk_search_entry_get_type :: IO B.Types.GType
instance B.Types.TypedObject SearchEntry where
glibType :: IO GType
glibType = IO GType
c_gtk_search_entry_get_type
instance B.Types.GObject SearchEntry
instance B.GValue.IsGValue SearchEntry where
toGValue :: SearchEntry -> IO GValue
toGValue SearchEntry
o = do
GType
gtype <- IO GType
c_gtk_search_entry_get_type
SearchEntry -> (Ptr SearchEntry -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr SearchEntry
o (GType
-> (GValue -> Ptr SearchEntry -> IO ())
-> Ptr SearchEntry
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr SearchEntry -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO SearchEntry
fromGValue GValue
gv = do
Ptr SearchEntry
ptr <- GValue -> IO (Ptr SearchEntry)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr SearchEntry)
(ManagedPtr SearchEntry -> SearchEntry)
-> Ptr SearchEntry -> IO SearchEntry
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr SearchEntry -> SearchEntry
SearchEntry Ptr SearchEntry
ptr
class (SP.GObject o, O.IsDescendantOf SearchEntry o) => IsSearchEntry o
instance (SP.GObject o, O.IsDescendantOf SearchEntry o) => IsSearchEntry o
instance O.HasParentTypes SearchEntry
type instance O.ParentTypes SearchEntry = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget, Gtk.Editable.Editable]
toSearchEntry :: (MonadIO m, IsSearchEntry o) => o -> m SearchEntry
toSearchEntry :: o -> m SearchEntry
toSearchEntry = IO SearchEntry -> m SearchEntry
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SearchEntry -> m SearchEntry)
-> (o -> IO SearchEntry) -> o -> m SearchEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr SearchEntry -> SearchEntry) -> o -> IO SearchEntry
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr SearchEntry -> SearchEntry
SearchEntry
#if defined(ENABLE_OVERLOADING)
type family ResolveSearchEntryMethod (t :: Symbol) (o :: *) :: * where
ResolveSearchEntryMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveSearchEntryMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveSearchEntryMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveSearchEntryMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveSearchEntryMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveSearchEntryMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveSearchEntryMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveSearchEntryMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveSearchEntryMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveSearchEntryMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveSearchEntryMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveSearchEntryMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveSearchEntryMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveSearchEntryMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveSearchEntryMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveSearchEntryMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveSearchEntryMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveSearchEntryMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveSearchEntryMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveSearchEntryMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveSearchEntryMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveSearchEntryMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveSearchEntryMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveSearchEntryMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveSearchEntryMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo
ResolveSearchEntryMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo
ResolveSearchEntryMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveSearchEntryMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveSearchEntryMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveSearchEntryMethod "finishDelegate" o = Gtk.Editable.EditableFinishDelegateMethodInfo
ResolveSearchEntryMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveSearchEntryMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveSearchEntryMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveSearchEntryMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveSearchEntryMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveSearchEntryMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveSearchEntryMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveSearchEntryMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveSearchEntryMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveSearchEntryMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveSearchEntryMethod "initDelegate" o = Gtk.Editable.EditableInitDelegateMethodInfo
ResolveSearchEntryMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveSearchEntryMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveSearchEntryMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveSearchEntryMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveSearchEntryMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo
ResolveSearchEntryMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveSearchEntryMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveSearchEntryMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveSearchEntryMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveSearchEntryMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveSearchEntryMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveSearchEntryMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveSearchEntryMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveSearchEntryMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveSearchEntryMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveSearchEntryMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveSearchEntryMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveSearchEntryMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveSearchEntryMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveSearchEntryMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveSearchEntryMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveSearchEntryMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveSearchEntryMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveSearchEntryMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveSearchEntryMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveSearchEntryMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveSearchEntryMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveSearchEntryMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveSearchEntryMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveSearchEntryMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveSearchEntryMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveSearchEntryMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveSearchEntryMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveSearchEntryMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo
ResolveSearchEntryMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveSearchEntryMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveSearchEntryMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveSearchEntryMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveSearchEntryMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveSearchEntryMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveSearchEntryMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveSearchEntryMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveSearchEntryMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveSearchEntryMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveSearchEntryMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveSearchEntryMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveSearchEntryMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveSearchEntryMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveSearchEntryMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveSearchEntryMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveSearchEntryMethod "getAlignment" o = Gtk.Editable.EditableGetAlignmentMethodInfo
ResolveSearchEntryMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveSearchEntryMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveSearchEntryMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveSearchEntryMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveSearchEntryMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveSearchEntryMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveSearchEntryMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveSearchEntryMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo
ResolveSearchEntryMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveSearchEntryMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveSearchEntryMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveSearchEntryMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveSearchEntryMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveSearchEntryMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveSearchEntryMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveSearchEntryMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveSearchEntryMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo
ResolveSearchEntryMethod "getEnableUndo" o = Gtk.Editable.EditableGetEnableUndoMethodInfo
ResolveSearchEntryMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveSearchEntryMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveSearchEntryMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveSearchEntryMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveSearchEntryMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveSearchEntryMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveSearchEntryMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveSearchEntryMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveSearchEntryMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveSearchEntryMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveSearchEntryMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveSearchEntryMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveSearchEntryMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveSearchEntryMethod "getKeyCaptureWidget" o = SearchEntryGetKeyCaptureWidgetMethodInfo
ResolveSearchEntryMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveSearchEntryMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveSearchEntryMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveSearchEntryMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveSearchEntryMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveSearchEntryMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveSearchEntryMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveSearchEntryMethod "getMaxWidthChars" o = Gtk.Editable.EditableGetMaxWidthCharsMethodInfo
ResolveSearchEntryMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveSearchEntryMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveSearchEntryMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveSearchEntryMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveSearchEntryMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveSearchEntryMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveSearchEntryMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveSearchEntryMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo
ResolveSearchEntryMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveSearchEntryMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveSearchEntryMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveSearchEntryMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveSearchEntryMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveSearchEntryMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveSearchEntryMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveSearchEntryMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveSearchEntryMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveSearchEntryMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveSearchEntryMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo
ResolveSearchEntryMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveSearchEntryMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveSearchEntryMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveSearchEntryMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveSearchEntryMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveSearchEntryMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveSearchEntryMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveSearchEntryMethod "getText" o = Gtk.Editable.EditableGetTextMethodInfo
ResolveSearchEntryMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveSearchEntryMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveSearchEntryMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveSearchEntryMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveSearchEntryMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveSearchEntryMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveSearchEntryMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveSearchEntryMethod "getWidthChars" o = Gtk.Editable.EditableGetWidthCharsMethodInfo
ResolveSearchEntryMethod "setAlignment" o = Gtk.Editable.EditableSetAlignmentMethodInfo
ResolveSearchEntryMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveSearchEntryMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveSearchEntryMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveSearchEntryMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveSearchEntryMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveSearchEntryMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveSearchEntryMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveSearchEntryMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveSearchEntryMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveSearchEntryMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveSearchEntryMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo
ResolveSearchEntryMethod "setEnableUndo" o = Gtk.Editable.EditableSetEnableUndoMethodInfo
ResolveSearchEntryMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveSearchEntryMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveSearchEntryMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveSearchEntryMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveSearchEntryMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveSearchEntryMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveSearchEntryMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveSearchEntryMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveSearchEntryMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveSearchEntryMethod "setKeyCaptureWidget" o = SearchEntrySetKeyCaptureWidgetMethodInfo
ResolveSearchEntryMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveSearchEntryMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveSearchEntryMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveSearchEntryMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveSearchEntryMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveSearchEntryMethod "setMaxWidthChars" o = Gtk.Editable.EditableSetMaxWidthCharsMethodInfo
ResolveSearchEntryMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveSearchEntryMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveSearchEntryMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveSearchEntryMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveSearchEntryMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo
ResolveSearchEntryMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveSearchEntryMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveSearchEntryMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveSearchEntryMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveSearchEntryMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveSearchEntryMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveSearchEntryMethod "setText" o = Gtk.Editable.EditableSetTextMethodInfo
ResolveSearchEntryMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveSearchEntryMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveSearchEntryMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveSearchEntryMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveSearchEntryMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveSearchEntryMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveSearchEntryMethod "setWidthChars" o = Gtk.Editable.EditableSetWidthCharsMethodInfo
ResolveSearchEntryMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveSearchEntryMethod t SearchEntry, O.MethodInfo info SearchEntry p) => OL.IsLabel t (SearchEntry -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type SearchEntryActivateCallback =
IO ()
noSearchEntryActivateCallback :: Maybe SearchEntryActivateCallback
noSearchEntryActivateCallback :: Maybe (IO ())
noSearchEntryActivateCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryActivateCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryActivateCallback :: C_SearchEntryActivateCallback -> IO (FunPtr C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate :: MonadIO m => SearchEntryActivateCallback -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryActivateCallback ::
SearchEntryActivateCallback ->
C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntryActivate :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryActivateCallback -> m SignalHandlerId
onSearchEntryActivate :: a -> IO () -> m SignalHandlerId
onSearchEntryActivate a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryActivate :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryActivateCallback -> m SignalHandlerId
afterSearchEntryActivate :: a -> IO () -> m SignalHandlerId
afterSearchEntryActivate a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryActivateSignalInfo
instance SignalInfo SearchEntryActivateSignalInfo where
type HaskellCallbackType SearchEntryActivateSignalInfo = SearchEntryActivateCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryActivateCallback cb
cb'' <- mk_SearchEntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' connectMode detail
#endif
type SearchEntryNextMatchCallback =
IO ()
noSearchEntryNextMatchCallback :: Maybe SearchEntryNextMatchCallback
noSearchEntryNextMatchCallback :: Maybe (IO ())
noSearchEntryNextMatchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryNextMatchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryNextMatchCallback :: C_SearchEntryNextMatchCallback -> IO (FunPtr C_SearchEntryNextMatchCallback)
genClosure_SearchEntryNextMatch :: MonadIO m => SearchEntryNextMatchCallback -> m (GClosure C_SearchEntryNextMatchCallback)
genClosure_SearchEntryNextMatch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryNextMatch IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryNextMatchCallback ::
SearchEntryNextMatchCallback ->
C_SearchEntryNextMatchCallback
wrap_SearchEntryNextMatchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntryNextMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryNextMatchCallback -> m SignalHandlerId
onSearchEntryNextMatch :: a -> IO () -> m SignalHandlerId
onSearchEntryNextMatch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"next-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryNextMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryNextMatchCallback -> m SignalHandlerId
afterSearchEntryNextMatch :: a -> IO () -> m SignalHandlerId
afterSearchEntryNextMatch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"next-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryNextMatchSignalInfo
instance SignalInfo SearchEntryNextMatchSignalInfo where
type HaskellCallbackType SearchEntryNextMatchSignalInfo = SearchEntryNextMatchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryNextMatchCallback cb
cb'' <- mk_SearchEntryNextMatchCallback cb'
connectSignalFunPtr obj "next-match" cb'' connectMode detail
#endif
type SearchEntryPreviousMatchCallback =
IO ()
noSearchEntryPreviousMatchCallback :: Maybe SearchEntryPreviousMatchCallback
noSearchEntryPreviousMatchCallback :: Maybe (IO ())
noSearchEntryPreviousMatchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryPreviousMatchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryPreviousMatchCallback :: C_SearchEntryPreviousMatchCallback -> IO (FunPtr C_SearchEntryPreviousMatchCallback)
genClosure_SearchEntryPreviousMatch :: MonadIO m => SearchEntryPreviousMatchCallback -> m (GClosure C_SearchEntryPreviousMatchCallback)
genClosure_SearchEntryPreviousMatch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryPreviousMatch IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryPreviousMatchCallback ::
SearchEntryPreviousMatchCallback ->
C_SearchEntryPreviousMatchCallback
wrap_SearchEntryPreviousMatchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntryPreviousMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryPreviousMatchCallback -> m SignalHandlerId
onSearchEntryPreviousMatch :: a -> IO () -> m SignalHandlerId
onSearchEntryPreviousMatch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"previous-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryPreviousMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryPreviousMatchCallback -> m SignalHandlerId
afterSearchEntryPreviousMatch :: a -> IO () -> m SignalHandlerId
afterSearchEntryPreviousMatch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"previous-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryPreviousMatchSignalInfo
instance SignalInfo SearchEntryPreviousMatchSignalInfo where
type HaskellCallbackType SearchEntryPreviousMatchSignalInfo = SearchEntryPreviousMatchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryPreviousMatchCallback cb
cb'' <- mk_SearchEntryPreviousMatchCallback cb'
connectSignalFunPtr obj "previous-match" cb'' connectMode detail
#endif
type SearchEntrySearchChangedCallback =
IO ()
noSearchEntrySearchChangedCallback :: Maybe SearchEntrySearchChangedCallback
noSearchEntrySearchChangedCallback :: Maybe (IO ())
noSearchEntrySearchChangedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntrySearchChangedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntrySearchChangedCallback :: C_SearchEntrySearchChangedCallback -> IO (FunPtr C_SearchEntrySearchChangedCallback)
genClosure_SearchEntrySearchChanged :: MonadIO m => SearchEntrySearchChangedCallback -> m (GClosure C_SearchEntrySearchChangedCallback)
genClosure_SearchEntrySearchChanged :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntrySearchChanged IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntrySearchChangedCallback ::
SearchEntrySearchChangedCallback ->
C_SearchEntrySearchChangedCallback
wrap_SearchEntrySearchChangedCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntrySearchChanged :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchChangedCallback -> m SignalHandlerId
onSearchEntrySearchChanged :: a -> IO () -> m SignalHandlerId
onSearchEntrySearchChanged a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"search-changed" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntrySearchChanged :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchChangedCallback -> m SignalHandlerId
afterSearchEntrySearchChanged :: a -> IO () -> m SignalHandlerId
afterSearchEntrySearchChanged a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"search-changed" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntrySearchChangedSignalInfo
instance SignalInfo SearchEntrySearchChangedSignalInfo where
type HaskellCallbackType SearchEntrySearchChangedSignalInfo = SearchEntrySearchChangedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntrySearchChangedCallback cb
cb'' <- mk_SearchEntrySearchChangedCallback cb'
connectSignalFunPtr obj "search-changed" cb'' connectMode detail
#endif
type SearchEntrySearchStartedCallback =
IO ()
noSearchEntrySearchStartedCallback :: Maybe SearchEntrySearchStartedCallback
noSearchEntrySearchStartedCallback :: Maybe (IO ())
noSearchEntrySearchStartedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntrySearchStartedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntrySearchStartedCallback :: C_SearchEntrySearchStartedCallback -> IO (FunPtr C_SearchEntrySearchStartedCallback)
genClosure_SearchEntrySearchStarted :: MonadIO m => SearchEntrySearchStartedCallback -> m (GClosure C_SearchEntrySearchStartedCallback)
genClosure_SearchEntrySearchStarted :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntrySearchStarted IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntrySearchStartedCallback ::
SearchEntrySearchStartedCallback ->
C_SearchEntrySearchStartedCallback
wrap_SearchEntrySearchStartedCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntrySearchStarted :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchStartedCallback -> m SignalHandlerId
onSearchEntrySearchStarted :: a -> IO () -> m SignalHandlerId
onSearchEntrySearchStarted a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"search-started" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntrySearchStarted :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchStartedCallback -> m SignalHandlerId
afterSearchEntrySearchStarted :: a -> IO () -> m SignalHandlerId
afterSearchEntrySearchStarted a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"search-started" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntrySearchStartedSignalInfo
instance SignalInfo SearchEntrySearchStartedSignalInfo where
type HaskellCallbackType SearchEntrySearchStartedSignalInfo = SearchEntrySearchStartedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntrySearchStartedCallback cb
cb'' <- mk_SearchEntrySearchStartedCallback cb'
connectSignalFunPtr obj "search-started" cb'' connectMode detail
#endif
type SearchEntryStopSearchCallback =
IO ()
noSearchEntryStopSearchCallback :: Maybe SearchEntryStopSearchCallback
noSearchEntryStopSearchCallback :: Maybe (IO ())
noSearchEntryStopSearchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryStopSearchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryStopSearchCallback :: C_SearchEntryStopSearchCallback -> IO (FunPtr C_SearchEntryStopSearchCallback)
genClosure_SearchEntryStopSearch :: MonadIO m => SearchEntryStopSearchCallback -> m (GClosure C_SearchEntryStopSearchCallback)
genClosure_SearchEntryStopSearch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryStopSearch IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryStopSearchCallback ::
SearchEntryStopSearchCallback ->
C_SearchEntryStopSearchCallback
wrap_SearchEntryStopSearchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onSearchEntryStopSearch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryStopSearchCallback -> m SignalHandlerId
onSearchEntryStopSearch :: a -> IO () -> m SignalHandlerId
onSearchEntryStopSearch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"stop-search" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryStopSearch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryStopSearchCallback -> m SignalHandlerId
afterSearchEntryStopSearch :: a -> IO () -> m SignalHandlerId
afterSearchEntryStopSearch a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"stop-search" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryStopSearchSignalInfo
instance SignalInfo SearchEntryStopSearchSignalInfo where
type HaskellCallbackType SearchEntryStopSearchSignalInfo = SearchEntryStopSearchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryStopSearchCallback cb
cb'' <- mk_SearchEntryStopSearchCallback cb'
connectSignalFunPtr obj "stop-search" cb'' connectMode detail
#endif
getSearchEntryActivatesDefault :: (MonadIO m, IsSearchEntry o) => o -> m Bool
getSearchEntryActivatesDefault :: o -> m Bool
getSearchEntryActivatesDefault o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"activates-default"
setSearchEntryActivatesDefault :: (MonadIO m, IsSearchEntry o) => o -> Bool -> m ()
setSearchEntryActivatesDefault :: o -> Bool -> m ()
setSearchEntryActivatesDefault o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"activates-default" Bool
val
constructSearchEntryActivatesDefault :: (IsSearchEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructSearchEntryActivatesDefault :: Bool -> m (GValueConstruct o)
constructSearchEntryActivatesDefault Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"activates-default" Bool
val
#if defined(ENABLE_OVERLOADING)
data SearchEntryActivatesDefaultPropertyInfo
instance AttrInfo SearchEntryActivatesDefaultPropertyInfo where
type AttrAllowedOps SearchEntryActivatesDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SearchEntryActivatesDefaultPropertyInfo = IsSearchEntry
type AttrSetTypeConstraint SearchEntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SearchEntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferType SearchEntryActivatesDefaultPropertyInfo = Bool
type AttrGetType SearchEntryActivatesDefaultPropertyInfo = Bool
type AttrLabel SearchEntryActivatesDefaultPropertyInfo = "activates-default"
type AttrOrigin SearchEntryActivatesDefaultPropertyInfo = SearchEntry
attrGet = getSearchEntryActivatesDefault
attrSet = setSearchEntryActivatesDefault
attrTransfer _ v = do
return v
attrConstruct = constructSearchEntryActivatesDefault
attrClear = undefined
#endif
getSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> m (Maybe T.Text)
getSearchEntryPlaceholderText :: o -> m (Maybe Text)
getSearchEntryPlaceholderText o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"placeholder-text"
setSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> T.Text -> m ()
setSearchEntryPlaceholderText :: o -> Text -> m ()
setSearchEntryPlaceholderText o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSearchEntryPlaceholderText :: (IsSearchEntry o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructSearchEntryPlaceholderText :: Text -> m (GValueConstruct o)
constructSearchEntryPlaceholderText Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> m ()
clearSearchEntryPlaceholderText :: o -> m ()
clearSearchEntryPlaceholderText o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"placeholder-text" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SearchEntryPlaceholderTextPropertyInfo
instance AttrInfo SearchEntryPlaceholderTextPropertyInfo where
type AttrAllowedOps SearchEntryPlaceholderTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SearchEntryPlaceholderTextPropertyInfo = IsSearchEntry
type AttrSetTypeConstraint SearchEntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SearchEntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferType SearchEntryPlaceholderTextPropertyInfo = T.Text
type AttrGetType SearchEntryPlaceholderTextPropertyInfo = (Maybe T.Text)
type AttrLabel SearchEntryPlaceholderTextPropertyInfo = "placeholder-text"
type AttrOrigin SearchEntryPlaceholderTextPropertyInfo = SearchEntry
attrGet = getSearchEntryPlaceholderText
attrSet = setSearchEntryPlaceholderText
attrTransfer _ v = do
return v
attrConstruct = constructSearchEntryPlaceholderText
attrClear = clearSearchEntryPlaceholderText
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList SearchEntry
type instance O.AttributeList SearchEntry = SearchEntryAttributeList
type SearchEntryAttributeList = ('[ '("activatesDefault", SearchEntryActivatesDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("cursorPosition", Gtk.Editable.EditableCursorPositionPropertyInfo), '("editable", Gtk.Editable.EditableEditablePropertyInfo), '("enableUndo", Gtk.Editable.EditableEnableUndoPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxWidthChars", Gtk.Editable.EditableMaxWidthCharsPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("placeholderText", SearchEntryPlaceholderTextPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("selectionBound", Gtk.Editable.EditableSelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("text", Gtk.Editable.EditableTextPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", Gtk.Editable.EditableWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("xalign", Gtk.Editable.EditableXalignPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
searchEntryActivatesDefault :: AttrLabelProxy "activatesDefault"
searchEntryActivatesDefault = AttrLabelProxy
searchEntryPlaceholderText :: AttrLabelProxy "placeholderText"
searchEntryPlaceholderText = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList SearchEntry = SearchEntrySignalList
type SearchEntrySignalList = ('[ '("activate", SearchEntryActivateSignalInfo), '("changed", Gtk.Editable.EditableChangedSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("nextMatch", SearchEntryNextMatchSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("previousMatch", SearchEntryPreviousMatchSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("searchChanged", SearchEntrySearchChangedSignalInfo), '("searchStarted", SearchEntrySearchStartedSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("stopSearch", SearchEntryStopSearchSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_search_entry_new" gtk_search_entry_new ::
IO (Ptr SearchEntry)
searchEntryNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m SearchEntry
searchEntryNew :: m SearchEntry
searchEntryNew = IO SearchEntry -> m SearchEntry
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SearchEntry -> m SearchEntry)
-> IO SearchEntry -> m SearchEntry
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
result <- IO (Ptr SearchEntry)
gtk_search_entry_new
Text -> Ptr SearchEntry -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"searchEntryNew" Ptr SearchEntry
result
SearchEntry
result' <- ((ManagedPtr SearchEntry -> SearchEntry)
-> Ptr SearchEntry -> IO SearchEntry
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr SearchEntry -> SearchEntry
SearchEntry) Ptr SearchEntry
result
SearchEntry -> IO SearchEntry
forall (m :: * -> *) a. Monad m => a -> m a
return SearchEntry
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_search_entry_get_key_capture_widget" gtk_search_entry_get_key_capture_widget ::
Ptr SearchEntry ->
IO (Ptr Gtk.Widget.Widget)
searchEntryGetKeyCaptureWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsSearchEntry a) =>
a
-> m Gtk.Widget.Widget
searchEntryGetKeyCaptureWidget :: a -> m Widget
searchEntryGetKeyCaptureWidget a
entry = IO Widget -> m Widget
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Widget -> m Widget) -> IO Widget -> m Widget
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
entry' <- a -> IO (Ptr SearchEntry)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
entry
Ptr Widget
result <- Ptr SearchEntry -> IO (Ptr Widget)
gtk_search_entry_get_key_capture_widget Ptr SearchEntry
entry'
Text -> Ptr Widget -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"searchEntryGetKeyCaptureWidget" Ptr Widget
result
Widget
result' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
entry
Widget -> IO Widget
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result'
#if defined(ENABLE_OVERLOADING)
data SearchEntryGetKeyCaptureWidgetMethodInfo
instance (signature ~ (m Gtk.Widget.Widget), MonadIO m, IsSearchEntry a) => O.MethodInfo SearchEntryGetKeyCaptureWidgetMethodInfo a signature where
overloadedMethod = searchEntryGetKeyCaptureWidget
#endif
foreign import ccall "gtk_search_entry_set_key_capture_widget" gtk_search_entry_set_key_capture_widget ::
Ptr SearchEntry ->
Ptr Gtk.Widget.Widget ->
IO ()
searchEntrySetKeyCaptureWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsSearchEntry a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
searchEntrySetKeyCaptureWidget :: a -> Maybe b -> m ()
searchEntrySetKeyCaptureWidget a
entry Maybe b
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
entry' <- a -> IO (Ptr SearchEntry)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
entry
Ptr Widget
maybeWidget <- case Maybe b
widget of
Maybe b
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just b
jWidget -> do
Ptr Widget
jWidget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jWidget
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jWidget'
Ptr SearchEntry -> Ptr Widget -> IO ()
gtk_search_entry_set_key_capture_widget Ptr SearchEntry
entry' Ptr Widget
maybeWidget
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
entry
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
widget b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data SearchEntrySetKeyCaptureWidgetMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsSearchEntry a, Gtk.Widget.IsWidget b) => O.MethodInfo SearchEntrySetKeyCaptureWidgetMethodInfo a signature where
overloadedMethod = searchEntrySetKeyCaptureWidget
#endif