{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Handy.Objects.StatusPage
(
StatusPage(..) ,
IsStatusPage ,
toStatusPage ,
#if defined(ENABLE_OVERLOADING)
ResolveStatusPageMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
StatusPageGetDescriptionMethodInfo ,
#endif
statusPageGetDescription ,
#if defined(ENABLE_OVERLOADING)
StatusPageGetIconNameMethodInfo ,
#endif
statusPageGetIconName ,
#if defined(ENABLE_OVERLOADING)
StatusPageGetTitleMethodInfo ,
#endif
statusPageGetTitle ,
statusPageNew ,
#if defined(ENABLE_OVERLOADING)
StatusPageSetDescriptionMethodInfo ,
#endif
statusPageSetDescription ,
#if defined(ENABLE_OVERLOADING)
StatusPageSetIconNameMethodInfo ,
#endif
statusPageSetIconName ,
#if defined(ENABLE_OVERLOADING)
StatusPageSetTitleMethodInfo ,
#endif
statusPageSetTitle ,
#if defined(ENABLE_OVERLOADING)
StatusPageDescriptionPropertyInfo ,
#endif
clearStatusPageDescription ,
constructStatusPageDescription ,
getStatusPageDescription ,
setStatusPageDescription ,
#if defined(ENABLE_OVERLOADING)
statusPageDescription ,
#endif
#if defined(ENABLE_OVERLOADING)
StatusPageIconNamePropertyInfo ,
#endif
clearStatusPageIconName ,
constructStatusPageIconName ,
getStatusPageIconName ,
setStatusPageIconName ,
#if defined(ENABLE_OVERLOADING)
statusPageIconName ,
#endif
#if defined(ENABLE_OVERLOADING)
StatusPageTitlePropertyInfo ,
#endif
clearStatusPageTitle ,
constructStatusPageTitle ,
getStatusPageTitle ,
setStatusPageTitle ,
#if defined(ENABLE_OVERLOADING)
statusPageTitle ,
#endif
) 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.GArray as B.GArray
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.Coerce as Coerce
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 GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Objects.Bin as Gtk.Bin
import qualified GI.Gtk.Objects.Container as Gtk.Container
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype StatusPage = StatusPage (SP.ManagedPtr StatusPage)
deriving (StatusPage -> StatusPage -> Bool
(StatusPage -> StatusPage -> Bool)
-> (StatusPage -> StatusPage -> Bool) -> Eq StatusPage
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StatusPage -> StatusPage -> Bool
$c/= :: StatusPage -> StatusPage -> Bool
== :: StatusPage -> StatusPage -> Bool
$c== :: StatusPage -> StatusPage -> Bool
Eq)
instance SP.ManagedPtrNewtype StatusPage where
toManagedPtr :: StatusPage -> ManagedPtr StatusPage
toManagedPtr (StatusPage ManagedPtr StatusPage
p) = ManagedPtr StatusPage
p
foreign import ccall "hdy_status_page_get_type"
c_hdy_status_page_get_type :: IO B.Types.GType
instance B.Types.TypedObject StatusPage where
glibType :: IO GType
glibType = IO GType
c_hdy_status_page_get_type
instance B.Types.GObject StatusPage
class (SP.GObject o, O.IsDescendantOf StatusPage o) => IsStatusPage o
instance (SP.GObject o, O.IsDescendantOf StatusPage o) => IsStatusPage o
instance O.HasParentTypes StatusPage
type instance O.ParentTypes StatusPage = '[Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toStatusPage :: (MIO.MonadIO m, IsStatusPage o) => o -> m StatusPage
toStatusPage :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> m StatusPage
toStatusPage = IO StatusPage -> m StatusPage
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO StatusPage -> m StatusPage)
-> (o -> IO StatusPage) -> o -> m StatusPage
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr StatusPage -> StatusPage) -> o -> IO StatusPage
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr StatusPage -> StatusPage
StatusPage
instance B.GValue.IsGValue (Maybe StatusPage) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_hdy_status_page_get_type
gvalueSet_ :: Ptr GValue -> Maybe StatusPage -> IO ()
gvalueSet_ Ptr GValue
gv Maybe StatusPage
P.Nothing = Ptr GValue -> Ptr StatusPage -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr StatusPage
forall a. Ptr a
FP.nullPtr :: FP.Ptr StatusPage)
gvalueSet_ Ptr GValue
gv (P.Just StatusPage
obj) = StatusPage -> (Ptr StatusPage -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr StatusPage
obj (Ptr GValue -> Ptr StatusPage -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe StatusPage)
gvalueGet_ Ptr GValue
gv = do
Ptr StatusPage
ptr <- Ptr GValue -> IO (Ptr StatusPage)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr StatusPage)
if Ptr StatusPage
ptr Ptr StatusPage -> Ptr StatusPage -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr StatusPage
forall a. Ptr a
FP.nullPtr
then StatusPage -> Maybe StatusPage
forall a. a -> Maybe a
P.Just (StatusPage -> Maybe StatusPage)
-> IO StatusPage -> IO (Maybe StatusPage)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr StatusPage -> StatusPage)
-> Ptr StatusPage -> IO StatusPage
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr StatusPage -> StatusPage
StatusPage Ptr StatusPage
ptr
else Maybe StatusPage -> IO (Maybe StatusPage)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe StatusPage
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveStatusPageMethod (t :: Symbol) (o :: *) :: * where
ResolveStatusPageMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveStatusPageMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveStatusPageMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveStatusPageMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveStatusPageMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveStatusPageMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveStatusPageMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveStatusPageMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveStatusPageMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveStatusPageMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveStatusPageMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveStatusPageMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveStatusPageMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveStatusPageMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveStatusPageMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveStatusPageMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveStatusPageMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveStatusPageMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveStatusPageMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveStatusPageMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveStatusPageMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveStatusPageMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveStatusPageMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveStatusPageMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveStatusPageMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveStatusPageMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveStatusPageMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveStatusPageMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveStatusPageMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveStatusPageMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveStatusPageMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveStatusPageMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveStatusPageMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveStatusPageMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveStatusPageMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveStatusPageMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveStatusPageMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveStatusPageMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveStatusPageMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveStatusPageMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveStatusPageMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveStatusPageMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveStatusPageMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveStatusPageMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveStatusPageMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveStatusPageMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveStatusPageMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveStatusPageMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveStatusPageMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveStatusPageMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveStatusPageMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveStatusPageMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveStatusPageMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveStatusPageMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveStatusPageMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveStatusPageMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveStatusPageMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveStatusPageMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveStatusPageMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveStatusPageMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveStatusPageMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveStatusPageMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveStatusPageMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveStatusPageMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveStatusPageMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveStatusPageMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveStatusPageMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveStatusPageMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveStatusPageMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveStatusPageMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveStatusPageMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveStatusPageMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveStatusPageMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveStatusPageMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveStatusPageMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveStatusPageMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveStatusPageMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveStatusPageMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveStatusPageMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveStatusPageMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveStatusPageMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveStatusPageMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveStatusPageMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveStatusPageMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveStatusPageMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveStatusPageMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveStatusPageMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveStatusPageMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveStatusPageMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveStatusPageMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveStatusPageMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveStatusPageMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveStatusPageMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveStatusPageMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveStatusPageMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveStatusPageMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveStatusPageMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveStatusPageMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveStatusPageMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveStatusPageMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveStatusPageMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveStatusPageMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveStatusPageMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveStatusPageMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveStatusPageMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveStatusPageMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveStatusPageMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveStatusPageMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveStatusPageMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveStatusPageMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveStatusPageMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveStatusPageMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveStatusPageMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveStatusPageMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveStatusPageMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveStatusPageMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveStatusPageMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveStatusPageMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveStatusPageMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveStatusPageMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveStatusPageMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveStatusPageMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveStatusPageMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveStatusPageMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveStatusPageMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveStatusPageMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveStatusPageMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveStatusPageMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveStatusPageMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveStatusPageMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveStatusPageMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveStatusPageMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveStatusPageMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveStatusPageMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveStatusPageMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveStatusPageMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveStatusPageMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveStatusPageMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveStatusPageMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveStatusPageMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveStatusPageMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveStatusPageMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveStatusPageMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveStatusPageMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveStatusPageMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveStatusPageMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveStatusPageMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveStatusPageMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveStatusPageMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveStatusPageMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveStatusPageMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveStatusPageMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveStatusPageMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveStatusPageMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveStatusPageMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveStatusPageMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveStatusPageMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveStatusPageMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveStatusPageMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveStatusPageMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveStatusPageMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveStatusPageMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveStatusPageMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveStatusPageMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveStatusPageMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveStatusPageMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveStatusPageMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveStatusPageMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveStatusPageMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveStatusPageMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveStatusPageMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveStatusPageMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveStatusPageMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveStatusPageMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveStatusPageMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveStatusPageMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveStatusPageMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveStatusPageMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveStatusPageMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveStatusPageMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveStatusPageMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveStatusPageMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveStatusPageMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveStatusPageMethod "getDescription" o = StatusPageGetDescriptionMethodInfo
ResolveStatusPageMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveStatusPageMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveStatusPageMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveStatusPageMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveStatusPageMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveStatusPageMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveStatusPageMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveStatusPageMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveStatusPageMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveStatusPageMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveStatusPageMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveStatusPageMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveStatusPageMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveStatusPageMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveStatusPageMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveStatusPageMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveStatusPageMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveStatusPageMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveStatusPageMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveStatusPageMethod "getIconName" o = StatusPageGetIconNameMethodInfo
ResolveStatusPageMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveStatusPageMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveStatusPageMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveStatusPageMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveStatusPageMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveStatusPageMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveStatusPageMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveStatusPageMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveStatusPageMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveStatusPageMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveStatusPageMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveStatusPageMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveStatusPageMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveStatusPageMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveStatusPageMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveStatusPageMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveStatusPageMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveStatusPageMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveStatusPageMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveStatusPageMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveStatusPageMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveStatusPageMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveStatusPageMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveStatusPageMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveStatusPageMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveStatusPageMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveStatusPageMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveStatusPageMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveStatusPageMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveStatusPageMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveStatusPageMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveStatusPageMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveStatusPageMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveStatusPageMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveStatusPageMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveStatusPageMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveStatusPageMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveStatusPageMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveStatusPageMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveStatusPageMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveStatusPageMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveStatusPageMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveStatusPageMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveStatusPageMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveStatusPageMethod "getTitle" o = StatusPageGetTitleMethodInfo
ResolveStatusPageMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveStatusPageMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveStatusPageMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveStatusPageMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveStatusPageMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveStatusPageMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveStatusPageMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveStatusPageMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveStatusPageMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveStatusPageMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveStatusPageMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveStatusPageMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveStatusPageMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveStatusPageMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveStatusPageMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveStatusPageMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveStatusPageMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveStatusPageMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveStatusPageMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveStatusPageMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveStatusPageMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveStatusPageMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveStatusPageMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveStatusPageMethod "setDescription" o = StatusPageSetDescriptionMethodInfo
ResolveStatusPageMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveStatusPageMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveStatusPageMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveStatusPageMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveStatusPageMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveStatusPageMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveStatusPageMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveStatusPageMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveStatusPageMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveStatusPageMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveStatusPageMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveStatusPageMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveStatusPageMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveStatusPageMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveStatusPageMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveStatusPageMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveStatusPageMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveStatusPageMethod "setIconName" o = StatusPageSetIconNameMethodInfo
ResolveStatusPageMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveStatusPageMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveStatusPageMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveStatusPageMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveStatusPageMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveStatusPageMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveStatusPageMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveStatusPageMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveStatusPageMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveStatusPageMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveStatusPageMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveStatusPageMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveStatusPageMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveStatusPageMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveStatusPageMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveStatusPageMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveStatusPageMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveStatusPageMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveStatusPageMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveStatusPageMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveStatusPageMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveStatusPageMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveStatusPageMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveStatusPageMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveStatusPageMethod "setTitle" o = StatusPageSetTitleMethodInfo
ResolveStatusPageMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveStatusPageMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveStatusPageMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveStatusPageMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveStatusPageMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveStatusPageMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveStatusPageMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveStatusPageMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveStatusPageMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveStatusPageMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveStatusPageMethod t StatusPage, O.OverloadedMethod info StatusPage p) => OL.IsLabel t (StatusPage -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveStatusPageMethod t StatusPage, O.OverloadedMethod info StatusPage p, R.HasField t StatusPage p) => R.HasField t StatusPage p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveStatusPageMethod t StatusPage, O.OverloadedMethodInfo info StatusPage) => OL.IsLabel t (O.MethodProxy info StatusPage) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getStatusPageDescription :: (MonadIO m, IsStatusPage o) => o -> m (Maybe T.Text)
getStatusPageDescription :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> m (Maybe Text)
getStatusPageDescription o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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
"description"
setStatusPageDescription :: (MonadIO m, IsStatusPage o) => o -> T.Text -> m ()
setStatusPageDescription :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> Text -> m ()
setStatusPageDescription o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"description" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructStatusPageDescription :: (IsStatusPage o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructStatusPageDescription :: forall o (m :: * -> *).
(IsStatusPage o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructStatusPageDescription 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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (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
"description" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearStatusPageDescription :: (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageDescription :: forall (m :: * -> *) o. (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageDescription 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
"description" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data StatusPageDescriptionPropertyInfo
instance AttrInfo StatusPageDescriptionPropertyInfo where
type AttrAllowedOps StatusPageDescriptionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint StatusPageDescriptionPropertyInfo = IsStatusPage
type AttrSetTypeConstraint StatusPageDescriptionPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint StatusPageDescriptionPropertyInfo = (~) T.Text
type AttrTransferType StatusPageDescriptionPropertyInfo = T.Text
type AttrGetType StatusPageDescriptionPropertyInfo = (Maybe T.Text)
type AttrLabel StatusPageDescriptionPropertyInfo = "description"
type AttrOrigin StatusPageDescriptionPropertyInfo = StatusPage
attrGet = getStatusPageDescription
attrSet = setStatusPageDescription
attrTransfer _ v = do
return v
attrConstruct = constructStatusPageDescription
attrClear = clearStatusPageDescription
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.description"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#g:attr:description"
})
#endif
getStatusPageIconName :: (MonadIO m, IsStatusPage o) => o -> m (Maybe T.Text)
getStatusPageIconName :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> m (Maybe Text)
getStatusPageIconName o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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
"icon-name"
setStatusPageIconName :: (MonadIO m, IsStatusPage o) => o -> T.Text -> m ()
setStatusPageIconName :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> Text -> m ()
setStatusPageIconName o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructStatusPageIconName :: (IsStatusPage o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructStatusPageIconName :: forall o (m :: * -> *).
(IsStatusPage o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructStatusPageIconName 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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (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
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearStatusPageIconName :: (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageIconName :: forall (m :: * -> *) o. (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageIconName 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
"icon-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data StatusPageIconNamePropertyInfo
instance AttrInfo StatusPageIconNamePropertyInfo where
type AttrAllowedOps StatusPageIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint StatusPageIconNamePropertyInfo = IsStatusPage
type AttrSetTypeConstraint StatusPageIconNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint StatusPageIconNamePropertyInfo = (~) T.Text
type AttrTransferType StatusPageIconNamePropertyInfo = T.Text
type AttrGetType StatusPageIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel StatusPageIconNamePropertyInfo = "icon-name"
type AttrOrigin StatusPageIconNamePropertyInfo = StatusPage
attrGet = getStatusPageIconName
attrSet = setStatusPageIconName
attrTransfer _ v = do
return v
attrConstruct = constructStatusPageIconName
attrClear = clearStatusPageIconName
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.iconName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#g:attr:iconName"
})
#endif
getStatusPageTitle :: (MonadIO m, IsStatusPage o) => o -> m (Maybe T.Text)
getStatusPageTitle :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> m (Maybe Text)
getStatusPageTitle o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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
"title"
setStatusPageTitle :: (MonadIO m, IsStatusPage o) => o -> T.Text -> m ()
setStatusPageTitle :: forall (m :: * -> *) o.
(MonadIO m, IsStatusPage o) =>
o -> Text -> m ()
setStatusPageTitle o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"title" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructStatusPageTitle :: (IsStatusPage o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructStatusPageTitle :: forall o (m :: * -> *).
(IsStatusPage o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructStatusPageTitle 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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (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
"title" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearStatusPageTitle :: (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageTitle :: forall (m :: * -> *) o. (MonadIO m, IsStatusPage o) => o -> m ()
clearStatusPageTitle 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
"title" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data StatusPageTitlePropertyInfo
instance AttrInfo StatusPageTitlePropertyInfo where
type AttrAllowedOps StatusPageTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint StatusPageTitlePropertyInfo = IsStatusPage
type AttrSetTypeConstraint StatusPageTitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint StatusPageTitlePropertyInfo = (~) T.Text
type AttrTransferType StatusPageTitlePropertyInfo = T.Text
type AttrGetType StatusPageTitlePropertyInfo = (Maybe T.Text)
type AttrLabel StatusPageTitlePropertyInfo = "title"
type AttrOrigin StatusPageTitlePropertyInfo = StatusPage
attrGet = getStatusPageTitle
attrSet = setStatusPageTitle
attrTransfer _ v = do
return v
attrConstruct = constructStatusPageTitle
attrClear = clearStatusPageTitle
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.title"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#g:attr:title"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList StatusPage
type instance O.AttributeList StatusPage = StatusPageAttributeList
type StatusPageAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("description", StatusPageDescriptionPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("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), '("iconName", StatusPageIconNamePropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("title", StatusPageTitlePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
statusPageDescription :: AttrLabelProxy "description"
statusPageDescription = AttrLabelProxy
statusPageIconName :: AttrLabelProxy "iconName"
statusPageIconName = AttrLabelProxy
statusPageTitle :: AttrLabelProxy "title"
statusPageTitle = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList StatusPage = StatusPageSignalList
type StatusPageSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "hdy_status_page_new" hdy_status_page_new ::
IO (Ptr StatusPage)
statusPageNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m StatusPage
statusPageNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m StatusPage
statusPageNew = IO StatusPage -> m StatusPage
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO StatusPage -> m StatusPage) -> IO StatusPage -> m StatusPage
forall a b. (a -> b) -> a -> b
$ do
Ptr StatusPage
result <- IO (Ptr StatusPage)
hdy_status_page_new
Text -> Ptr StatusPage -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"statusPageNew" Ptr StatusPage
result
StatusPage
result' <- ((ManagedPtr StatusPage -> StatusPage)
-> Ptr StatusPage -> IO StatusPage
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr StatusPage -> StatusPage
StatusPage) Ptr StatusPage
result
StatusPage -> IO StatusPage
forall (m :: * -> *) a. Monad m => a -> m a
return StatusPage
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "hdy_status_page_get_description" hdy_status_page_get_description ::
Ptr StatusPage ->
IO CString
statusPageGetDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> m (Maybe T.Text)
statusPageGetDescription :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> m (Maybe Text)
statusPageGetDescription a
self = 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
$ do
Ptr StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr StatusPage -> IO CString
hdy_status_page_get_description Ptr StatusPage
self'
Maybe Text
maybeResult <- CString -> (CString -> IO Text) -> IO (Maybe Text)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull CString
result ((CString -> IO Text) -> IO (Maybe Text))
-> (CString -> IO Text) -> IO (Maybe Text)
forall a b. (a -> b) -> a -> b
$ \CString
result' -> do
Text
result'' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result'
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Text -> IO (Maybe Text)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Text
maybeResult
#if defined(ENABLE_OVERLOADING)
data StatusPageGetDescriptionMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageGetDescriptionMethodInfo a signature where
overloadedMethod = statusPageGetDescription
instance O.OverloadedMethodInfo StatusPageGetDescriptionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageGetDescription",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageGetDescription"
})
#endif
foreign import ccall "hdy_status_page_get_icon_name" hdy_status_page_get_icon_name ::
Ptr StatusPage ->
IO CString
statusPageGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> m (Maybe T.Text)
statusPageGetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> m (Maybe Text)
statusPageGetIconName a
self = 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
$ do
Ptr StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr StatusPage -> IO CString
hdy_status_page_get_icon_name Ptr StatusPage
self'
Maybe Text
maybeResult <- CString -> (CString -> IO Text) -> IO (Maybe Text)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull CString
result ((CString -> IO Text) -> IO (Maybe Text))
-> (CString -> IO Text) -> IO (Maybe Text)
forall a b. (a -> b) -> a -> b
$ \CString
result' -> do
Text
result'' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result'
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Text -> IO (Maybe Text)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Text
maybeResult
#if defined(ENABLE_OVERLOADING)
data StatusPageGetIconNameMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageGetIconNameMethodInfo a signature where
overloadedMethod = statusPageGetIconName
instance O.OverloadedMethodInfo StatusPageGetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageGetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageGetIconName"
})
#endif
foreign import ccall "hdy_status_page_get_title" hdy_status_page_get_title ::
Ptr StatusPage ->
IO CString
statusPageGetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> m (Maybe T.Text)
statusPageGetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> m (Maybe Text)
statusPageGetTitle a
self = 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
$ do
Ptr StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr StatusPage -> IO CString
hdy_status_page_get_title Ptr StatusPage
self'
Maybe Text
maybeResult <- CString -> (CString -> IO Text) -> IO (Maybe Text)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull CString
result ((CString -> IO Text) -> IO (Maybe Text))
-> (CString -> IO Text) -> IO (Maybe Text)
forall a b. (a -> b) -> a -> b
$ \CString
result' -> do
Text
result'' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result'
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Text -> IO (Maybe Text)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Text
maybeResult
#if defined(ENABLE_OVERLOADING)
data StatusPageGetTitleMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageGetTitleMethodInfo a signature where
overloadedMethod = statusPageGetTitle
instance O.OverloadedMethodInfo StatusPageGetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageGetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageGetTitle"
})
#endif
foreign import ccall "hdy_status_page_set_description" hdy_status_page_set_description ::
Ptr StatusPage ->
CString ->
IO ()
statusPageSetDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> Maybe (T.Text)
-> m ()
statusPageSetDescription :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> Maybe Text -> m ()
statusPageSetDescription a
self Maybe Text
description = 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 StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeDescription <- case Maybe Text
description of
Maybe Text
Nothing -> CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jDescription -> do
CString
jDescription' <- Text -> IO CString
textToCString Text
jDescription
CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jDescription'
Ptr StatusPage -> CString -> IO ()
hdy_status_page_set_description Ptr StatusPage
self' CString
maybeDescription
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeDescription
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data StatusPageSetDescriptionMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageSetDescriptionMethodInfo a signature where
overloadedMethod = statusPageSetDescription
instance O.OverloadedMethodInfo StatusPageSetDescriptionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageSetDescription",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageSetDescription"
})
#endif
foreign import ccall "hdy_status_page_set_icon_name" hdy_status_page_set_icon_name ::
Ptr StatusPage ->
CString ->
IO ()
statusPageSetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> Maybe (T.Text)
-> m ()
statusPageSetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> Maybe Text -> m ()
statusPageSetIconName a
self Maybe Text
iconName = 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 StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeIconName <- case Maybe Text
iconName of
Maybe Text
Nothing -> CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jIconName -> do
CString
jIconName' <- Text -> IO CString
textToCString Text
jIconName
CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jIconName'
Ptr StatusPage -> CString -> IO ()
hdy_status_page_set_icon_name Ptr StatusPage
self' CString
maybeIconName
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeIconName
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data StatusPageSetIconNameMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageSetIconNameMethodInfo a signature where
overloadedMethod = statusPageSetIconName
instance O.OverloadedMethodInfo StatusPageSetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageSetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageSetIconName"
})
#endif
foreign import ccall "hdy_status_page_set_title" hdy_status_page_set_title ::
Ptr StatusPage ->
CString ->
IO ()
statusPageSetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsStatusPage a) =>
a
-> Maybe (T.Text)
-> m ()
statusPageSetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsStatusPage a) =>
a -> Maybe Text -> m ()
statusPageSetTitle a
self Maybe Text
title = 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 StatusPage
self' <- a -> IO (Ptr StatusPage)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeTitle <- case Maybe Text
title of
Maybe Text
Nothing -> CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jTitle -> do
CString
jTitle' <- Text -> IO CString
textToCString Text
jTitle
CString -> IO CString
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jTitle'
Ptr StatusPage -> CString -> IO ()
hdy_status_page_set_title Ptr StatusPage
self' CString
maybeTitle
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeTitle
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data StatusPageSetTitleMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsStatusPage a) => O.OverloadedMethod StatusPageSetTitleMethodInfo a signature where
overloadedMethod = statusPageSetTitle
instance O.OverloadedMethodInfo StatusPageSetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.StatusPage.statusPageSetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.1/docs/GI-Handy-Objects-StatusPage.html#v:statusPageSetTitle"
})
#endif