{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.CellRendererText
(
CellRendererText(..) ,
IsCellRendererText ,
toCellRendererText ,
noCellRendererText ,
#if defined(ENABLE_OVERLOADING)
ResolveCellRendererTextMethod ,
#endif
cellRendererTextNew ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextSetFixedHeightFromFontMethodInfo,
#endif
cellRendererTextSetFixedHeightFromFont ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextAlignSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextAlignSet ,
#endif
constructCellRendererTextAlignSet ,
getCellRendererTextAlignSet ,
setCellRendererTextAlignSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextAlignmentPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextAlignment ,
#endif
constructCellRendererTextAlignment ,
getCellRendererTextAlignment ,
setCellRendererTextAlignment ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextAttributesPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextAttributes ,
#endif
clearCellRendererTextAttributes ,
constructCellRendererTextAttributes ,
getCellRendererTextAttributes ,
setCellRendererTextAttributes ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextBackgroundPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextBackground ,
#endif
clearCellRendererTextBackground ,
constructCellRendererTextBackground ,
setCellRendererTextBackground ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextBackgroundGdkPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextBackgroundGdk ,
#endif
clearCellRendererTextBackgroundGdk ,
constructCellRendererTextBackgroundGdk ,
getCellRendererTextBackgroundGdk ,
setCellRendererTextBackgroundGdk ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextBackgroundRgbaPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextBackgroundRgba ,
#endif
clearCellRendererTextBackgroundRgba ,
constructCellRendererTextBackgroundRgba ,
getCellRendererTextBackgroundRgba ,
setCellRendererTextBackgroundRgba ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextBackgroundSetPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextBackgroundSet ,
#endif
constructCellRendererTextBackgroundSet ,
getCellRendererTextBackgroundSet ,
setCellRendererTextBackgroundSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextEditablePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextEditable ,
#endif
constructCellRendererTextEditable ,
getCellRendererTextEditable ,
setCellRendererTextEditable ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextEditableSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextEditableSet ,
#endif
constructCellRendererTextEditableSet ,
getCellRendererTextEditableSet ,
setCellRendererTextEditableSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextEllipsizePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextEllipsize ,
#endif
constructCellRendererTextEllipsize ,
getCellRendererTextEllipsize ,
setCellRendererTextEllipsize ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextEllipsizeSetPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextEllipsizeSet ,
#endif
constructCellRendererTextEllipsizeSet ,
getCellRendererTextEllipsizeSet ,
setCellRendererTextEllipsizeSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextFamilyPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextFamily ,
#endif
clearCellRendererTextFamily ,
constructCellRendererTextFamily ,
getCellRendererTextFamily ,
setCellRendererTextFamily ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextFamilySetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextFamilySet ,
#endif
constructCellRendererTextFamilySet ,
getCellRendererTextFamilySet ,
setCellRendererTextFamilySet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextFontPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextFont ,
#endif
clearCellRendererTextFont ,
constructCellRendererTextFont ,
getCellRendererTextFont ,
setCellRendererTextFont ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextFontDescPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextFontDesc ,
#endif
clearCellRendererTextFontDesc ,
constructCellRendererTextFontDesc ,
getCellRendererTextFontDesc ,
setCellRendererTextFontDesc ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextForegroundPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextForeground ,
#endif
clearCellRendererTextForeground ,
constructCellRendererTextForeground ,
setCellRendererTextForeground ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextForegroundGdkPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextForegroundGdk ,
#endif
clearCellRendererTextForegroundGdk ,
constructCellRendererTextForegroundGdk ,
getCellRendererTextForegroundGdk ,
setCellRendererTextForegroundGdk ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextForegroundRgbaPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextForegroundRgba ,
#endif
clearCellRendererTextForegroundRgba ,
constructCellRendererTextForegroundRgba ,
getCellRendererTextForegroundRgba ,
setCellRendererTextForegroundRgba ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextForegroundSetPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextForegroundSet ,
#endif
constructCellRendererTextForegroundSet ,
getCellRendererTextForegroundSet ,
setCellRendererTextForegroundSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextLanguagePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextLanguage ,
#endif
clearCellRendererTextLanguage ,
constructCellRendererTextLanguage ,
getCellRendererTextLanguage ,
setCellRendererTextLanguage ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextLanguageSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextLanguageSet ,
#endif
constructCellRendererTextLanguageSet ,
getCellRendererTextLanguageSet ,
setCellRendererTextLanguageSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextMarkupPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextMarkup ,
#endif
clearCellRendererTextMarkup ,
constructCellRendererTextMarkup ,
setCellRendererTextMarkup ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextMaxWidthCharsPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextMaxWidthChars ,
#endif
constructCellRendererTextMaxWidthChars ,
getCellRendererTextMaxWidthChars ,
setCellRendererTextMaxWidthChars ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextPlaceholderTextPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextPlaceholderText ,
#endif
clearCellRendererTextPlaceholderText ,
constructCellRendererTextPlaceholderText,
getCellRendererTextPlaceholderText ,
setCellRendererTextPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextRisePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextRise ,
#endif
constructCellRendererTextRise ,
getCellRendererTextRise ,
setCellRendererTextRise ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextRiseSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextRiseSet ,
#endif
constructCellRendererTextRiseSet ,
getCellRendererTextRiseSet ,
setCellRendererTextRiseSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextScalePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextScale ,
#endif
constructCellRendererTextScale ,
getCellRendererTextScale ,
setCellRendererTextScale ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextScaleSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextScaleSet ,
#endif
constructCellRendererTextScaleSet ,
getCellRendererTextScaleSet ,
setCellRendererTextScaleSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextSingleParagraphModePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextSingleParagraphMode ,
#endif
constructCellRendererTextSingleParagraphMode,
getCellRendererTextSingleParagraphMode ,
setCellRendererTextSingleParagraphMode ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextSizePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextSize ,
#endif
constructCellRendererTextSize ,
getCellRendererTextSize ,
setCellRendererTextSize ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextSizePointsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextSizePoints ,
#endif
constructCellRendererTextSizePoints ,
getCellRendererTextSizePoints ,
setCellRendererTextSizePoints ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextSizeSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextSizeSet ,
#endif
constructCellRendererTextSizeSet ,
getCellRendererTextSizeSet ,
setCellRendererTextSizeSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStretchPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStretch ,
#endif
constructCellRendererTextStretch ,
getCellRendererTextStretch ,
setCellRendererTextStretch ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStretchSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStretchSet ,
#endif
constructCellRendererTextStretchSet ,
getCellRendererTextStretchSet ,
setCellRendererTextStretchSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStrikethroughPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStrikethrough ,
#endif
constructCellRendererTextStrikethrough ,
getCellRendererTextStrikethrough ,
setCellRendererTextStrikethrough ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStrikethroughSetPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStrikethroughSet ,
#endif
constructCellRendererTextStrikethroughSet,
getCellRendererTextStrikethroughSet ,
setCellRendererTextStrikethroughSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStylePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStyle ,
#endif
constructCellRendererTextStyle ,
getCellRendererTextStyle ,
setCellRendererTextStyle ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextStyleSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextStyleSet ,
#endif
constructCellRendererTextStyleSet ,
getCellRendererTextStyleSet ,
setCellRendererTextStyleSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextTextPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextText ,
#endif
clearCellRendererTextText ,
constructCellRendererTextText ,
getCellRendererTextText ,
setCellRendererTextText ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextUnderlinePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextUnderline ,
#endif
constructCellRendererTextUnderline ,
getCellRendererTextUnderline ,
setCellRendererTextUnderline ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextUnderlineSetPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextUnderlineSet ,
#endif
constructCellRendererTextUnderlineSet ,
getCellRendererTextUnderlineSet ,
setCellRendererTextUnderlineSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextVariantPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextVariant ,
#endif
constructCellRendererTextVariant ,
getCellRendererTextVariant ,
setCellRendererTextVariant ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextVariantSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextVariantSet ,
#endif
constructCellRendererTextVariantSet ,
getCellRendererTextVariantSet ,
setCellRendererTextVariantSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextWeightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextWeight ,
#endif
constructCellRendererTextWeight ,
getCellRendererTextWeight ,
setCellRendererTextWeight ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextWeightSetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextWeightSet ,
#endif
constructCellRendererTextWeightSet ,
getCellRendererTextWeightSet ,
setCellRendererTextWeightSet ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextWidthCharsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextWidthChars ,
#endif
constructCellRendererTextWidthChars ,
getCellRendererTextWidthChars ,
setCellRendererTextWidthChars ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextWrapModePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextWrapMode ,
#endif
constructCellRendererTextWrapMode ,
getCellRendererTextWrapMode ,
setCellRendererTextWrapMode ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextWrapWidthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextWrapWidth ,
#endif
constructCellRendererTextWrapWidth ,
getCellRendererTextWrapWidth ,
setCellRendererTextWrapWidth ,
C_CellRendererTextEditedCallback ,
CellRendererTextEditedCallback ,
#if defined(ENABLE_OVERLOADING)
CellRendererTextEditedSignalInfo ,
#endif
afterCellRendererTextEdited ,
genClosure_CellRendererTextEdited ,
mk_CellRendererTextEditedCallback ,
noCellRendererTextEditedCallback ,
onCellRendererTextEdited ,
wrap_CellRendererTextEditedCallback ,
) 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.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 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.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Structs.Color as Gdk.Color
import qualified GI.Gdk.Structs.RGBA as Gdk.RGBA
import {-# SOURCE #-} qualified GI.Gtk.Objects.CellRenderer as Gtk.CellRenderer
import qualified GI.Pango.Enums as Pango.Enums
import qualified GI.Pango.Structs.AttrList as Pango.AttrList
import qualified GI.Pango.Structs.FontDescription as Pango.FontDescription
newtype CellRendererText = CellRendererText (ManagedPtr CellRendererText)
deriving (CellRendererText -> CellRendererText -> Bool
(CellRendererText -> CellRendererText -> Bool)
-> (CellRendererText -> CellRendererText -> Bool)
-> Eq CellRendererText
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CellRendererText -> CellRendererText -> Bool
$c/= :: CellRendererText -> CellRendererText -> Bool
== :: CellRendererText -> CellRendererText -> Bool
$c== :: CellRendererText -> CellRendererText -> Bool
Eq)
foreign import ccall "gtk_cell_renderer_text_get_type"
c_gtk_cell_renderer_text_get_type :: IO GType
instance GObject CellRendererText where
gobjectType :: IO GType
gobjectType = IO GType
c_gtk_cell_renderer_text_get_type
instance B.GValue.IsGValue CellRendererText where
toGValue :: CellRendererText -> IO GValue
toGValue o :: CellRendererText
o = do
GType
gtype <- IO GType
c_gtk_cell_renderer_text_get_type
CellRendererText
-> (Ptr CellRendererText -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr CellRendererText
o (GType
-> (GValue -> Ptr CellRendererText -> IO ())
-> Ptr CellRendererText
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr CellRendererText -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO CellRendererText
fromGValue gv :: GValue
gv = do
Ptr CellRendererText
ptr <- GValue -> IO (Ptr CellRendererText)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr CellRendererText)
(ManagedPtr CellRendererText -> CellRendererText)
-> Ptr CellRendererText -> IO CellRendererText
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr CellRendererText -> CellRendererText
CellRendererText Ptr CellRendererText
ptr
class (GObject o, O.IsDescendantOf CellRendererText o) => IsCellRendererText o
instance (GObject o, O.IsDescendantOf CellRendererText o) => IsCellRendererText o
instance O.HasParentTypes CellRendererText
type instance O.ParentTypes CellRendererText = '[Gtk.CellRenderer.CellRenderer, GObject.Object.Object]
toCellRendererText :: (MonadIO m, IsCellRendererText o) => o -> m CellRendererText
toCellRendererText :: o -> m CellRendererText
toCellRendererText = IO CellRendererText -> m CellRendererText
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CellRendererText -> m CellRendererText)
-> (o -> IO CellRendererText) -> o -> m CellRendererText
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr CellRendererText -> CellRendererText)
-> o -> IO CellRendererText
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr CellRendererText -> CellRendererText
CellRendererText
noCellRendererText :: Maybe CellRendererText
noCellRendererText :: Maybe CellRendererText
noCellRendererText = Maybe CellRendererText
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveCellRendererTextMethod (t :: Symbol) (o :: *) :: * where
ResolveCellRendererTextMethod "activate" o = Gtk.CellRenderer.CellRendererActivateMethodInfo
ResolveCellRendererTextMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveCellRendererTextMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveCellRendererTextMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveCellRendererTextMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveCellRendererTextMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveCellRendererTextMethod "isActivatable" o = Gtk.CellRenderer.CellRendererIsActivatableMethodInfo
ResolveCellRendererTextMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveCellRendererTextMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveCellRendererTextMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveCellRendererTextMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveCellRendererTextMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveCellRendererTextMethod "render" o = Gtk.CellRenderer.CellRendererRenderMethodInfo
ResolveCellRendererTextMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveCellRendererTextMethod "startEditing" o = Gtk.CellRenderer.CellRendererStartEditingMethodInfo
ResolveCellRendererTextMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveCellRendererTextMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveCellRendererTextMethod "stopEditing" o = Gtk.CellRenderer.CellRendererStopEditingMethodInfo
ResolveCellRendererTextMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveCellRendererTextMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveCellRendererTextMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveCellRendererTextMethod "getAlignedArea" o = Gtk.CellRenderer.CellRendererGetAlignedAreaMethodInfo
ResolveCellRendererTextMethod "getAlignment" o = Gtk.CellRenderer.CellRendererGetAlignmentMethodInfo
ResolveCellRendererTextMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveCellRendererTextMethod "getFixedSize" o = Gtk.CellRenderer.CellRendererGetFixedSizeMethodInfo
ResolveCellRendererTextMethod "getPadding" o = Gtk.CellRenderer.CellRendererGetPaddingMethodInfo
ResolveCellRendererTextMethod "getPreferredHeight" o = Gtk.CellRenderer.CellRendererGetPreferredHeightMethodInfo
ResolveCellRendererTextMethod "getPreferredHeightForWidth" o = Gtk.CellRenderer.CellRendererGetPreferredHeightForWidthMethodInfo
ResolveCellRendererTextMethod "getPreferredSize" o = Gtk.CellRenderer.CellRendererGetPreferredSizeMethodInfo
ResolveCellRendererTextMethod "getPreferredWidth" o = Gtk.CellRenderer.CellRendererGetPreferredWidthMethodInfo
ResolveCellRendererTextMethod "getPreferredWidthForHeight" o = Gtk.CellRenderer.CellRendererGetPreferredWidthForHeightMethodInfo
ResolveCellRendererTextMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveCellRendererTextMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveCellRendererTextMethod "getRequestMode" o = Gtk.CellRenderer.CellRendererGetRequestModeMethodInfo
ResolveCellRendererTextMethod "getSensitive" o = Gtk.CellRenderer.CellRendererGetSensitiveMethodInfo
ResolveCellRendererTextMethod "getSize" o = Gtk.CellRenderer.CellRendererGetSizeMethodInfo
ResolveCellRendererTextMethod "getState" o = Gtk.CellRenderer.CellRendererGetStateMethodInfo
ResolveCellRendererTextMethod "getVisible" o = Gtk.CellRenderer.CellRendererGetVisibleMethodInfo
ResolveCellRendererTextMethod "setAlignment" o = Gtk.CellRenderer.CellRendererSetAlignmentMethodInfo
ResolveCellRendererTextMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveCellRendererTextMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveCellRendererTextMethod "setFixedHeightFromFont" o = CellRendererTextSetFixedHeightFromFontMethodInfo
ResolveCellRendererTextMethod "setFixedSize" o = Gtk.CellRenderer.CellRendererSetFixedSizeMethodInfo
ResolveCellRendererTextMethod "setPadding" o = Gtk.CellRenderer.CellRendererSetPaddingMethodInfo
ResolveCellRendererTextMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveCellRendererTextMethod "setSensitive" o = Gtk.CellRenderer.CellRendererSetSensitiveMethodInfo
ResolveCellRendererTextMethod "setVisible" o = Gtk.CellRenderer.CellRendererSetVisibleMethodInfo
ResolveCellRendererTextMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveCellRendererTextMethod t CellRendererText, O.MethodInfo info CellRendererText p) => OL.IsLabel t (CellRendererText -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type CellRendererTextEditedCallback =
T.Text
-> T.Text
-> IO ()
noCellRendererTextEditedCallback :: Maybe CellRendererTextEditedCallback
noCellRendererTextEditedCallback :: Maybe CellRendererTextEditedCallback
noCellRendererTextEditedCallback = Maybe CellRendererTextEditedCallback
forall a. Maybe a
Nothing
type C_CellRendererTextEditedCallback =
Ptr () ->
CString ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CellRendererTextEditedCallback :: C_CellRendererTextEditedCallback -> IO (FunPtr C_CellRendererTextEditedCallback)
genClosure_CellRendererTextEdited :: MonadIO m => CellRendererTextEditedCallback -> m (GClosure C_CellRendererTextEditedCallback)
genClosure_CellRendererTextEdited :: CellRendererTextEditedCallback
-> m (GClosure C_CellRendererTextEditedCallback)
genClosure_CellRendererTextEdited cb :: CellRendererTextEditedCallback
cb = IO (GClosure C_CellRendererTextEditedCallback)
-> m (GClosure C_CellRendererTextEditedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_CellRendererTextEditedCallback)
-> m (GClosure C_CellRendererTextEditedCallback))
-> IO (GClosure C_CellRendererTextEditedCallback)
-> m (GClosure C_CellRendererTextEditedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_CellRendererTextEditedCallback
cb' = CellRendererTextEditedCallback -> C_CellRendererTextEditedCallback
wrap_CellRendererTextEditedCallback CellRendererTextEditedCallback
cb
C_CellRendererTextEditedCallback
-> IO (FunPtr C_CellRendererTextEditedCallback)
mk_CellRendererTextEditedCallback C_CellRendererTextEditedCallback
cb' IO (FunPtr C_CellRendererTextEditedCallback)
-> (FunPtr C_CellRendererTextEditedCallback
-> IO (GClosure C_CellRendererTextEditedCallback))
-> IO (GClosure C_CellRendererTextEditedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_CellRendererTextEditedCallback
-> IO (GClosure C_CellRendererTextEditedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_CellRendererTextEditedCallback ::
CellRendererTextEditedCallback ->
C_CellRendererTextEditedCallback
wrap_CellRendererTextEditedCallback :: CellRendererTextEditedCallback -> C_CellRendererTextEditedCallback
wrap_CellRendererTextEditedCallback _cb :: CellRendererTextEditedCallback
_cb _ path :: CString
path newText :: CString
newText _ = do
Text
path' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
path
Text
newText' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
newText
CellRendererTextEditedCallback
_cb Text
path' Text
newText'
onCellRendererTextEdited :: (IsCellRendererText a, MonadIO m) => a -> CellRendererTextEditedCallback -> m SignalHandlerId
onCellRendererTextEdited :: a -> CellRendererTextEditedCallback -> m SignalHandlerId
onCellRendererTextEdited obj :: a
obj cb :: CellRendererTextEditedCallback
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_CellRendererTextEditedCallback
cb' = CellRendererTextEditedCallback -> C_CellRendererTextEditedCallback
wrap_CellRendererTextEditedCallback CellRendererTextEditedCallback
cb
FunPtr C_CellRendererTextEditedCallback
cb'' <- C_CellRendererTextEditedCallback
-> IO (FunPtr C_CellRendererTextEditedCallback)
mk_CellRendererTextEditedCallback C_CellRendererTextEditedCallback
cb'
a
-> Text
-> FunPtr C_CellRendererTextEditedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "edited" FunPtr C_CellRendererTextEditedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterCellRendererTextEdited :: (IsCellRendererText a, MonadIO m) => a -> CellRendererTextEditedCallback -> m SignalHandlerId
afterCellRendererTextEdited :: a -> CellRendererTextEditedCallback -> m SignalHandlerId
afterCellRendererTextEdited obj :: a
obj cb :: CellRendererTextEditedCallback
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_CellRendererTextEditedCallback
cb' = CellRendererTextEditedCallback -> C_CellRendererTextEditedCallback
wrap_CellRendererTextEditedCallback CellRendererTextEditedCallback
cb
FunPtr C_CellRendererTextEditedCallback
cb'' <- C_CellRendererTextEditedCallback
-> IO (FunPtr C_CellRendererTextEditedCallback)
mk_CellRendererTextEditedCallback C_CellRendererTextEditedCallback
cb'
a
-> Text
-> FunPtr C_CellRendererTextEditedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "edited" FunPtr C_CellRendererTextEditedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data CellRendererTextEditedSignalInfo
instance SignalInfo CellRendererTextEditedSignalInfo where
type HaskellCallbackType CellRendererTextEditedSignalInfo = CellRendererTextEditedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_CellRendererTextEditedCallback cb
cb'' <- mk_CellRendererTextEditedCallback cb'
connectSignalFunPtr obj "edited" cb'' connectMode detail
#endif
getCellRendererTextAlignSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextAlignSet :: o -> m Bool
getCellRendererTextAlignSet obj :: 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 "align-set"
setCellRendererTextAlignSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextAlignSet :: o -> Bool -> m ()
setCellRendererTextAlignSet obj :: o
obj val :: 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 "align-set" Bool
val
constructCellRendererTextAlignSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextAlignSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextAlignSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "align-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextAlignSetPropertyInfo
instance AttrInfo CellRendererTextAlignSetPropertyInfo where
type AttrAllowedOps CellRendererTextAlignSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextAlignSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextAlignSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextAlignSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextAlignSetPropertyInfo = Bool
type AttrGetType CellRendererTextAlignSetPropertyInfo = Bool
type AttrLabel CellRendererTextAlignSetPropertyInfo = "align-set"
type AttrOrigin CellRendererTextAlignSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextAlignSet
attrSet = setCellRendererTextAlignSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextAlignSet
attrClear = undefined
#endif
getCellRendererTextAlignment :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.Alignment
getCellRendererTextAlignment :: o -> m Alignment
getCellRendererTextAlignment obj :: o
obj = IO Alignment -> m Alignment
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Alignment -> m Alignment) -> IO Alignment -> m Alignment
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Alignment
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "alignment"
setCellRendererTextAlignment :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.Alignment -> m ()
setCellRendererTextAlignment :: o -> Alignment -> m ()
setCellRendererTextAlignment obj :: o
obj val :: Alignment
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 -> Alignment -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "alignment" Alignment
val
constructCellRendererTextAlignment :: (IsCellRendererText o) => Pango.Enums.Alignment -> IO (GValueConstruct o)
constructCellRendererTextAlignment :: Alignment -> IO (GValueConstruct o)
constructCellRendererTextAlignment val :: Alignment
val = String -> Alignment -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "alignment" Alignment
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextAlignmentPropertyInfo
instance AttrInfo CellRendererTextAlignmentPropertyInfo where
type AttrAllowedOps CellRendererTextAlignmentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextAlignmentPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextAlignmentPropertyInfo = (~) Pango.Enums.Alignment
type AttrTransferTypeConstraint CellRendererTextAlignmentPropertyInfo = (~) Pango.Enums.Alignment
type AttrTransferType CellRendererTextAlignmentPropertyInfo = Pango.Enums.Alignment
type AttrGetType CellRendererTextAlignmentPropertyInfo = Pango.Enums.Alignment
type AttrLabel CellRendererTextAlignmentPropertyInfo = "alignment"
type AttrOrigin CellRendererTextAlignmentPropertyInfo = CellRendererText
attrGet = getCellRendererTextAlignment
attrSet = setCellRendererTextAlignment
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextAlignment
attrClear = undefined
#endif
getCellRendererTextAttributes :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Pango.AttrList.AttrList)
getCellRendererTextAttributes :: o -> m (Maybe AttrList)
getCellRendererTextAttributes obj :: o
obj = IO (Maybe AttrList) -> m (Maybe AttrList)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe AttrList) -> m (Maybe AttrList))
-> IO (Maybe AttrList) -> m (Maybe AttrList)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr AttrList -> AttrList)
-> IO (Maybe AttrList)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "attributes" ManagedPtr AttrList -> AttrList
Pango.AttrList.AttrList
setCellRendererTextAttributes :: (MonadIO m, IsCellRendererText o) => o -> Pango.AttrList.AttrList -> m ()
setCellRendererTextAttributes :: o -> AttrList -> m ()
setCellRendererTextAttributes obj :: o
obj val :: AttrList
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 AttrList -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "attributes" (AttrList -> Maybe AttrList
forall a. a -> Maybe a
Just AttrList
val)
constructCellRendererTextAttributes :: (IsCellRendererText o) => Pango.AttrList.AttrList -> IO (GValueConstruct o)
constructCellRendererTextAttributes :: AttrList -> IO (GValueConstruct o)
constructCellRendererTextAttributes val :: AttrList
val = String -> Maybe AttrList -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "attributes" (AttrList -> Maybe AttrList
forall a. a -> Maybe a
Just AttrList
val)
clearCellRendererTextAttributes :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextAttributes :: o -> m ()
clearCellRendererTextAttributes obj :: 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 AttrList -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "attributes" (Maybe AttrList
forall a. Maybe a
Nothing :: Maybe Pango.AttrList.AttrList)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextAttributesPropertyInfo
instance AttrInfo CellRendererTextAttributesPropertyInfo where
type AttrAllowedOps CellRendererTextAttributesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextAttributesPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrTransferTypeConstraint CellRendererTextAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrTransferType CellRendererTextAttributesPropertyInfo = Pango.AttrList.AttrList
type AttrGetType CellRendererTextAttributesPropertyInfo = (Maybe Pango.AttrList.AttrList)
type AttrLabel CellRendererTextAttributesPropertyInfo = "attributes"
type AttrOrigin CellRendererTextAttributesPropertyInfo = CellRendererText
attrGet = getCellRendererTextAttributes
attrSet = setCellRendererTextAttributes
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextAttributes
attrClear = clearCellRendererTextAttributes
#endif
setCellRendererTextBackground :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextBackground :: o -> Text -> m ()
setCellRendererTextBackground obj :: o
obj val :: 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 "background" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextBackground :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextBackground :: Text -> IO (GValueConstruct o)
constructCellRendererTextBackground val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "background" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextBackground :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextBackground :: o -> m ()
clearCellRendererTextBackground obj :: 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 "background" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextBackgroundPropertyInfo
instance AttrInfo CellRendererTextBackgroundPropertyInfo where
type AttrAllowedOps CellRendererTextBackgroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextBackgroundPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextBackgroundPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextBackgroundPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextBackgroundPropertyInfo = T.Text
type AttrGetType CellRendererTextBackgroundPropertyInfo = ()
type AttrLabel CellRendererTextBackgroundPropertyInfo = "background"
type AttrOrigin CellRendererTextBackgroundPropertyInfo = CellRendererText
attrGet = undefined
attrSet = setCellRendererTextBackground
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextBackground
attrClear = clearCellRendererTextBackground
#endif
getCellRendererTextBackgroundGdk :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Gdk.Color.Color)
getCellRendererTextBackgroundGdk :: o -> m (Maybe Color)
getCellRendererTextBackgroundGdk obj :: o
obj = IO (Maybe Color) -> m (Maybe Color)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Color) -> m (Maybe Color))
-> IO (Maybe Color) -> m (Maybe Color)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Color -> Color) -> IO (Maybe Color)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "background-gdk" ManagedPtr Color -> Color
Gdk.Color.Color
setCellRendererTextBackgroundGdk :: (MonadIO m, IsCellRendererText o) => o -> Gdk.Color.Color -> m ()
setCellRendererTextBackgroundGdk :: o -> Color -> m ()
setCellRendererTextBackgroundGdk obj :: o
obj val :: Color
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 Color -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "background-gdk" (Color -> Maybe Color
forall a. a -> Maybe a
Just Color
val)
constructCellRendererTextBackgroundGdk :: (IsCellRendererText o) => Gdk.Color.Color -> IO (GValueConstruct o)
constructCellRendererTextBackgroundGdk :: Color -> IO (GValueConstruct o)
constructCellRendererTextBackgroundGdk val :: Color
val = String -> Maybe Color -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "background-gdk" (Color -> Maybe Color
forall a. a -> Maybe a
Just Color
val)
clearCellRendererTextBackgroundGdk :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextBackgroundGdk :: o -> m ()
clearCellRendererTextBackgroundGdk obj :: 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 Color -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "background-gdk" (Maybe Color
forall a. Maybe a
Nothing :: Maybe Gdk.Color.Color)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextBackgroundGdkPropertyInfo
instance AttrInfo CellRendererTextBackgroundGdkPropertyInfo where
type AttrAllowedOps CellRendererTextBackgroundGdkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextBackgroundGdkPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextBackgroundGdkPropertyInfo = (~) Gdk.Color.Color
type AttrTransferTypeConstraint CellRendererTextBackgroundGdkPropertyInfo = (~) Gdk.Color.Color
type AttrTransferType CellRendererTextBackgroundGdkPropertyInfo = Gdk.Color.Color
type AttrGetType CellRendererTextBackgroundGdkPropertyInfo = (Maybe Gdk.Color.Color)
type AttrLabel CellRendererTextBackgroundGdkPropertyInfo = "background-gdk"
type AttrOrigin CellRendererTextBackgroundGdkPropertyInfo = CellRendererText
attrGet = getCellRendererTextBackgroundGdk
attrSet = setCellRendererTextBackgroundGdk
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextBackgroundGdk
attrClear = clearCellRendererTextBackgroundGdk
#endif
getCellRendererTextBackgroundRgba :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Gdk.RGBA.RGBA)
getCellRendererTextBackgroundRgba :: o -> m (Maybe RGBA)
getCellRendererTextBackgroundRgba obj :: o
obj = IO (Maybe RGBA) -> m (Maybe RGBA)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe RGBA) -> m (Maybe RGBA))
-> IO (Maybe RGBA) -> m (Maybe RGBA)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr RGBA -> RGBA) -> IO (Maybe RGBA)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "background-rgba" ManagedPtr RGBA -> RGBA
Gdk.RGBA.RGBA
setCellRendererTextBackgroundRgba :: (MonadIO m, IsCellRendererText o) => o -> Gdk.RGBA.RGBA -> m ()
setCellRendererTextBackgroundRgba :: o -> RGBA -> m ()
setCellRendererTextBackgroundRgba obj :: o
obj val :: RGBA
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 RGBA -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "background-rgba" (RGBA -> Maybe RGBA
forall a. a -> Maybe a
Just RGBA
val)
constructCellRendererTextBackgroundRgba :: (IsCellRendererText o) => Gdk.RGBA.RGBA -> IO (GValueConstruct o)
constructCellRendererTextBackgroundRgba :: RGBA -> IO (GValueConstruct o)
constructCellRendererTextBackgroundRgba val :: RGBA
val = String -> Maybe RGBA -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "background-rgba" (RGBA -> Maybe RGBA
forall a. a -> Maybe a
Just RGBA
val)
clearCellRendererTextBackgroundRgba :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextBackgroundRgba :: o -> m ()
clearCellRendererTextBackgroundRgba obj :: 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 RGBA -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "background-rgba" (Maybe RGBA
forall a. Maybe a
Nothing :: Maybe Gdk.RGBA.RGBA)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextBackgroundRgbaPropertyInfo
instance AttrInfo CellRendererTextBackgroundRgbaPropertyInfo where
type AttrAllowedOps CellRendererTextBackgroundRgbaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextBackgroundRgbaPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextBackgroundRgbaPropertyInfo = (~) Gdk.RGBA.RGBA
type AttrTransferTypeConstraint CellRendererTextBackgroundRgbaPropertyInfo = (~) Gdk.RGBA.RGBA
type AttrTransferType CellRendererTextBackgroundRgbaPropertyInfo = Gdk.RGBA.RGBA
type AttrGetType CellRendererTextBackgroundRgbaPropertyInfo = (Maybe Gdk.RGBA.RGBA)
type AttrLabel CellRendererTextBackgroundRgbaPropertyInfo = "background-rgba"
type AttrOrigin CellRendererTextBackgroundRgbaPropertyInfo = CellRendererText
attrGet = getCellRendererTextBackgroundRgba
attrSet = setCellRendererTextBackgroundRgba
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextBackgroundRgba
attrClear = clearCellRendererTextBackgroundRgba
#endif
getCellRendererTextBackgroundSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextBackgroundSet :: o -> m Bool
getCellRendererTextBackgroundSet obj :: 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 "background-set"
setCellRendererTextBackgroundSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextBackgroundSet :: o -> Bool -> m ()
setCellRendererTextBackgroundSet obj :: o
obj val :: 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 "background-set" Bool
val
constructCellRendererTextBackgroundSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextBackgroundSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextBackgroundSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "background-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextBackgroundSetPropertyInfo
instance AttrInfo CellRendererTextBackgroundSetPropertyInfo where
type AttrAllowedOps CellRendererTextBackgroundSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextBackgroundSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextBackgroundSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextBackgroundSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextBackgroundSetPropertyInfo = Bool
type AttrGetType CellRendererTextBackgroundSetPropertyInfo = Bool
type AttrLabel CellRendererTextBackgroundSetPropertyInfo = "background-set"
type AttrOrigin CellRendererTextBackgroundSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextBackgroundSet
attrSet = setCellRendererTextBackgroundSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextBackgroundSet
attrClear = undefined
#endif
getCellRendererTextEditable :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextEditable :: o -> m Bool
getCellRendererTextEditable obj :: 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 "editable"
setCellRendererTextEditable :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextEditable :: o -> Bool -> m ()
setCellRendererTextEditable obj :: o
obj val :: 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 "editable" Bool
val
constructCellRendererTextEditable :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextEditable :: Bool -> IO (GValueConstruct o)
constructCellRendererTextEditable val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "editable" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextEditablePropertyInfo
instance AttrInfo CellRendererTextEditablePropertyInfo where
type AttrAllowedOps CellRendererTextEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextEditablePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextEditablePropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextEditablePropertyInfo = (~) Bool
type AttrTransferType CellRendererTextEditablePropertyInfo = Bool
type AttrGetType CellRendererTextEditablePropertyInfo = Bool
type AttrLabel CellRendererTextEditablePropertyInfo = "editable"
type AttrOrigin CellRendererTextEditablePropertyInfo = CellRendererText
attrGet = getCellRendererTextEditable
attrSet = setCellRendererTextEditable
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextEditable
attrClear = undefined
#endif
getCellRendererTextEditableSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextEditableSet :: o -> m Bool
getCellRendererTextEditableSet obj :: 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 "editable-set"
setCellRendererTextEditableSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextEditableSet :: o -> Bool -> m ()
setCellRendererTextEditableSet obj :: o
obj val :: 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 "editable-set" Bool
val
constructCellRendererTextEditableSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextEditableSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextEditableSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "editable-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextEditableSetPropertyInfo
instance AttrInfo CellRendererTextEditableSetPropertyInfo where
type AttrAllowedOps CellRendererTextEditableSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextEditableSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextEditableSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextEditableSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextEditableSetPropertyInfo = Bool
type AttrGetType CellRendererTextEditableSetPropertyInfo = Bool
type AttrLabel CellRendererTextEditableSetPropertyInfo = "editable-set"
type AttrOrigin CellRendererTextEditableSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextEditableSet
attrSet = setCellRendererTextEditableSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextEditableSet
attrClear = undefined
#endif
getCellRendererTextEllipsize :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.EllipsizeMode
getCellRendererTextEllipsize :: o -> m EllipsizeMode
getCellRendererTextEllipsize obj :: o
obj = IO EllipsizeMode -> m EllipsizeMode
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO EllipsizeMode -> m EllipsizeMode)
-> IO EllipsizeMode -> m EllipsizeMode
forall a b. (a -> b) -> a -> b
$ o -> String -> IO EllipsizeMode
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "ellipsize"
setCellRendererTextEllipsize :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.EllipsizeMode -> m ()
setCellRendererTextEllipsize :: o -> EllipsizeMode -> m ()
setCellRendererTextEllipsize obj :: o
obj val :: EllipsizeMode
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 -> EllipsizeMode -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "ellipsize" EllipsizeMode
val
constructCellRendererTextEllipsize :: (IsCellRendererText o) => Pango.Enums.EllipsizeMode -> IO (GValueConstruct o)
constructCellRendererTextEllipsize :: EllipsizeMode -> IO (GValueConstruct o)
constructCellRendererTextEllipsize val :: EllipsizeMode
val = String -> EllipsizeMode -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "ellipsize" EllipsizeMode
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextEllipsizePropertyInfo
instance AttrInfo CellRendererTextEllipsizePropertyInfo where
type AttrAllowedOps CellRendererTextEllipsizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextEllipsizePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextEllipsizePropertyInfo = (~) Pango.Enums.EllipsizeMode
type AttrTransferTypeConstraint CellRendererTextEllipsizePropertyInfo = (~) Pango.Enums.EllipsizeMode
type AttrTransferType CellRendererTextEllipsizePropertyInfo = Pango.Enums.EllipsizeMode
type AttrGetType CellRendererTextEllipsizePropertyInfo = Pango.Enums.EllipsizeMode
type AttrLabel CellRendererTextEllipsizePropertyInfo = "ellipsize"
type AttrOrigin CellRendererTextEllipsizePropertyInfo = CellRendererText
attrGet = getCellRendererTextEllipsize
attrSet = setCellRendererTextEllipsize
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextEllipsize
attrClear = undefined
#endif
getCellRendererTextEllipsizeSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextEllipsizeSet :: o -> m Bool
getCellRendererTextEllipsizeSet obj :: 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 "ellipsize-set"
setCellRendererTextEllipsizeSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextEllipsizeSet :: o -> Bool -> m ()
setCellRendererTextEllipsizeSet obj :: o
obj val :: 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 "ellipsize-set" Bool
val
constructCellRendererTextEllipsizeSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextEllipsizeSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextEllipsizeSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "ellipsize-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextEllipsizeSetPropertyInfo
instance AttrInfo CellRendererTextEllipsizeSetPropertyInfo where
type AttrAllowedOps CellRendererTextEllipsizeSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextEllipsizeSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextEllipsizeSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextEllipsizeSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextEllipsizeSetPropertyInfo = Bool
type AttrGetType CellRendererTextEllipsizeSetPropertyInfo = Bool
type AttrLabel CellRendererTextEllipsizeSetPropertyInfo = "ellipsize-set"
type AttrOrigin CellRendererTextEllipsizeSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextEllipsizeSet
attrSet = setCellRendererTextEllipsizeSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextEllipsizeSet
attrClear = undefined
#endif
getCellRendererTextFamily :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe T.Text)
getCellRendererTextFamily :: o -> m (Maybe Text)
getCellRendererTextFamily obj :: 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 "family"
setCellRendererTextFamily :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextFamily :: o -> Text -> m ()
setCellRendererTextFamily obj :: o
obj val :: 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 "family" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextFamily :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextFamily :: Text -> IO (GValueConstruct o)
constructCellRendererTextFamily val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "family" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextFamily :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextFamily :: o -> m ()
clearCellRendererTextFamily obj :: 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 "family" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextFamilyPropertyInfo
instance AttrInfo CellRendererTextFamilyPropertyInfo where
type AttrAllowedOps CellRendererTextFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextFamilyPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextFamilyPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextFamilyPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextFamilyPropertyInfo = T.Text
type AttrGetType CellRendererTextFamilyPropertyInfo = (Maybe T.Text)
type AttrLabel CellRendererTextFamilyPropertyInfo = "family"
type AttrOrigin CellRendererTextFamilyPropertyInfo = CellRendererText
attrGet = getCellRendererTextFamily
attrSet = setCellRendererTextFamily
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextFamily
attrClear = clearCellRendererTextFamily
#endif
getCellRendererTextFamilySet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextFamilySet :: o -> m Bool
getCellRendererTextFamilySet obj :: 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 "family-set"
setCellRendererTextFamilySet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextFamilySet :: o -> Bool -> m ()
setCellRendererTextFamilySet obj :: o
obj val :: 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 "family-set" Bool
val
constructCellRendererTextFamilySet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextFamilySet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextFamilySet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "family-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextFamilySetPropertyInfo
instance AttrInfo CellRendererTextFamilySetPropertyInfo where
type AttrAllowedOps CellRendererTextFamilySetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextFamilySetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextFamilySetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextFamilySetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextFamilySetPropertyInfo = Bool
type AttrGetType CellRendererTextFamilySetPropertyInfo = Bool
type AttrLabel CellRendererTextFamilySetPropertyInfo = "family-set"
type AttrOrigin CellRendererTextFamilySetPropertyInfo = CellRendererText
attrGet = getCellRendererTextFamilySet
attrSet = setCellRendererTextFamilySet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextFamilySet
attrClear = undefined
#endif
getCellRendererTextFont :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe T.Text)
getCellRendererTextFont :: o -> m (Maybe Text)
getCellRendererTextFont obj :: 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 "font"
setCellRendererTextFont :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextFont :: o -> Text -> m ()
setCellRendererTextFont obj :: o
obj val :: 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 "font" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextFont :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextFont :: Text -> IO (GValueConstruct o)
constructCellRendererTextFont val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "font" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextFont :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextFont :: o -> m ()
clearCellRendererTextFont obj :: 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 "font" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextFontPropertyInfo
instance AttrInfo CellRendererTextFontPropertyInfo where
type AttrAllowedOps CellRendererTextFontPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextFontPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextFontPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextFontPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextFontPropertyInfo = T.Text
type AttrGetType CellRendererTextFontPropertyInfo = (Maybe T.Text)
type AttrLabel CellRendererTextFontPropertyInfo = "font"
type AttrOrigin CellRendererTextFontPropertyInfo = CellRendererText
attrGet = getCellRendererTextFont
attrSet = setCellRendererTextFont
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextFont
attrClear = clearCellRendererTextFont
#endif
getCellRendererTextFontDesc :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Pango.FontDescription.FontDescription)
getCellRendererTextFontDesc :: o -> m (Maybe FontDescription)
getCellRendererTextFontDesc obj :: o
obj = IO (Maybe FontDescription) -> m (Maybe FontDescription)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe FontDescription) -> m (Maybe FontDescription))
-> IO (Maybe FontDescription) -> m (Maybe FontDescription)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr FontDescription -> FontDescription)
-> IO (Maybe FontDescription)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "font-desc" ManagedPtr FontDescription -> FontDescription
Pango.FontDescription.FontDescription
setCellRendererTextFontDesc :: (MonadIO m, IsCellRendererText o) => o -> Pango.FontDescription.FontDescription -> m ()
setCellRendererTextFontDesc :: o -> FontDescription -> m ()
setCellRendererTextFontDesc obj :: o
obj val :: FontDescription
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 FontDescription -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "font-desc" (FontDescription -> Maybe FontDescription
forall a. a -> Maybe a
Just FontDescription
val)
constructCellRendererTextFontDesc :: (IsCellRendererText o) => Pango.FontDescription.FontDescription -> IO (GValueConstruct o)
constructCellRendererTextFontDesc :: FontDescription -> IO (GValueConstruct o)
constructCellRendererTextFontDesc val :: FontDescription
val = String -> Maybe FontDescription -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "font-desc" (FontDescription -> Maybe FontDescription
forall a. a -> Maybe a
Just FontDescription
val)
clearCellRendererTextFontDesc :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextFontDesc :: o -> m ()
clearCellRendererTextFontDesc obj :: 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 FontDescription -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "font-desc" (Maybe FontDescription
forall a. Maybe a
Nothing :: Maybe Pango.FontDescription.FontDescription)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextFontDescPropertyInfo
instance AttrInfo CellRendererTextFontDescPropertyInfo where
type AttrAllowedOps CellRendererTextFontDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextFontDescPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextFontDescPropertyInfo = (~) Pango.FontDescription.FontDescription
type AttrTransferTypeConstraint CellRendererTextFontDescPropertyInfo = (~) Pango.FontDescription.FontDescription
type AttrTransferType CellRendererTextFontDescPropertyInfo = Pango.FontDescription.FontDescription
type AttrGetType CellRendererTextFontDescPropertyInfo = (Maybe Pango.FontDescription.FontDescription)
type AttrLabel CellRendererTextFontDescPropertyInfo = "font-desc"
type AttrOrigin CellRendererTextFontDescPropertyInfo = CellRendererText
attrGet = getCellRendererTextFontDesc
attrSet = setCellRendererTextFontDesc
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextFontDesc
attrClear = clearCellRendererTextFontDesc
#endif
setCellRendererTextForeground :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextForeground :: o -> Text -> m ()
setCellRendererTextForeground obj :: o
obj val :: 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 "foreground" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextForeground :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextForeground :: Text -> IO (GValueConstruct o)
constructCellRendererTextForeground val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "foreground" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextForeground :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextForeground :: o -> m ()
clearCellRendererTextForeground obj :: 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 "foreground" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextForegroundPropertyInfo
instance AttrInfo CellRendererTextForegroundPropertyInfo where
type AttrAllowedOps CellRendererTextForegroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextForegroundPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextForegroundPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextForegroundPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextForegroundPropertyInfo = T.Text
type AttrGetType CellRendererTextForegroundPropertyInfo = ()
type AttrLabel CellRendererTextForegroundPropertyInfo = "foreground"
type AttrOrigin CellRendererTextForegroundPropertyInfo = CellRendererText
attrGet = undefined
attrSet = setCellRendererTextForeground
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextForeground
attrClear = clearCellRendererTextForeground
#endif
getCellRendererTextForegroundGdk :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Gdk.Color.Color)
getCellRendererTextForegroundGdk :: o -> m (Maybe Color)
getCellRendererTextForegroundGdk obj :: o
obj = IO (Maybe Color) -> m (Maybe Color)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Color) -> m (Maybe Color))
-> IO (Maybe Color) -> m (Maybe Color)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Color -> Color) -> IO (Maybe Color)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "foreground-gdk" ManagedPtr Color -> Color
Gdk.Color.Color
setCellRendererTextForegroundGdk :: (MonadIO m, IsCellRendererText o) => o -> Gdk.Color.Color -> m ()
setCellRendererTextForegroundGdk :: o -> Color -> m ()
setCellRendererTextForegroundGdk obj :: o
obj val :: Color
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 Color -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "foreground-gdk" (Color -> Maybe Color
forall a. a -> Maybe a
Just Color
val)
constructCellRendererTextForegroundGdk :: (IsCellRendererText o) => Gdk.Color.Color -> IO (GValueConstruct o)
constructCellRendererTextForegroundGdk :: Color -> IO (GValueConstruct o)
constructCellRendererTextForegroundGdk val :: Color
val = String -> Maybe Color -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "foreground-gdk" (Color -> Maybe Color
forall a. a -> Maybe a
Just Color
val)
clearCellRendererTextForegroundGdk :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextForegroundGdk :: o -> m ()
clearCellRendererTextForegroundGdk obj :: 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 Color -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "foreground-gdk" (Maybe Color
forall a. Maybe a
Nothing :: Maybe Gdk.Color.Color)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextForegroundGdkPropertyInfo
instance AttrInfo CellRendererTextForegroundGdkPropertyInfo where
type AttrAllowedOps CellRendererTextForegroundGdkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextForegroundGdkPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextForegroundGdkPropertyInfo = (~) Gdk.Color.Color
type AttrTransferTypeConstraint CellRendererTextForegroundGdkPropertyInfo = (~) Gdk.Color.Color
type AttrTransferType CellRendererTextForegroundGdkPropertyInfo = Gdk.Color.Color
type AttrGetType CellRendererTextForegroundGdkPropertyInfo = (Maybe Gdk.Color.Color)
type AttrLabel CellRendererTextForegroundGdkPropertyInfo = "foreground-gdk"
type AttrOrigin CellRendererTextForegroundGdkPropertyInfo = CellRendererText
attrGet = getCellRendererTextForegroundGdk
attrSet = setCellRendererTextForegroundGdk
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextForegroundGdk
attrClear = clearCellRendererTextForegroundGdk
#endif
getCellRendererTextForegroundRgba :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe Gdk.RGBA.RGBA)
getCellRendererTextForegroundRgba :: o -> m (Maybe RGBA)
getCellRendererTextForegroundRgba obj :: o
obj = IO (Maybe RGBA) -> m (Maybe RGBA)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe RGBA) -> m (Maybe RGBA))
-> IO (Maybe RGBA) -> m (Maybe RGBA)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr RGBA -> RGBA) -> IO (Maybe RGBA)
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj "foreground-rgba" ManagedPtr RGBA -> RGBA
Gdk.RGBA.RGBA
setCellRendererTextForegroundRgba :: (MonadIO m, IsCellRendererText o) => o -> Gdk.RGBA.RGBA -> m ()
setCellRendererTextForegroundRgba :: o -> RGBA -> m ()
setCellRendererTextForegroundRgba obj :: o
obj val :: RGBA
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 RGBA -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "foreground-rgba" (RGBA -> Maybe RGBA
forall a. a -> Maybe a
Just RGBA
val)
constructCellRendererTextForegroundRgba :: (IsCellRendererText o) => Gdk.RGBA.RGBA -> IO (GValueConstruct o)
constructCellRendererTextForegroundRgba :: RGBA -> IO (GValueConstruct o)
constructCellRendererTextForegroundRgba val :: RGBA
val = String -> Maybe RGBA -> IO (GValueConstruct o)
forall a o.
BoxedObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed "foreground-rgba" (RGBA -> Maybe RGBA
forall a. a -> Maybe a
Just RGBA
val)
clearCellRendererTextForegroundRgba :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextForegroundRgba :: o -> m ()
clearCellRendererTextForegroundRgba obj :: 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 RGBA -> IO ()
forall a b.
(GObject a, BoxedObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj "foreground-rgba" (Maybe RGBA
forall a. Maybe a
Nothing :: Maybe Gdk.RGBA.RGBA)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextForegroundRgbaPropertyInfo
instance AttrInfo CellRendererTextForegroundRgbaPropertyInfo where
type AttrAllowedOps CellRendererTextForegroundRgbaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextForegroundRgbaPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextForegroundRgbaPropertyInfo = (~) Gdk.RGBA.RGBA
type AttrTransferTypeConstraint CellRendererTextForegroundRgbaPropertyInfo = (~) Gdk.RGBA.RGBA
type AttrTransferType CellRendererTextForegroundRgbaPropertyInfo = Gdk.RGBA.RGBA
type AttrGetType CellRendererTextForegroundRgbaPropertyInfo = (Maybe Gdk.RGBA.RGBA)
type AttrLabel CellRendererTextForegroundRgbaPropertyInfo = "foreground-rgba"
type AttrOrigin CellRendererTextForegroundRgbaPropertyInfo = CellRendererText
attrGet = getCellRendererTextForegroundRgba
attrSet = setCellRendererTextForegroundRgba
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextForegroundRgba
attrClear = clearCellRendererTextForegroundRgba
#endif
getCellRendererTextForegroundSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextForegroundSet :: o -> m Bool
getCellRendererTextForegroundSet obj :: 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 "foreground-set"
setCellRendererTextForegroundSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextForegroundSet :: o -> Bool -> m ()
setCellRendererTextForegroundSet obj :: o
obj val :: 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 "foreground-set" Bool
val
constructCellRendererTextForegroundSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextForegroundSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextForegroundSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "foreground-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextForegroundSetPropertyInfo
instance AttrInfo CellRendererTextForegroundSetPropertyInfo where
type AttrAllowedOps CellRendererTextForegroundSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextForegroundSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextForegroundSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextForegroundSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextForegroundSetPropertyInfo = Bool
type AttrGetType CellRendererTextForegroundSetPropertyInfo = Bool
type AttrLabel CellRendererTextForegroundSetPropertyInfo = "foreground-set"
type AttrOrigin CellRendererTextForegroundSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextForegroundSet
attrSet = setCellRendererTextForegroundSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextForegroundSet
attrClear = undefined
#endif
getCellRendererTextLanguage :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe T.Text)
getCellRendererTextLanguage :: o -> m (Maybe Text)
getCellRendererTextLanguage obj :: 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 "language"
setCellRendererTextLanguage :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextLanguage :: o -> Text -> m ()
setCellRendererTextLanguage obj :: o
obj val :: 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 "language" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextLanguage :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextLanguage :: Text -> IO (GValueConstruct o)
constructCellRendererTextLanguage val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "language" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextLanguage :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextLanguage :: o -> m ()
clearCellRendererTextLanguage obj :: 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 "language" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextLanguagePropertyInfo
instance AttrInfo CellRendererTextLanguagePropertyInfo where
type AttrAllowedOps CellRendererTextLanguagePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextLanguagePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextLanguagePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextLanguagePropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextLanguagePropertyInfo = T.Text
type AttrGetType CellRendererTextLanguagePropertyInfo = (Maybe T.Text)
type AttrLabel CellRendererTextLanguagePropertyInfo = "language"
type AttrOrigin CellRendererTextLanguagePropertyInfo = CellRendererText
attrGet = getCellRendererTextLanguage
attrSet = setCellRendererTextLanguage
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextLanguage
attrClear = clearCellRendererTextLanguage
#endif
getCellRendererTextLanguageSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextLanguageSet :: o -> m Bool
getCellRendererTextLanguageSet obj :: 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 "language-set"
setCellRendererTextLanguageSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextLanguageSet :: o -> Bool -> m ()
setCellRendererTextLanguageSet obj :: o
obj val :: 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 "language-set" Bool
val
constructCellRendererTextLanguageSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextLanguageSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextLanguageSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "language-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextLanguageSetPropertyInfo
instance AttrInfo CellRendererTextLanguageSetPropertyInfo where
type AttrAllowedOps CellRendererTextLanguageSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextLanguageSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextLanguageSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextLanguageSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextLanguageSetPropertyInfo = Bool
type AttrGetType CellRendererTextLanguageSetPropertyInfo = Bool
type AttrLabel CellRendererTextLanguageSetPropertyInfo = "language-set"
type AttrOrigin CellRendererTextLanguageSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextLanguageSet
attrSet = setCellRendererTextLanguageSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextLanguageSet
attrClear = undefined
#endif
setCellRendererTextMarkup :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextMarkup :: o -> Text -> m ()
setCellRendererTextMarkup obj :: o
obj val :: 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 "markup" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextMarkup :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextMarkup :: Text -> IO (GValueConstruct o)
constructCellRendererTextMarkup val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "markup" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextMarkup :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextMarkup :: o -> m ()
clearCellRendererTextMarkup obj :: 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 "markup" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextMarkupPropertyInfo
instance AttrInfo CellRendererTextMarkupPropertyInfo where
type AttrAllowedOps CellRendererTextMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextMarkupPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextMarkupPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextMarkupPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextMarkupPropertyInfo = T.Text
type AttrGetType CellRendererTextMarkupPropertyInfo = ()
type AttrLabel CellRendererTextMarkupPropertyInfo = "markup"
type AttrOrigin CellRendererTextMarkupPropertyInfo = CellRendererText
attrGet = undefined
attrSet = setCellRendererTextMarkup
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextMarkup
attrClear = clearCellRendererTextMarkup
#endif
getCellRendererTextMaxWidthChars :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextMaxWidthChars :: o -> m Int32
getCellRendererTextMaxWidthChars obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "max-width-chars"
setCellRendererTextMaxWidthChars :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextMaxWidthChars :: o -> Int32 -> m ()
setCellRendererTextMaxWidthChars obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "max-width-chars" Int32
val
constructCellRendererTextMaxWidthChars :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextMaxWidthChars :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextMaxWidthChars val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "max-width-chars" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextMaxWidthCharsPropertyInfo
instance AttrInfo CellRendererTextMaxWidthCharsPropertyInfo where
type AttrAllowedOps CellRendererTextMaxWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextMaxWidthCharsPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextMaxWidthCharsPropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextMaxWidthCharsPropertyInfo = (~) Int32
type AttrTransferType CellRendererTextMaxWidthCharsPropertyInfo = Int32
type AttrGetType CellRendererTextMaxWidthCharsPropertyInfo = Int32
type AttrLabel CellRendererTextMaxWidthCharsPropertyInfo = "max-width-chars"
type AttrOrigin CellRendererTextMaxWidthCharsPropertyInfo = CellRendererText
attrGet = getCellRendererTextMaxWidthChars
attrSet = setCellRendererTextMaxWidthChars
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextMaxWidthChars
attrClear = undefined
#endif
getCellRendererTextPlaceholderText :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe T.Text)
getCellRendererTextPlaceholderText :: o -> m (Maybe Text)
getCellRendererTextPlaceholderText obj :: 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 "placeholder-text"
setCellRendererTextPlaceholderText :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextPlaceholderText :: o -> Text -> m ()
setCellRendererTextPlaceholderText obj :: o
obj val :: 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 "placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextPlaceholderText :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextPlaceholderText :: Text -> IO (GValueConstruct o)
constructCellRendererTextPlaceholderText val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextPlaceholderText :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextPlaceholderText :: o -> m ()
clearCellRendererTextPlaceholderText obj :: 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 "placeholder-text" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextPlaceholderTextPropertyInfo
instance AttrInfo CellRendererTextPlaceholderTextPropertyInfo where
type AttrAllowedOps CellRendererTextPlaceholderTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextPlaceholderTextPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextPlaceholderTextPropertyInfo = T.Text
type AttrGetType CellRendererTextPlaceholderTextPropertyInfo = (Maybe T.Text)
type AttrLabel CellRendererTextPlaceholderTextPropertyInfo = "placeholder-text"
type AttrOrigin CellRendererTextPlaceholderTextPropertyInfo = CellRendererText
attrGet = getCellRendererTextPlaceholderText
attrSet = setCellRendererTextPlaceholderText
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextPlaceholderText
attrClear = clearCellRendererTextPlaceholderText
#endif
getCellRendererTextRise :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextRise :: o -> m Int32
getCellRendererTextRise obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "rise"
setCellRendererTextRise :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextRise :: o -> Int32 -> m ()
setCellRendererTextRise obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "rise" Int32
val
constructCellRendererTextRise :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextRise :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextRise val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "rise" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextRisePropertyInfo
instance AttrInfo CellRendererTextRisePropertyInfo where
type AttrAllowedOps CellRendererTextRisePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextRisePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextRisePropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextRisePropertyInfo = (~) Int32
type AttrTransferType CellRendererTextRisePropertyInfo = Int32
type AttrGetType CellRendererTextRisePropertyInfo = Int32
type AttrLabel CellRendererTextRisePropertyInfo = "rise"
type AttrOrigin CellRendererTextRisePropertyInfo = CellRendererText
attrGet = getCellRendererTextRise
attrSet = setCellRendererTextRise
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextRise
attrClear = undefined
#endif
getCellRendererTextRiseSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextRiseSet :: o -> m Bool
getCellRendererTextRiseSet obj :: 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 "rise-set"
setCellRendererTextRiseSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextRiseSet :: o -> Bool -> m ()
setCellRendererTextRiseSet obj :: o
obj val :: 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 "rise-set" Bool
val
constructCellRendererTextRiseSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextRiseSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextRiseSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "rise-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextRiseSetPropertyInfo
instance AttrInfo CellRendererTextRiseSetPropertyInfo where
type AttrAllowedOps CellRendererTextRiseSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextRiseSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextRiseSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextRiseSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextRiseSetPropertyInfo = Bool
type AttrGetType CellRendererTextRiseSetPropertyInfo = Bool
type AttrLabel CellRendererTextRiseSetPropertyInfo = "rise-set"
type AttrOrigin CellRendererTextRiseSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextRiseSet
attrSet = setCellRendererTextRiseSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextRiseSet
attrClear = undefined
#endif
getCellRendererTextScale :: (MonadIO m, IsCellRendererText o) => o -> m Double
getCellRendererTextScale :: o -> m Double
getCellRendererTextScale obj :: o
obj = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Double
forall a. GObject a => a -> String -> IO Double
B.Properties.getObjectPropertyDouble o
obj "scale"
setCellRendererTextScale :: (MonadIO m, IsCellRendererText o) => o -> Double -> m ()
setCellRendererTextScale :: o -> Double -> m ()
setCellRendererTextScale obj :: o
obj val :: Double
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 -> Double -> IO ()
forall a. GObject a => a -> String -> Double -> IO ()
B.Properties.setObjectPropertyDouble o
obj "scale" Double
val
constructCellRendererTextScale :: (IsCellRendererText o) => Double -> IO (GValueConstruct o)
constructCellRendererTextScale :: Double -> IO (GValueConstruct o)
constructCellRendererTextScale val :: Double
val = String -> Double -> IO (GValueConstruct o)
forall o. String -> Double -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyDouble "scale" Double
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextScalePropertyInfo
instance AttrInfo CellRendererTextScalePropertyInfo where
type AttrAllowedOps CellRendererTextScalePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextScalePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextScalePropertyInfo = (~) Double
type AttrTransferTypeConstraint CellRendererTextScalePropertyInfo = (~) Double
type AttrTransferType CellRendererTextScalePropertyInfo = Double
type AttrGetType CellRendererTextScalePropertyInfo = Double
type AttrLabel CellRendererTextScalePropertyInfo = "scale"
type AttrOrigin CellRendererTextScalePropertyInfo = CellRendererText
attrGet = getCellRendererTextScale
attrSet = setCellRendererTextScale
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextScale
attrClear = undefined
#endif
getCellRendererTextScaleSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextScaleSet :: o -> m Bool
getCellRendererTextScaleSet obj :: 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 "scale-set"
setCellRendererTextScaleSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextScaleSet :: o -> Bool -> m ()
setCellRendererTextScaleSet obj :: o
obj val :: 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 "scale-set" Bool
val
constructCellRendererTextScaleSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextScaleSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextScaleSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "scale-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextScaleSetPropertyInfo
instance AttrInfo CellRendererTextScaleSetPropertyInfo where
type AttrAllowedOps CellRendererTextScaleSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextScaleSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextScaleSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextScaleSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextScaleSetPropertyInfo = Bool
type AttrGetType CellRendererTextScaleSetPropertyInfo = Bool
type AttrLabel CellRendererTextScaleSetPropertyInfo = "scale-set"
type AttrOrigin CellRendererTextScaleSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextScaleSet
attrSet = setCellRendererTextScaleSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextScaleSet
attrClear = undefined
#endif
getCellRendererTextSingleParagraphMode :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextSingleParagraphMode :: o -> m Bool
getCellRendererTextSingleParagraphMode obj :: 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 "single-paragraph-mode"
setCellRendererTextSingleParagraphMode :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextSingleParagraphMode :: o -> Bool -> m ()
setCellRendererTextSingleParagraphMode obj :: o
obj val :: 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 "single-paragraph-mode" Bool
val
constructCellRendererTextSingleParagraphMode :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextSingleParagraphMode :: Bool -> IO (GValueConstruct o)
constructCellRendererTextSingleParagraphMode val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "single-paragraph-mode" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextSingleParagraphModePropertyInfo
instance AttrInfo CellRendererTextSingleParagraphModePropertyInfo where
type AttrAllowedOps CellRendererTextSingleParagraphModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextSingleParagraphModePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextSingleParagraphModePropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextSingleParagraphModePropertyInfo = (~) Bool
type AttrTransferType CellRendererTextSingleParagraphModePropertyInfo = Bool
type AttrGetType CellRendererTextSingleParagraphModePropertyInfo = Bool
type AttrLabel CellRendererTextSingleParagraphModePropertyInfo = "single-paragraph-mode"
type AttrOrigin CellRendererTextSingleParagraphModePropertyInfo = CellRendererText
attrGet = getCellRendererTextSingleParagraphMode
attrSet = setCellRendererTextSingleParagraphMode
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextSingleParagraphMode
attrClear = undefined
#endif
getCellRendererTextSize :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextSize :: o -> m Int32
getCellRendererTextSize obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "size"
setCellRendererTextSize :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextSize :: o -> Int32 -> m ()
setCellRendererTextSize obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "size" Int32
val
constructCellRendererTextSize :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextSize :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextSize val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "size" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextSizePropertyInfo
instance AttrInfo CellRendererTextSizePropertyInfo where
type AttrAllowedOps CellRendererTextSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextSizePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextSizePropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextSizePropertyInfo = (~) Int32
type AttrTransferType CellRendererTextSizePropertyInfo = Int32
type AttrGetType CellRendererTextSizePropertyInfo = Int32
type AttrLabel CellRendererTextSizePropertyInfo = "size"
type AttrOrigin CellRendererTextSizePropertyInfo = CellRendererText
attrGet = getCellRendererTextSize
attrSet = setCellRendererTextSize
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextSize
attrClear = undefined
#endif
getCellRendererTextSizePoints :: (MonadIO m, IsCellRendererText o) => o -> m Double
getCellRendererTextSizePoints :: o -> m Double
getCellRendererTextSizePoints obj :: o
obj = IO Double -> m Double
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Double -> m Double) -> IO Double -> m Double
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Double
forall a. GObject a => a -> String -> IO Double
B.Properties.getObjectPropertyDouble o
obj "size-points"
setCellRendererTextSizePoints :: (MonadIO m, IsCellRendererText o) => o -> Double -> m ()
setCellRendererTextSizePoints :: o -> Double -> m ()
setCellRendererTextSizePoints obj :: o
obj val :: Double
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 -> Double -> IO ()
forall a. GObject a => a -> String -> Double -> IO ()
B.Properties.setObjectPropertyDouble o
obj "size-points" Double
val
constructCellRendererTextSizePoints :: (IsCellRendererText o) => Double -> IO (GValueConstruct o)
constructCellRendererTextSizePoints :: Double -> IO (GValueConstruct o)
constructCellRendererTextSizePoints val :: Double
val = String -> Double -> IO (GValueConstruct o)
forall o. String -> Double -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyDouble "size-points" Double
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextSizePointsPropertyInfo
instance AttrInfo CellRendererTextSizePointsPropertyInfo where
type AttrAllowedOps CellRendererTextSizePointsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextSizePointsPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextSizePointsPropertyInfo = (~) Double
type AttrTransferTypeConstraint CellRendererTextSizePointsPropertyInfo = (~) Double
type AttrTransferType CellRendererTextSizePointsPropertyInfo = Double
type AttrGetType CellRendererTextSizePointsPropertyInfo = Double
type AttrLabel CellRendererTextSizePointsPropertyInfo = "size-points"
type AttrOrigin CellRendererTextSizePointsPropertyInfo = CellRendererText
attrGet = getCellRendererTextSizePoints
attrSet = setCellRendererTextSizePoints
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextSizePoints
attrClear = undefined
#endif
getCellRendererTextSizeSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextSizeSet :: o -> m Bool
getCellRendererTextSizeSet obj :: 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 "size-set"
setCellRendererTextSizeSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextSizeSet :: o -> Bool -> m ()
setCellRendererTextSizeSet obj :: o
obj val :: 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 "size-set" Bool
val
constructCellRendererTextSizeSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextSizeSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextSizeSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "size-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextSizeSetPropertyInfo
instance AttrInfo CellRendererTextSizeSetPropertyInfo where
type AttrAllowedOps CellRendererTextSizeSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextSizeSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextSizeSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextSizeSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextSizeSetPropertyInfo = Bool
type AttrGetType CellRendererTextSizeSetPropertyInfo = Bool
type AttrLabel CellRendererTextSizeSetPropertyInfo = "size-set"
type AttrOrigin CellRendererTextSizeSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextSizeSet
attrSet = setCellRendererTextSizeSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextSizeSet
attrClear = undefined
#endif
getCellRendererTextStretch :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.Stretch
getCellRendererTextStretch :: o -> m Stretch
getCellRendererTextStretch obj :: o
obj = IO Stretch -> m Stretch
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Stretch -> m Stretch) -> IO Stretch -> m Stretch
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Stretch
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "stretch"
setCellRendererTextStretch :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.Stretch -> m ()
setCellRendererTextStretch :: o -> Stretch -> m ()
setCellRendererTextStretch obj :: o
obj val :: Stretch
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 -> Stretch -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "stretch" Stretch
val
constructCellRendererTextStretch :: (IsCellRendererText o) => Pango.Enums.Stretch -> IO (GValueConstruct o)
constructCellRendererTextStretch :: Stretch -> IO (GValueConstruct o)
constructCellRendererTextStretch val :: Stretch
val = String -> Stretch -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "stretch" Stretch
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStretchPropertyInfo
instance AttrInfo CellRendererTextStretchPropertyInfo where
type AttrAllowedOps CellRendererTextStretchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStretchPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStretchPropertyInfo = (~) Pango.Enums.Stretch
type AttrTransferTypeConstraint CellRendererTextStretchPropertyInfo = (~) Pango.Enums.Stretch
type AttrTransferType CellRendererTextStretchPropertyInfo = Pango.Enums.Stretch
type AttrGetType CellRendererTextStretchPropertyInfo = Pango.Enums.Stretch
type AttrLabel CellRendererTextStretchPropertyInfo = "stretch"
type AttrOrigin CellRendererTextStretchPropertyInfo = CellRendererText
attrGet = getCellRendererTextStretch
attrSet = setCellRendererTextStretch
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStretch
attrClear = undefined
#endif
getCellRendererTextStretchSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextStretchSet :: o -> m Bool
getCellRendererTextStretchSet obj :: 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 "stretch-set"
setCellRendererTextStretchSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextStretchSet :: o -> Bool -> m ()
setCellRendererTextStretchSet obj :: o
obj val :: 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 "stretch-set" Bool
val
constructCellRendererTextStretchSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextStretchSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextStretchSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "stretch-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStretchSetPropertyInfo
instance AttrInfo CellRendererTextStretchSetPropertyInfo where
type AttrAllowedOps CellRendererTextStretchSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStretchSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStretchSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextStretchSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextStretchSetPropertyInfo = Bool
type AttrGetType CellRendererTextStretchSetPropertyInfo = Bool
type AttrLabel CellRendererTextStretchSetPropertyInfo = "stretch-set"
type AttrOrigin CellRendererTextStretchSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextStretchSet
attrSet = setCellRendererTextStretchSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStretchSet
attrClear = undefined
#endif
getCellRendererTextStrikethrough :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextStrikethrough :: o -> m Bool
getCellRendererTextStrikethrough obj :: 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 "strikethrough"
setCellRendererTextStrikethrough :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextStrikethrough :: o -> Bool -> m ()
setCellRendererTextStrikethrough obj :: o
obj val :: 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 "strikethrough" Bool
val
constructCellRendererTextStrikethrough :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextStrikethrough :: Bool -> IO (GValueConstruct o)
constructCellRendererTextStrikethrough val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "strikethrough" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStrikethroughPropertyInfo
instance AttrInfo CellRendererTextStrikethroughPropertyInfo where
type AttrAllowedOps CellRendererTextStrikethroughPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStrikethroughPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStrikethroughPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextStrikethroughPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextStrikethroughPropertyInfo = Bool
type AttrGetType CellRendererTextStrikethroughPropertyInfo = Bool
type AttrLabel CellRendererTextStrikethroughPropertyInfo = "strikethrough"
type AttrOrigin CellRendererTextStrikethroughPropertyInfo = CellRendererText
attrGet = getCellRendererTextStrikethrough
attrSet = setCellRendererTextStrikethrough
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStrikethrough
attrClear = undefined
#endif
getCellRendererTextStrikethroughSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextStrikethroughSet :: o -> m Bool
getCellRendererTextStrikethroughSet obj :: 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 "strikethrough-set"
setCellRendererTextStrikethroughSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextStrikethroughSet :: o -> Bool -> m ()
setCellRendererTextStrikethroughSet obj :: o
obj val :: 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 "strikethrough-set" Bool
val
constructCellRendererTextStrikethroughSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextStrikethroughSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextStrikethroughSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "strikethrough-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStrikethroughSetPropertyInfo
instance AttrInfo CellRendererTextStrikethroughSetPropertyInfo where
type AttrAllowedOps CellRendererTextStrikethroughSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStrikethroughSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStrikethroughSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextStrikethroughSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextStrikethroughSetPropertyInfo = Bool
type AttrGetType CellRendererTextStrikethroughSetPropertyInfo = Bool
type AttrLabel CellRendererTextStrikethroughSetPropertyInfo = "strikethrough-set"
type AttrOrigin CellRendererTextStrikethroughSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextStrikethroughSet
attrSet = setCellRendererTextStrikethroughSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStrikethroughSet
attrClear = undefined
#endif
getCellRendererTextStyle :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.Style
getCellRendererTextStyle :: o -> m Style
getCellRendererTextStyle obj :: o
obj = IO Style -> m Style
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Style -> m Style) -> IO Style -> m Style
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Style
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "style"
setCellRendererTextStyle :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.Style -> m ()
setCellRendererTextStyle :: o -> Style -> m ()
setCellRendererTextStyle obj :: o
obj val :: Style
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 -> Style -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "style" Style
val
constructCellRendererTextStyle :: (IsCellRendererText o) => Pango.Enums.Style -> IO (GValueConstruct o)
constructCellRendererTextStyle :: Style -> IO (GValueConstruct o)
constructCellRendererTextStyle val :: Style
val = String -> Style -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "style" Style
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStylePropertyInfo
instance AttrInfo CellRendererTextStylePropertyInfo where
type AttrAllowedOps CellRendererTextStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStylePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStylePropertyInfo = (~) Pango.Enums.Style
type AttrTransferTypeConstraint CellRendererTextStylePropertyInfo = (~) Pango.Enums.Style
type AttrTransferType CellRendererTextStylePropertyInfo = Pango.Enums.Style
type AttrGetType CellRendererTextStylePropertyInfo = Pango.Enums.Style
type AttrLabel CellRendererTextStylePropertyInfo = "style"
type AttrOrigin CellRendererTextStylePropertyInfo = CellRendererText
attrGet = getCellRendererTextStyle
attrSet = setCellRendererTextStyle
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStyle
attrClear = undefined
#endif
getCellRendererTextStyleSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextStyleSet :: o -> m Bool
getCellRendererTextStyleSet obj :: 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 "style-set"
setCellRendererTextStyleSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextStyleSet :: o -> Bool -> m ()
setCellRendererTextStyleSet obj :: o
obj val :: 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 "style-set" Bool
val
constructCellRendererTextStyleSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextStyleSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextStyleSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "style-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextStyleSetPropertyInfo
instance AttrInfo CellRendererTextStyleSetPropertyInfo where
type AttrAllowedOps CellRendererTextStyleSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextStyleSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextStyleSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextStyleSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextStyleSetPropertyInfo = Bool
type AttrGetType CellRendererTextStyleSetPropertyInfo = Bool
type AttrLabel CellRendererTextStyleSetPropertyInfo = "style-set"
type AttrOrigin CellRendererTextStyleSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextStyleSet
attrSet = setCellRendererTextStyleSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextStyleSet
attrClear = undefined
#endif
getCellRendererTextText :: (MonadIO m, IsCellRendererText o) => o -> m (Maybe T.Text)
getCellRendererTextText :: o -> m (Maybe Text)
getCellRendererTextText obj :: 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 "text"
setCellRendererTextText :: (MonadIO m, IsCellRendererText o) => o -> T.Text -> m ()
setCellRendererTextText :: o -> Text -> m ()
setCellRendererTextText obj :: o
obj val :: 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 "text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructCellRendererTextText :: (IsCellRendererText o) => T.Text -> IO (GValueConstruct o)
constructCellRendererTextText :: Text -> IO (GValueConstruct o)
constructCellRendererTextText val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearCellRendererTextText :: (MonadIO m, IsCellRendererText o) => o -> m ()
clearCellRendererTextText :: o -> m ()
clearCellRendererTextText obj :: 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 "text" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data CellRendererTextTextPropertyInfo
instance AttrInfo CellRendererTextTextPropertyInfo where
type AttrAllowedOps CellRendererTextTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint CellRendererTextTextPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextTextPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint CellRendererTextTextPropertyInfo = (~) T.Text
type AttrTransferType CellRendererTextTextPropertyInfo = T.Text
type AttrGetType CellRendererTextTextPropertyInfo = (Maybe T.Text)
type AttrLabel CellRendererTextTextPropertyInfo = "text"
type AttrOrigin CellRendererTextTextPropertyInfo = CellRendererText
attrGet = getCellRendererTextText
attrSet = setCellRendererTextText
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextText
attrClear = clearCellRendererTextText
#endif
getCellRendererTextUnderline :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.Underline
getCellRendererTextUnderline :: o -> m Underline
getCellRendererTextUnderline obj :: o
obj = IO Underline -> m Underline
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Underline -> m Underline) -> IO Underline -> m Underline
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Underline
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "underline"
setCellRendererTextUnderline :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.Underline -> m ()
setCellRendererTextUnderline :: o -> Underline -> m ()
setCellRendererTextUnderline obj :: o
obj val :: Underline
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 -> Underline -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "underline" Underline
val
constructCellRendererTextUnderline :: (IsCellRendererText o) => Pango.Enums.Underline -> IO (GValueConstruct o)
constructCellRendererTextUnderline :: Underline -> IO (GValueConstruct o)
constructCellRendererTextUnderline val :: Underline
val = String -> Underline -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "underline" Underline
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextUnderlinePropertyInfo
instance AttrInfo CellRendererTextUnderlinePropertyInfo where
type AttrAllowedOps CellRendererTextUnderlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextUnderlinePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextUnderlinePropertyInfo = (~) Pango.Enums.Underline
type AttrTransferTypeConstraint CellRendererTextUnderlinePropertyInfo = (~) Pango.Enums.Underline
type AttrTransferType CellRendererTextUnderlinePropertyInfo = Pango.Enums.Underline
type AttrGetType CellRendererTextUnderlinePropertyInfo = Pango.Enums.Underline
type AttrLabel CellRendererTextUnderlinePropertyInfo = "underline"
type AttrOrigin CellRendererTextUnderlinePropertyInfo = CellRendererText
attrGet = getCellRendererTextUnderline
attrSet = setCellRendererTextUnderline
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextUnderline
attrClear = undefined
#endif
getCellRendererTextUnderlineSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextUnderlineSet :: o -> m Bool
getCellRendererTextUnderlineSet obj :: 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 "underline-set"
setCellRendererTextUnderlineSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextUnderlineSet :: o -> Bool -> m ()
setCellRendererTextUnderlineSet obj :: o
obj val :: 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 "underline-set" Bool
val
constructCellRendererTextUnderlineSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextUnderlineSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextUnderlineSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "underline-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextUnderlineSetPropertyInfo
instance AttrInfo CellRendererTextUnderlineSetPropertyInfo where
type AttrAllowedOps CellRendererTextUnderlineSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextUnderlineSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextUnderlineSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextUnderlineSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextUnderlineSetPropertyInfo = Bool
type AttrGetType CellRendererTextUnderlineSetPropertyInfo = Bool
type AttrLabel CellRendererTextUnderlineSetPropertyInfo = "underline-set"
type AttrOrigin CellRendererTextUnderlineSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextUnderlineSet
attrSet = setCellRendererTextUnderlineSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextUnderlineSet
attrClear = undefined
#endif
getCellRendererTextVariant :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.Variant
getCellRendererTextVariant :: o -> m Variant
getCellRendererTextVariant obj :: o
obj = IO Variant -> m Variant
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Variant -> m Variant) -> IO Variant -> m Variant
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Variant
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "variant"
setCellRendererTextVariant :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.Variant -> m ()
setCellRendererTextVariant :: o -> Variant -> m ()
setCellRendererTextVariant obj :: o
obj val :: Variant
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 -> Variant -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "variant" Variant
val
constructCellRendererTextVariant :: (IsCellRendererText o) => Pango.Enums.Variant -> IO (GValueConstruct o)
constructCellRendererTextVariant :: Variant -> IO (GValueConstruct o)
constructCellRendererTextVariant val :: Variant
val = String -> Variant -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "variant" Variant
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextVariantPropertyInfo
instance AttrInfo CellRendererTextVariantPropertyInfo where
type AttrAllowedOps CellRendererTextVariantPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextVariantPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextVariantPropertyInfo = (~) Pango.Enums.Variant
type AttrTransferTypeConstraint CellRendererTextVariantPropertyInfo = (~) Pango.Enums.Variant
type AttrTransferType CellRendererTextVariantPropertyInfo = Pango.Enums.Variant
type AttrGetType CellRendererTextVariantPropertyInfo = Pango.Enums.Variant
type AttrLabel CellRendererTextVariantPropertyInfo = "variant"
type AttrOrigin CellRendererTextVariantPropertyInfo = CellRendererText
attrGet = getCellRendererTextVariant
attrSet = setCellRendererTextVariant
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextVariant
attrClear = undefined
#endif
getCellRendererTextVariantSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextVariantSet :: o -> m Bool
getCellRendererTextVariantSet obj :: 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 "variant-set"
setCellRendererTextVariantSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextVariantSet :: o -> Bool -> m ()
setCellRendererTextVariantSet obj :: o
obj val :: 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 "variant-set" Bool
val
constructCellRendererTextVariantSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextVariantSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextVariantSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "variant-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextVariantSetPropertyInfo
instance AttrInfo CellRendererTextVariantSetPropertyInfo where
type AttrAllowedOps CellRendererTextVariantSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextVariantSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextVariantSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextVariantSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextVariantSetPropertyInfo = Bool
type AttrGetType CellRendererTextVariantSetPropertyInfo = Bool
type AttrLabel CellRendererTextVariantSetPropertyInfo = "variant-set"
type AttrOrigin CellRendererTextVariantSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextVariantSet
attrSet = setCellRendererTextVariantSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextVariantSet
attrClear = undefined
#endif
getCellRendererTextWeight :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextWeight :: o -> m Int32
getCellRendererTextWeight obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "weight"
setCellRendererTextWeight :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextWeight :: o -> Int32 -> m ()
setCellRendererTextWeight obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "weight" Int32
val
constructCellRendererTextWeight :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextWeight :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextWeight val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "weight" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextWeightPropertyInfo
instance AttrInfo CellRendererTextWeightPropertyInfo where
type AttrAllowedOps CellRendererTextWeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextWeightPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextWeightPropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextWeightPropertyInfo = (~) Int32
type AttrTransferType CellRendererTextWeightPropertyInfo = Int32
type AttrGetType CellRendererTextWeightPropertyInfo = Int32
type AttrLabel CellRendererTextWeightPropertyInfo = "weight"
type AttrOrigin CellRendererTextWeightPropertyInfo = CellRendererText
attrGet = getCellRendererTextWeight
attrSet = setCellRendererTextWeight
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextWeight
attrClear = undefined
#endif
getCellRendererTextWeightSet :: (MonadIO m, IsCellRendererText o) => o -> m Bool
getCellRendererTextWeightSet :: o -> m Bool
getCellRendererTextWeightSet obj :: 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 "weight-set"
setCellRendererTextWeightSet :: (MonadIO m, IsCellRendererText o) => o -> Bool -> m ()
setCellRendererTextWeightSet :: o -> Bool -> m ()
setCellRendererTextWeightSet obj :: o
obj val :: 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 "weight-set" Bool
val
constructCellRendererTextWeightSet :: (IsCellRendererText o) => Bool -> IO (GValueConstruct o)
constructCellRendererTextWeightSet :: Bool -> IO (GValueConstruct o)
constructCellRendererTextWeightSet val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "weight-set" Bool
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextWeightSetPropertyInfo
instance AttrInfo CellRendererTextWeightSetPropertyInfo where
type AttrAllowedOps CellRendererTextWeightSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextWeightSetPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextWeightSetPropertyInfo = (~) Bool
type AttrTransferTypeConstraint CellRendererTextWeightSetPropertyInfo = (~) Bool
type AttrTransferType CellRendererTextWeightSetPropertyInfo = Bool
type AttrGetType CellRendererTextWeightSetPropertyInfo = Bool
type AttrLabel CellRendererTextWeightSetPropertyInfo = "weight-set"
type AttrOrigin CellRendererTextWeightSetPropertyInfo = CellRendererText
attrGet = getCellRendererTextWeightSet
attrSet = setCellRendererTextWeightSet
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextWeightSet
attrClear = undefined
#endif
getCellRendererTextWidthChars :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextWidthChars :: o -> m Int32
getCellRendererTextWidthChars obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "width-chars"
setCellRendererTextWidthChars :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextWidthChars :: o -> Int32 -> m ()
setCellRendererTextWidthChars obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "width-chars" Int32
val
constructCellRendererTextWidthChars :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextWidthChars :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextWidthChars val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "width-chars" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextWidthCharsPropertyInfo
instance AttrInfo CellRendererTextWidthCharsPropertyInfo where
type AttrAllowedOps CellRendererTextWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextWidthCharsPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextWidthCharsPropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextWidthCharsPropertyInfo = (~) Int32
type AttrTransferType CellRendererTextWidthCharsPropertyInfo = Int32
type AttrGetType CellRendererTextWidthCharsPropertyInfo = Int32
type AttrLabel CellRendererTextWidthCharsPropertyInfo = "width-chars"
type AttrOrigin CellRendererTextWidthCharsPropertyInfo = CellRendererText
attrGet = getCellRendererTextWidthChars
attrSet = setCellRendererTextWidthChars
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextWidthChars
attrClear = undefined
#endif
getCellRendererTextWrapMode :: (MonadIO m, IsCellRendererText o) => o -> m Pango.Enums.WrapMode
getCellRendererTextWrapMode :: o -> m WrapMode
getCellRendererTextWrapMode obj :: o
obj = IO WrapMode -> m WrapMode
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO WrapMode -> m WrapMode) -> IO WrapMode -> m WrapMode
forall a b. (a -> b) -> a -> b
$ o -> String -> IO WrapMode
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "wrap-mode"
setCellRendererTextWrapMode :: (MonadIO m, IsCellRendererText o) => o -> Pango.Enums.WrapMode -> m ()
setCellRendererTextWrapMode :: o -> WrapMode -> m ()
setCellRendererTextWrapMode obj :: o
obj val :: WrapMode
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 -> WrapMode -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "wrap-mode" WrapMode
val
constructCellRendererTextWrapMode :: (IsCellRendererText o) => Pango.Enums.WrapMode -> IO (GValueConstruct o)
constructCellRendererTextWrapMode :: WrapMode -> IO (GValueConstruct o)
constructCellRendererTextWrapMode val :: WrapMode
val = String -> WrapMode -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "wrap-mode" WrapMode
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextWrapModePropertyInfo
instance AttrInfo CellRendererTextWrapModePropertyInfo where
type AttrAllowedOps CellRendererTextWrapModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextWrapModePropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextWrapModePropertyInfo = (~) Pango.Enums.WrapMode
type AttrTransferTypeConstraint CellRendererTextWrapModePropertyInfo = (~) Pango.Enums.WrapMode
type AttrTransferType CellRendererTextWrapModePropertyInfo = Pango.Enums.WrapMode
type AttrGetType CellRendererTextWrapModePropertyInfo = Pango.Enums.WrapMode
type AttrLabel CellRendererTextWrapModePropertyInfo = "wrap-mode"
type AttrOrigin CellRendererTextWrapModePropertyInfo = CellRendererText
attrGet = getCellRendererTextWrapMode
attrSet = setCellRendererTextWrapMode
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextWrapMode
attrClear = undefined
#endif
getCellRendererTextWrapWidth :: (MonadIO m, IsCellRendererText o) => o -> m Int32
getCellRendererTextWrapWidth :: o -> m Int32
getCellRendererTextWrapWidth obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "wrap-width"
setCellRendererTextWrapWidth :: (MonadIO m, IsCellRendererText o) => o -> Int32 -> m ()
setCellRendererTextWrapWidth :: o -> Int32 -> m ()
setCellRendererTextWrapWidth obj :: o
obj val :: Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "wrap-width" Int32
val
constructCellRendererTextWrapWidth :: (IsCellRendererText o) => Int32 -> IO (GValueConstruct o)
constructCellRendererTextWrapWidth :: Int32 -> IO (GValueConstruct o)
constructCellRendererTextWrapWidth val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "wrap-width" Int32
val
#if defined(ENABLE_OVERLOADING)
data CellRendererTextWrapWidthPropertyInfo
instance AttrInfo CellRendererTextWrapWidthPropertyInfo where
type AttrAllowedOps CellRendererTextWrapWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CellRendererTextWrapWidthPropertyInfo = IsCellRendererText
type AttrSetTypeConstraint CellRendererTextWrapWidthPropertyInfo = (~) Int32
type AttrTransferTypeConstraint CellRendererTextWrapWidthPropertyInfo = (~) Int32
type AttrTransferType CellRendererTextWrapWidthPropertyInfo = Int32
type AttrGetType CellRendererTextWrapWidthPropertyInfo = Int32
type AttrLabel CellRendererTextWrapWidthPropertyInfo = "wrap-width"
type AttrOrigin CellRendererTextWrapWidthPropertyInfo = CellRendererText
attrGet = getCellRendererTextWrapWidth
attrSet = setCellRendererTextWrapWidth
attrTransfer _ v = do
return v
attrConstruct = constructCellRendererTextWrapWidth
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList CellRendererText
type instance O.AttributeList CellRendererText = CellRendererTextAttributeList
type CellRendererTextAttributeList = ('[ '("alignSet", CellRendererTextAlignSetPropertyInfo), '("alignment", CellRendererTextAlignmentPropertyInfo), '("attributes", CellRendererTextAttributesPropertyInfo), '("background", CellRendererTextBackgroundPropertyInfo), '("backgroundGdk", CellRendererTextBackgroundGdkPropertyInfo), '("backgroundRgba", CellRendererTextBackgroundRgbaPropertyInfo), '("backgroundSet", CellRendererTextBackgroundSetPropertyInfo), '("cellBackground", Gtk.CellRenderer.CellRendererCellBackgroundPropertyInfo), '("cellBackgroundGdk", Gtk.CellRenderer.CellRendererCellBackgroundGdkPropertyInfo), '("cellBackgroundRgba", Gtk.CellRenderer.CellRendererCellBackgroundRgbaPropertyInfo), '("cellBackgroundSet", Gtk.CellRenderer.CellRendererCellBackgroundSetPropertyInfo), '("editable", CellRendererTextEditablePropertyInfo), '("editableSet", CellRendererTextEditableSetPropertyInfo), '("editing", Gtk.CellRenderer.CellRendererEditingPropertyInfo), '("ellipsize", CellRendererTextEllipsizePropertyInfo), '("ellipsizeSet", CellRendererTextEllipsizeSetPropertyInfo), '("family", CellRendererTextFamilyPropertyInfo), '("familySet", CellRendererTextFamilySetPropertyInfo), '("font", CellRendererTextFontPropertyInfo), '("fontDesc", CellRendererTextFontDescPropertyInfo), '("foreground", CellRendererTextForegroundPropertyInfo), '("foregroundGdk", CellRendererTextForegroundGdkPropertyInfo), '("foregroundRgba", CellRendererTextForegroundRgbaPropertyInfo), '("foregroundSet", CellRendererTextForegroundSetPropertyInfo), '("height", Gtk.CellRenderer.CellRendererHeightPropertyInfo), '("isExpanded", Gtk.CellRenderer.CellRendererIsExpandedPropertyInfo), '("isExpander", Gtk.CellRenderer.CellRendererIsExpanderPropertyInfo), '("language", CellRendererTextLanguagePropertyInfo), '("languageSet", CellRendererTextLanguageSetPropertyInfo), '("markup", CellRendererTextMarkupPropertyInfo), '("maxWidthChars", CellRendererTextMaxWidthCharsPropertyInfo), '("mode", Gtk.CellRenderer.CellRendererModePropertyInfo), '("placeholderText", CellRendererTextPlaceholderTextPropertyInfo), '("rise", CellRendererTextRisePropertyInfo), '("riseSet", CellRendererTextRiseSetPropertyInfo), '("scale", CellRendererTextScalePropertyInfo), '("scaleSet", CellRendererTextScaleSetPropertyInfo), '("sensitive", Gtk.CellRenderer.CellRendererSensitivePropertyInfo), '("singleParagraphMode", CellRendererTextSingleParagraphModePropertyInfo), '("size", CellRendererTextSizePropertyInfo), '("sizePoints", CellRendererTextSizePointsPropertyInfo), '("sizeSet", CellRendererTextSizeSetPropertyInfo), '("stretch", CellRendererTextStretchPropertyInfo), '("stretchSet", CellRendererTextStretchSetPropertyInfo), '("strikethrough", CellRendererTextStrikethroughPropertyInfo), '("strikethroughSet", CellRendererTextStrikethroughSetPropertyInfo), '("style", CellRendererTextStylePropertyInfo), '("styleSet", CellRendererTextStyleSetPropertyInfo), '("text", CellRendererTextTextPropertyInfo), '("underline", CellRendererTextUnderlinePropertyInfo), '("underlineSet", CellRendererTextUnderlineSetPropertyInfo), '("variant", CellRendererTextVariantPropertyInfo), '("variantSet", CellRendererTextVariantSetPropertyInfo), '("visible", Gtk.CellRenderer.CellRendererVisiblePropertyInfo), '("weight", CellRendererTextWeightPropertyInfo), '("weightSet", CellRendererTextWeightSetPropertyInfo), '("width", Gtk.CellRenderer.CellRendererWidthPropertyInfo), '("widthChars", CellRendererTextWidthCharsPropertyInfo), '("wrapMode", CellRendererTextWrapModePropertyInfo), '("wrapWidth", CellRendererTextWrapWidthPropertyInfo), '("xalign", Gtk.CellRenderer.CellRendererXalignPropertyInfo), '("xpad", Gtk.CellRenderer.CellRendererXpadPropertyInfo), '("yalign", Gtk.CellRenderer.CellRendererYalignPropertyInfo), '("ypad", Gtk.CellRenderer.CellRendererYpadPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
cellRendererTextAlignSet :: AttrLabelProxy "alignSet"
cellRendererTextAlignSet = AttrLabelProxy
cellRendererTextAlignment :: AttrLabelProxy "alignment"
cellRendererTextAlignment = AttrLabelProxy
cellRendererTextAttributes :: AttrLabelProxy "attributes"
cellRendererTextAttributes = AttrLabelProxy
cellRendererTextBackground :: AttrLabelProxy "background"
cellRendererTextBackground = AttrLabelProxy
cellRendererTextBackgroundGdk :: AttrLabelProxy "backgroundGdk"
cellRendererTextBackgroundGdk = AttrLabelProxy
cellRendererTextBackgroundRgba :: AttrLabelProxy "backgroundRgba"
cellRendererTextBackgroundRgba = AttrLabelProxy
cellRendererTextBackgroundSet :: AttrLabelProxy "backgroundSet"
cellRendererTextBackgroundSet = AttrLabelProxy
cellRendererTextEditable :: AttrLabelProxy "editable"
cellRendererTextEditable = AttrLabelProxy
cellRendererTextEditableSet :: AttrLabelProxy "editableSet"
cellRendererTextEditableSet = AttrLabelProxy
cellRendererTextEllipsize :: AttrLabelProxy "ellipsize"
cellRendererTextEllipsize = AttrLabelProxy
cellRendererTextEllipsizeSet :: AttrLabelProxy "ellipsizeSet"
cellRendererTextEllipsizeSet = AttrLabelProxy
cellRendererTextFamily :: AttrLabelProxy "family"
cellRendererTextFamily = AttrLabelProxy
cellRendererTextFamilySet :: AttrLabelProxy "familySet"
cellRendererTextFamilySet = AttrLabelProxy
cellRendererTextFont :: AttrLabelProxy "font"
cellRendererTextFont = AttrLabelProxy
cellRendererTextFontDesc :: AttrLabelProxy "fontDesc"
cellRendererTextFontDesc = AttrLabelProxy
cellRendererTextForeground :: AttrLabelProxy "foreground"
cellRendererTextForeground = AttrLabelProxy
cellRendererTextForegroundGdk :: AttrLabelProxy "foregroundGdk"
cellRendererTextForegroundGdk = AttrLabelProxy
cellRendererTextForegroundRgba :: AttrLabelProxy "foregroundRgba"
cellRendererTextForegroundRgba = AttrLabelProxy
cellRendererTextForegroundSet :: AttrLabelProxy "foregroundSet"
cellRendererTextForegroundSet = AttrLabelProxy
cellRendererTextLanguage :: AttrLabelProxy "language"
cellRendererTextLanguage = AttrLabelProxy
cellRendererTextLanguageSet :: AttrLabelProxy "languageSet"
cellRendererTextLanguageSet = AttrLabelProxy
cellRendererTextMarkup :: AttrLabelProxy "markup"
cellRendererTextMarkup = AttrLabelProxy
cellRendererTextMaxWidthChars :: AttrLabelProxy "maxWidthChars"
cellRendererTextMaxWidthChars = AttrLabelProxy
cellRendererTextPlaceholderText :: AttrLabelProxy "placeholderText"
cellRendererTextPlaceholderText = AttrLabelProxy
cellRendererTextRise :: AttrLabelProxy "rise"
cellRendererTextRise = AttrLabelProxy
cellRendererTextRiseSet :: AttrLabelProxy "riseSet"
cellRendererTextRiseSet = AttrLabelProxy
cellRendererTextScale :: AttrLabelProxy "scale"
cellRendererTextScale = AttrLabelProxy
cellRendererTextScaleSet :: AttrLabelProxy "scaleSet"
cellRendererTextScaleSet = AttrLabelProxy
cellRendererTextSingleParagraphMode :: AttrLabelProxy "singleParagraphMode"
cellRendererTextSingleParagraphMode = AttrLabelProxy
cellRendererTextSize :: AttrLabelProxy "size"
cellRendererTextSize = AttrLabelProxy
cellRendererTextSizePoints :: AttrLabelProxy "sizePoints"
cellRendererTextSizePoints = AttrLabelProxy
cellRendererTextSizeSet :: AttrLabelProxy "sizeSet"
cellRendererTextSizeSet = AttrLabelProxy
cellRendererTextStretch :: AttrLabelProxy "stretch"
cellRendererTextStretch = AttrLabelProxy
cellRendererTextStretchSet :: AttrLabelProxy "stretchSet"
cellRendererTextStretchSet = AttrLabelProxy
cellRendererTextStrikethrough :: AttrLabelProxy "strikethrough"
cellRendererTextStrikethrough = AttrLabelProxy
cellRendererTextStrikethroughSet :: AttrLabelProxy "strikethroughSet"
cellRendererTextStrikethroughSet = AttrLabelProxy
cellRendererTextStyle :: AttrLabelProxy "style"
cellRendererTextStyle = AttrLabelProxy
cellRendererTextStyleSet :: AttrLabelProxy "styleSet"
cellRendererTextStyleSet = AttrLabelProxy
cellRendererTextText :: AttrLabelProxy "text"
cellRendererTextText = AttrLabelProxy
cellRendererTextUnderline :: AttrLabelProxy "underline"
cellRendererTextUnderline = AttrLabelProxy
cellRendererTextUnderlineSet :: AttrLabelProxy "underlineSet"
cellRendererTextUnderlineSet = AttrLabelProxy
cellRendererTextVariant :: AttrLabelProxy "variant"
cellRendererTextVariant = AttrLabelProxy
cellRendererTextVariantSet :: AttrLabelProxy "variantSet"
cellRendererTextVariantSet = AttrLabelProxy
cellRendererTextWeight :: AttrLabelProxy "weight"
cellRendererTextWeight = AttrLabelProxy
cellRendererTextWeightSet :: AttrLabelProxy "weightSet"
cellRendererTextWeightSet = AttrLabelProxy
cellRendererTextWidthChars :: AttrLabelProxy "widthChars"
cellRendererTextWidthChars = AttrLabelProxy
cellRendererTextWrapMode :: AttrLabelProxy "wrapMode"
cellRendererTextWrapMode = AttrLabelProxy
cellRendererTextWrapWidth :: AttrLabelProxy "wrapWidth"
cellRendererTextWrapWidth = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList CellRendererText = CellRendererTextSignalList
type CellRendererTextSignalList = ('[ '("edited", CellRendererTextEditedSignalInfo), '("editingCanceled", Gtk.CellRenderer.CellRendererEditingCanceledSignalInfo), '("editingStarted", Gtk.CellRenderer.CellRendererEditingStartedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_cell_renderer_text_new" gtk_cell_renderer_text_new ::
IO (Ptr CellRendererText)
cellRendererTextNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m CellRendererText
cellRendererTextNew :: m CellRendererText
cellRendererTextNew = IO CellRendererText -> m CellRendererText
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CellRendererText -> m CellRendererText)
-> IO CellRendererText -> m CellRendererText
forall a b. (a -> b) -> a -> b
$ do
Ptr CellRendererText
result <- IO (Ptr CellRendererText)
gtk_cell_renderer_text_new
Text -> Ptr CellRendererText -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "cellRendererTextNew" Ptr CellRendererText
result
CellRendererText
result' <- ((ManagedPtr CellRendererText -> CellRendererText)
-> Ptr CellRendererText -> IO CellRendererText
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr CellRendererText -> CellRendererText
CellRendererText) Ptr CellRendererText
result
CellRendererText -> IO CellRendererText
forall (m :: * -> *) a. Monad m => a -> m a
return CellRendererText
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_cell_renderer_text_set_fixed_height_from_font" gtk_cell_renderer_text_set_fixed_height_from_font ::
Ptr CellRendererText ->
Int32 ->
IO ()
cellRendererTextSetFixedHeightFromFont ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRendererText a) =>
a
-> Int32
-> m ()
cellRendererTextSetFixedHeightFromFont :: a -> Int32 -> m ()
cellRendererTextSetFixedHeightFromFont renderer :: a
renderer numberOfRows :: Int32
numberOfRows = 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 CellRendererText
renderer' <- a -> IO (Ptr CellRendererText)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr CellRendererText -> Int32 -> IO ()
gtk_cell_renderer_text_set_fixed_height_from_font Ptr CellRendererText
renderer' Int32
numberOfRows
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CellRendererTextSetFixedHeightFromFontMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsCellRendererText a) => O.MethodInfo CellRendererTextSetFixedHeightFromFontMethodInfo a signature where
overloadedMethod = cellRendererTextSetFixedHeightFromFont
#endif