gi-gtk-3.0.28: GI/Gtk/Objects/Entry.hs
{- |
Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte
License : LGPL-2.1
Maintainer : Iñaki García Etxebarria (inaki@blueleaf.cc)
The 'GI.Gtk.Objects.Entry.Entry' widget is a single line text entry
widget. A fairly large set of key bindings are supported
by default. If the entered text is longer than the allocation
of the widget, the widget will scroll so that the cursor
position is visible.
When using an entry for passwords and other sensitive information,
it can be put into “password mode” using 'GI.Gtk.Objects.Entry.entrySetVisibility'.
In this mode, entered text is displayed using a “invisible” character.
By default, GTK+ picks the best invisible character that is available
in the current font, but it can be changed with
'GI.Gtk.Objects.Entry.entrySetInvisibleChar'. Since 2.16, GTK+ displays a warning
when Caps Lock or input methods might interfere with entering text in
a password entry. The warning can be turned off with the
'GI.Gtk.Objects.Entry.Entry':@/caps-lock-warning/@ property.
Since 2.16, GtkEntry has the ability to display progress or activity
information behind the text. To make an entry display such information,
use 'GI.Gtk.Objects.Entry.entrySetProgressFraction' or 'GI.Gtk.Objects.Entry.entrySetProgressPulseStep'.
Additionally, GtkEntry can show icons at either side of the entry. These
icons can be activatable by clicking, can be set up as drag source and
can have tooltips. To add an icon, use 'GI.Gtk.Objects.Entry.entrySetIconFromGicon' or
one of the various other functions that set an icon from a stock id, an
icon name or a pixbuf. To trigger an action when the user clicks an icon,
connect to the 'GI.Gtk.Objects.Entry.Entry'::@/icon-press/@ signal. To allow DND operations
from an icon, use 'GI.Gtk.Objects.Entry.entrySetIconDragSource'. To set a tooltip on
an icon, use 'GI.Gtk.Objects.Entry.entrySetIconTooltipText' or the corresponding function
for markup.
Note that functionality or information that is only available by clicking
on an icon in an entry may not be accessible at all to users which are not
able to use a mouse or other pointing device. It is therefore recommended
that any such functionality should also be available by other means, e.g.
via the context menu of the entry.
= CSS nodes
=== /plain code/
>
>entry[.read-only][.flat][.warning][.error]
>├── image.left
>├── image.right
>├── undershoot.left
>├── undershoot.right
>├── [selection]
>├── [progress[.pulse]]
>╰── [window.popup]
GtkEntry has a main node with the name entry. Depending on the properties
of the entry, the style classes .read-only and .flat may appear. The style
classes .warning and .error may also be used with entries.
When the entry shows icons, it adds subnodes with the name image and the
style class .left or .right, depending on where the icon appears.
When the entry has a selection, it adds a subnode with the name selection.
When the entry shows progress, it adds a subnode with the name progress.
The node has the style class .pulse when the shown progress is pulsing.
The CSS node for a context menu is added as a subnode below entry as well.
The undershoot nodes are used to draw the underflow indication when content
is scrolled out of view. These nodes get the .left and .right style classes
added depending on where the indication is drawn.
When touch is used and touch selection handles are shown, they are using
CSS nodes with name cursor-handle. They get the .top or .bottom style class
depending on where they are shown in relation to the selection. If there is
just a single handle for the text cursor, it gets the style class
.insertion-cursor.
-}
#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.Entry
(
-- * Exported types
Entry(..) ,
IsEntry ,
toEntry ,
noEntry ,
-- * Methods
-- ** getActivatesDefault #method:getActivatesDefault#
#if ENABLE_OVERLOADING
EntryGetActivatesDefaultMethodInfo ,
#endif
entryGetActivatesDefault ,
-- ** getAlignment #method:getAlignment#
#if ENABLE_OVERLOADING
EntryGetAlignmentMethodInfo ,
#endif
entryGetAlignment ,
-- ** getAttributes #method:getAttributes#
#if ENABLE_OVERLOADING
EntryGetAttributesMethodInfo ,
#endif
entryGetAttributes ,
-- ** getBuffer #method:getBuffer#
#if ENABLE_OVERLOADING
EntryGetBufferMethodInfo ,
#endif
entryGetBuffer ,
-- ** getCompletion #method:getCompletion#
#if ENABLE_OVERLOADING
EntryGetCompletionMethodInfo ,
#endif
entryGetCompletion ,
-- ** getCurrentIconDragSource #method:getCurrentIconDragSource#
#if ENABLE_OVERLOADING
EntryGetCurrentIconDragSourceMethodInfo ,
#endif
entryGetCurrentIconDragSource ,
-- ** getCursorHadjustment #method:getCursorHadjustment#
#if ENABLE_OVERLOADING
EntryGetCursorHadjustmentMethodInfo ,
#endif
entryGetCursorHadjustment ,
-- ** getHasFrame #method:getHasFrame#
#if ENABLE_OVERLOADING
EntryGetHasFrameMethodInfo ,
#endif
entryGetHasFrame ,
-- ** getIconActivatable #method:getIconActivatable#
#if ENABLE_OVERLOADING
EntryGetIconActivatableMethodInfo ,
#endif
entryGetIconActivatable ,
-- ** getIconArea #method:getIconArea#
#if ENABLE_OVERLOADING
EntryGetIconAreaMethodInfo ,
#endif
entryGetIconArea ,
-- ** getIconAtPos #method:getIconAtPos#
#if ENABLE_OVERLOADING
EntryGetIconAtPosMethodInfo ,
#endif
entryGetIconAtPos ,
-- ** getIconGicon #method:getIconGicon#
#if ENABLE_OVERLOADING
EntryGetIconGiconMethodInfo ,
#endif
entryGetIconGicon ,
-- ** getIconName #method:getIconName#
#if ENABLE_OVERLOADING
EntryGetIconNameMethodInfo ,
#endif
entryGetIconName ,
-- ** getIconPixbuf #method:getIconPixbuf#
#if ENABLE_OVERLOADING
EntryGetIconPixbufMethodInfo ,
#endif
entryGetIconPixbuf ,
-- ** getIconSensitive #method:getIconSensitive#
#if ENABLE_OVERLOADING
EntryGetIconSensitiveMethodInfo ,
#endif
entryGetIconSensitive ,
-- ** getIconStock #method:getIconStock#
#if ENABLE_OVERLOADING
EntryGetIconStockMethodInfo ,
#endif
entryGetIconStock ,
-- ** getIconStorageType #method:getIconStorageType#
#if ENABLE_OVERLOADING
EntryGetIconStorageTypeMethodInfo ,
#endif
entryGetIconStorageType ,
-- ** getIconTooltipMarkup #method:getIconTooltipMarkup#
#if ENABLE_OVERLOADING
EntryGetIconTooltipMarkupMethodInfo ,
#endif
entryGetIconTooltipMarkup ,
-- ** getIconTooltipText #method:getIconTooltipText#
#if ENABLE_OVERLOADING
EntryGetIconTooltipTextMethodInfo ,
#endif
entryGetIconTooltipText ,
-- ** getInnerBorder #method:getInnerBorder#
#if ENABLE_OVERLOADING
EntryGetInnerBorderMethodInfo ,
#endif
entryGetInnerBorder ,
-- ** getInputHints #method:getInputHints#
#if ENABLE_OVERLOADING
EntryGetInputHintsMethodInfo ,
#endif
entryGetInputHints ,
-- ** getInputPurpose #method:getInputPurpose#
#if ENABLE_OVERLOADING
EntryGetInputPurposeMethodInfo ,
#endif
entryGetInputPurpose ,
-- ** getInvisibleChar #method:getInvisibleChar#
#if ENABLE_OVERLOADING
EntryGetInvisibleCharMethodInfo ,
#endif
entryGetInvisibleChar ,
-- ** getLayout #method:getLayout#
#if ENABLE_OVERLOADING
EntryGetLayoutMethodInfo ,
#endif
entryGetLayout ,
-- ** getLayoutOffsets #method:getLayoutOffsets#
#if ENABLE_OVERLOADING
EntryGetLayoutOffsetsMethodInfo ,
#endif
entryGetLayoutOffsets ,
-- ** getMaxLength #method:getMaxLength#
#if ENABLE_OVERLOADING
EntryGetMaxLengthMethodInfo ,
#endif
entryGetMaxLength ,
-- ** getMaxWidthChars #method:getMaxWidthChars#
#if ENABLE_OVERLOADING
EntryGetMaxWidthCharsMethodInfo ,
#endif
entryGetMaxWidthChars ,
-- ** getOverwriteMode #method:getOverwriteMode#
#if ENABLE_OVERLOADING
EntryGetOverwriteModeMethodInfo ,
#endif
entryGetOverwriteMode ,
-- ** getPlaceholderText #method:getPlaceholderText#
#if ENABLE_OVERLOADING
EntryGetPlaceholderTextMethodInfo ,
#endif
entryGetPlaceholderText ,
-- ** getProgressFraction #method:getProgressFraction#
#if ENABLE_OVERLOADING
EntryGetProgressFractionMethodInfo ,
#endif
entryGetProgressFraction ,
-- ** getProgressPulseStep #method:getProgressPulseStep#
#if ENABLE_OVERLOADING
EntryGetProgressPulseStepMethodInfo ,
#endif
entryGetProgressPulseStep ,
-- ** getTabs #method:getTabs#
#if ENABLE_OVERLOADING
EntryGetTabsMethodInfo ,
#endif
entryGetTabs ,
-- ** getText #method:getText#
#if ENABLE_OVERLOADING
EntryGetTextMethodInfo ,
#endif
entryGetText ,
-- ** getTextArea #method:getTextArea#
#if ENABLE_OVERLOADING
EntryGetTextAreaMethodInfo ,
#endif
entryGetTextArea ,
-- ** getTextLength #method:getTextLength#
#if ENABLE_OVERLOADING
EntryGetTextLengthMethodInfo ,
#endif
entryGetTextLength ,
-- ** getVisibility #method:getVisibility#
#if ENABLE_OVERLOADING
EntryGetVisibilityMethodInfo ,
#endif
entryGetVisibility ,
-- ** getWidthChars #method:getWidthChars#
#if ENABLE_OVERLOADING
EntryGetWidthCharsMethodInfo ,
#endif
entryGetWidthChars ,
-- ** grabFocusWithoutSelecting #method:grabFocusWithoutSelecting#
#if ENABLE_OVERLOADING
EntryGrabFocusWithoutSelectingMethodInfo,
#endif
entryGrabFocusWithoutSelecting ,
-- ** imContextFilterKeypress #method:imContextFilterKeypress#
#if ENABLE_OVERLOADING
EntryImContextFilterKeypressMethodInfo ,
#endif
entryImContextFilterKeypress ,
-- ** layoutIndexToTextIndex #method:layoutIndexToTextIndex#
#if ENABLE_OVERLOADING
EntryLayoutIndexToTextIndexMethodInfo ,
#endif
entryLayoutIndexToTextIndex ,
-- ** new #method:new#
entryNew ,
-- ** newWithBuffer #method:newWithBuffer#
entryNewWithBuffer ,
-- ** progressPulse #method:progressPulse#
#if ENABLE_OVERLOADING
EntryProgressPulseMethodInfo ,
#endif
entryProgressPulse ,
-- ** resetImContext #method:resetImContext#
#if ENABLE_OVERLOADING
EntryResetImContextMethodInfo ,
#endif
entryResetImContext ,
-- ** setActivatesDefault #method:setActivatesDefault#
#if ENABLE_OVERLOADING
EntrySetActivatesDefaultMethodInfo ,
#endif
entrySetActivatesDefault ,
-- ** setAlignment #method:setAlignment#
#if ENABLE_OVERLOADING
EntrySetAlignmentMethodInfo ,
#endif
entrySetAlignment ,
-- ** setAttributes #method:setAttributes#
#if ENABLE_OVERLOADING
EntrySetAttributesMethodInfo ,
#endif
entrySetAttributes ,
-- ** setBuffer #method:setBuffer#
#if ENABLE_OVERLOADING
EntrySetBufferMethodInfo ,
#endif
entrySetBuffer ,
-- ** setCompletion #method:setCompletion#
#if ENABLE_OVERLOADING
EntrySetCompletionMethodInfo ,
#endif
entrySetCompletion ,
-- ** setCursorHadjustment #method:setCursorHadjustment#
#if ENABLE_OVERLOADING
EntrySetCursorHadjustmentMethodInfo ,
#endif
entrySetCursorHadjustment ,
-- ** setHasFrame #method:setHasFrame#
#if ENABLE_OVERLOADING
EntrySetHasFrameMethodInfo ,
#endif
entrySetHasFrame ,
-- ** setIconActivatable #method:setIconActivatable#
#if ENABLE_OVERLOADING
EntrySetIconActivatableMethodInfo ,
#endif
entrySetIconActivatable ,
-- ** setIconDragSource #method:setIconDragSource#
#if ENABLE_OVERLOADING
EntrySetIconDragSourceMethodInfo ,
#endif
entrySetIconDragSource ,
-- ** setIconFromGicon #method:setIconFromGicon#
#if ENABLE_OVERLOADING
EntrySetIconFromGiconMethodInfo ,
#endif
entrySetIconFromGicon ,
-- ** setIconFromIconName #method:setIconFromIconName#
#if ENABLE_OVERLOADING
EntrySetIconFromIconNameMethodInfo ,
#endif
entrySetIconFromIconName ,
-- ** setIconFromPixbuf #method:setIconFromPixbuf#
#if ENABLE_OVERLOADING
EntrySetIconFromPixbufMethodInfo ,
#endif
entrySetIconFromPixbuf ,
-- ** setIconFromStock #method:setIconFromStock#
#if ENABLE_OVERLOADING
EntrySetIconFromStockMethodInfo ,
#endif
entrySetIconFromStock ,
-- ** setIconSensitive #method:setIconSensitive#
#if ENABLE_OVERLOADING
EntrySetIconSensitiveMethodInfo ,
#endif
entrySetIconSensitive ,
-- ** setIconTooltipMarkup #method:setIconTooltipMarkup#
#if ENABLE_OVERLOADING
EntrySetIconTooltipMarkupMethodInfo ,
#endif
entrySetIconTooltipMarkup ,
-- ** setIconTooltipText #method:setIconTooltipText#
#if ENABLE_OVERLOADING
EntrySetIconTooltipTextMethodInfo ,
#endif
entrySetIconTooltipText ,
-- ** setInnerBorder #method:setInnerBorder#
#if ENABLE_OVERLOADING
EntrySetInnerBorderMethodInfo ,
#endif
entrySetInnerBorder ,
-- ** setInputHints #method:setInputHints#
#if ENABLE_OVERLOADING
EntrySetInputHintsMethodInfo ,
#endif
entrySetInputHints ,
-- ** setInputPurpose #method:setInputPurpose#
#if ENABLE_OVERLOADING
EntrySetInputPurposeMethodInfo ,
#endif
entrySetInputPurpose ,
-- ** setInvisibleChar #method:setInvisibleChar#
#if ENABLE_OVERLOADING
EntrySetInvisibleCharMethodInfo ,
#endif
entrySetInvisibleChar ,
-- ** setMaxLength #method:setMaxLength#
#if ENABLE_OVERLOADING
EntrySetMaxLengthMethodInfo ,
#endif
entrySetMaxLength ,
-- ** setMaxWidthChars #method:setMaxWidthChars#
#if ENABLE_OVERLOADING
EntrySetMaxWidthCharsMethodInfo ,
#endif
entrySetMaxWidthChars ,
-- ** setOverwriteMode #method:setOverwriteMode#
#if ENABLE_OVERLOADING
EntrySetOverwriteModeMethodInfo ,
#endif
entrySetOverwriteMode ,
-- ** setPlaceholderText #method:setPlaceholderText#
#if ENABLE_OVERLOADING
EntrySetPlaceholderTextMethodInfo ,
#endif
entrySetPlaceholderText ,
-- ** setProgressFraction #method:setProgressFraction#
#if ENABLE_OVERLOADING
EntrySetProgressFractionMethodInfo ,
#endif
entrySetProgressFraction ,
-- ** setProgressPulseStep #method:setProgressPulseStep#
#if ENABLE_OVERLOADING
EntrySetProgressPulseStepMethodInfo ,
#endif
entrySetProgressPulseStep ,
-- ** setTabs #method:setTabs#
#if ENABLE_OVERLOADING
EntrySetTabsMethodInfo ,
#endif
entrySetTabs ,
-- ** setText #method:setText#
#if ENABLE_OVERLOADING
EntrySetTextMethodInfo ,
#endif
entrySetText ,
-- ** setVisibility #method:setVisibility#
#if ENABLE_OVERLOADING
EntrySetVisibilityMethodInfo ,
#endif
entrySetVisibility ,
-- ** setWidthChars #method:setWidthChars#
#if ENABLE_OVERLOADING
EntrySetWidthCharsMethodInfo ,
#endif
entrySetWidthChars ,
-- ** textIndexToLayoutIndex #method:textIndexToLayoutIndex#
#if ENABLE_OVERLOADING
EntryTextIndexToLayoutIndexMethodInfo ,
#endif
entryTextIndexToLayoutIndex ,
-- ** unsetInvisibleChar #method:unsetInvisibleChar#
#if ENABLE_OVERLOADING
EntryUnsetInvisibleCharMethodInfo ,
#endif
entryUnsetInvisibleChar ,
-- * Properties
-- ** activatesDefault #attr:activatesDefault#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryActivatesDefaultPropertyInfo ,
#endif
constructEntryActivatesDefault ,
#if ENABLE_OVERLOADING
entryActivatesDefault ,
#endif
getEntryActivatesDefault ,
setEntryActivatesDefault ,
-- ** attributes #attr:attributes#
{- | A list of Pango attributes to apply to the text of the entry.
This is mainly useful to change the size or weight of the text.
The 'GI.Pango.Structs.Attribute.Attribute'\'s /@startIndex@/ and /@endIndex@/ must refer to the
'GI.Gtk.Objects.EntryBuffer.EntryBuffer' text, i.e. without the preedit string.
/Since: 3.6/
-}
#if ENABLE_OVERLOADING
EntryAttributesPropertyInfo ,
#endif
constructEntryAttributes ,
#if ENABLE_OVERLOADING
entryAttributes ,
#endif
getEntryAttributes ,
setEntryAttributes ,
-- ** buffer #attr:buffer#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryBufferPropertyInfo ,
#endif
constructEntryBuffer ,
#if ENABLE_OVERLOADING
entryBuffer ,
#endif
getEntryBuffer ,
setEntryBuffer ,
-- ** capsLockWarning #attr:capsLockWarning#
{- | Whether password entries will show a warning when Caps Lock is on.
Note that the warning is shown using a secondary icon, and thus
does not work if you are using the secondary icon position for some
other purpose.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryCapsLockWarningPropertyInfo ,
#endif
constructEntryCapsLockWarning ,
#if ENABLE_OVERLOADING
entryCapsLockWarning ,
#endif
getEntryCapsLockWarning ,
setEntryCapsLockWarning ,
-- ** completion #attr:completion#
{- | The auxiliary completion object to use with the entry.
/Since: 3.2/
-}
#if ENABLE_OVERLOADING
EntryCompletionPropertyInfo ,
#endif
clearEntryCompletion ,
constructEntryCompletion ,
#if ENABLE_OVERLOADING
entryCompletion ,
#endif
getEntryCompletion ,
setEntryCompletion ,
-- ** cursorPosition #attr:cursorPosition#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryCursorPositionPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryCursorPosition ,
#endif
getEntryCursorPosition ,
-- ** editable #attr:editable#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryEditablePropertyInfo ,
#endif
constructEntryEditable ,
#if ENABLE_OVERLOADING
entryEditable ,
#endif
getEntryEditable ,
setEntryEditable ,
-- ** enableEmojiCompletion #attr:enableEmojiCompletion#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryEnableEmojiCompletionPropertyInfo ,
#endif
constructEntryEnableEmojiCompletion ,
#if ENABLE_OVERLOADING
entryEnableEmojiCompletion ,
#endif
getEntryEnableEmojiCompletion ,
setEntryEnableEmojiCompletion ,
-- ** hasFrame #attr:hasFrame#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryHasFramePropertyInfo ,
#endif
constructEntryHasFrame ,
#if ENABLE_OVERLOADING
entryHasFrame ,
#endif
getEntryHasFrame ,
setEntryHasFrame ,
-- ** imModule #attr:imModule#
{- | Which IM (input method) module should be used for this entry.
See 'GI.Gtk.Objects.IMContext.IMContext'.
Setting this to a non-'Nothing' value overrides the
system-wide IM module setting. See the GtkSettings
'GI.Gtk.Objects.Settings.Settings':@/gtk-im-module/@ property.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryImModulePropertyInfo ,
#endif
clearEntryImModule ,
constructEntryImModule ,
#if ENABLE_OVERLOADING
entryImModule ,
#endif
getEntryImModule ,
setEntryImModule ,
-- ** innerBorder #attr:innerBorder#
{- | Sets the text area\'s border between the text and the frame.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
EntryInnerBorderPropertyInfo ,
#endif
clearEntryInnerBorder ,
constructEntryInnerBorder ,
#if ENABLE_OVERLOADING
entryInnerBorder ,
#endif
getEntryInnerBorder ,
setEntryInnerBorder ,
-- ** inputHints #attr:inputHints#
{- | Additional hints (beyond 'GI.Gtk.Objects.Entry.Entry':@/input-purpose/@) that
allow input methods to fine-tune their behaviour.
/Since: 3.6/
-}
#if ENABLE_OVERLOADING
EntryInputHintsPropertyInfo ,
#endif
constructEntryInputHints ,
#if ENABLE_OVERLOADING
entryInputHints ,
#endif
getEntryInputHints ,
setEntryInputHints ,
-- ** inputPurpose #attr:inputPurpose#
{- | The purpose of this text field.
This property can be used by on-screen keyboards and other input
methods to adjust their behaviour.
Note that setting the purpose to 'GI.Gtk.Enums.InputPurposePassword' or
'GI.Gtk.Enums.InputPurposePin' is independent from setting
'GI.Gtk.Objects.Entry.Entry':@/visibility/@.
/Since: 3.6/
-}
#if ENABLE_OVERLOADING
EntryInputPurposePropertyInfo ,
#endif
constructEntryInputPurpose ,
#if ENABLE_OVERLOADING
entryInputPurpose ,
#endif
getEntryInputPurpose ,
setEntryInputPurpose ,
-- ** invisibleChar #attr:invisibleChar#
{- | The invisible character is used when masking entry contents (in
\\\"password mode\\\")\"). When it is not explicitly set with the
'GI.Gtk.Objects.Entry.Entry':@/invisible-char/@ property, GTK+ determines the character
to use from a list of possible candidates, depending on availability
in the current font.
This style property allows the theme to prepend a character
to the list of candidates.
/Since: 2.18/
-}
#if ENABLE_OVERLOADING
EntryInvisibleCharPropertyInfo ,
#endif
constructEntryInvisibleChar ,
#if ENABLE_OVERLOADING
entryInvisibleChar ,
#endif
getEntryInvisibleChar ,
setEntryInvisibleChar ,
-- ** invisibleCharSet #attr:invisibleCharSet#
{- | Whether the invisible char has been set for the 'GI.Gtk.Objects.Entry.Entry'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryInvisibleCharSetPropertyInfo ,
#endif
constructEntryInvisibleCharSet ,
#if ENABLE_OVERLOADING
entryInvisibleCharSet ,
#endif
getEntryInvisibleCharSet ,
setEntryInvisibleCharSet ,
-- ** maxLength #attr:maxLength#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryMaxLengthPropertyInfo ,
#endif
constructEntryMaxLength ,
#if ENABLE_OVERLOADING
entryMaxLength ,
#endif
getEntryMaxLength ,
setEntryMaxLength ,
-- ** maxWidthChars #attr:maxWidthChars#
{- | The desired maximum width of the entry, in characters.
If this property is set to -1, the width will be calculated
automatically.
/Since: 3.12/
-}
#if ENABLE_OVERLOADING
EntryMaxWidthCharsPropertyInfo ,
#endif
constructEntryMaxWidthChars ,
#if ENABLE_OVERLOADING
entryMaxWidthChars ,
#endif
getEntryMaxWidthChars ,
setEntryMaxWidthChars ,
-- ** overwriteMode #attr:overwriteMode#
{- | If text is overwritten when typing in the 'GI.Gtk.Objects.Entry.Entry'.
/Since: 2.14/
-}
#if ENABLE_OVERLOADING
EntryOverwriteModePropertyInfo ,
#endif
constructEntryOverwriteMode ,
#if ENABLE_OVERLOADING
entryOverwriteMode ,
#endif
getEntryOverwriteMode ,
setEntryOverwriteMode ,
-- ** placeholderText #attr:placeholderText#
{- | The text that will be displayed in the 'GI.Gtk.Objects.Entry.Entry' when it is empty
and unfocused.
/Since: 3.2/
-}
#if ENABLE_OVERLOADING
EntryPlaceholderTextPropertyInfo ,
#endif
clearEntryPlaceholderText ,
constructEntryPlaceholderText ,
#if ENABLE_OVERLOADING
entryPlaceholderText ,
#endif
getEntryPlaceholderText ,
setEntryPlaceholderText ,
-- ** populateAll #attr:populateAll#
{- | If :populate-all is 'True', the 'GI.Gtk.Objects.Entry.Entry'::@/populate-popup/@
signal is also emitted for touch popups.
/Since: 3.8/
-}
#if ENABLE_OVERLOADING
EntryPopulateAllPropertyInfo ,
#endif
constructEntryPopulateAll ,
#if ENABLE_OVERLOADING
entryPopulateAll ,
#endif
getEntryPopulateAll ,
setEntryPopulateAll ,
-- ** primaryIconActivatable #attr:primaryIconActivatable#
{- | Whether the primary icon is activatable.
GTK+ emits the 'GI.Gtk.Objects.Entry.Entry'::@/icon-press/@ and 'GI.Gtk.Objects.Entry.Entry'::@/icon-release/@
signals only on sensitive, activatable icons.
Sensitive, but non-activatable icons can be used for purely
informational purposes.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconActivatablePropertyInfo ,
#endif
constructEntryPrimaryIconActivatable ,
#if ENABLE_OVERLOADING
entryPrimaryIconActivatable ,
#endif
getEntryPrimaryIconActivatable ,
setEntryPrimaryIconActivatable ,
-- ** primaryIconGicon #attr:primaryIconGicon#
{- | The 'GI.Gio.Interfaces.Icon.Icon' to use for the primary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconGiconPropertyInfo ,
#endif
clearEntryPrimaryIconGicon ,
constructEntryPrimaryIconGicon ,
#if ENABLE_OVERLOADING
entryPrimaryIconGicon ,
#endif
getEntryPrimaryIconGicon ,
setEntryPrimaryIconGicon ,
-- ** primaryIconName #attr:primaryIconName#
{- | The icon name to use for the primary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconNamePropertyInfo ,
#endif
clearEntryPrimaryIconName ,
constructEntryPrimaryIconName ,
#if ENABLE_OVERLOADING
entryPrimaryIconName ,
#endif
getEntryPrimaryIconName ,
setEntryPrimaryIconName ,
-- ** primaryIconPixbuf #attr:primaryIconPixbuf#
{- | A pixbuf to use as the primary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconPixbufPropertyInfo ,
#endif
clearEntryPrimaryIconPixbuf ,
constructEntryPrimaryIconPixbuf ,
#if ENABLE_OVERLOADING
entryPrimaryIconPixbuf ,
#endif
getEntryPrimaryIconPixbuf ,
setEntryPrimaryIconPixbuf ,
-- ** primaryIconSensitive #attr:primaryIconSensitive#
{- | Whether the primary icon is sensitive.
An insensitive icon appears grayed out. GTK+ does not emit the
'GI.Gtk.Objects.Entry.Entry'::@/icon-press/@ and 'GI.Gtk.Objects.Entry.Entry'::@/icon-release/@ signals and
does not allow DND from insensitive icons.
An icon should be set insensitive if the action that would trigger
when clicked is currently not available.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconSensitivePropertyInfo ,
#endif
constructEntryPrimaryIconSensitive ,
#if ENABLE_OVERLOADING
entryPrimaryIconSensitive ,
#endif
getEntryPrimaryIconSensitive ,
setEntryPrimaryIconSensitive ,
-- ** primaryIconStock #attr:primaryIconStock#
{- | The stock id to use for the primary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconStockPropertyInfo ,
#endif
clearEntryPrimaryIconStock ,
constructEntryPrimaryIconStock ,
#if ENABLE_OVERLOADING
entryPrimaryIconStock ,
#endif
getEntryPrimaryIconStock ,
setEntryPrimaryIconStock ,
-- ** primaryIconStorageType #attr:primaryIconStorageType#
{- | The representation which is used for the primary icon of the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconStorageTypePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryPrimaryIconStorageType ,
#endif
getEntryPrimaryIconStorageType ,
-- ** primaryIconTooltipMarkup #attr:primaryIconTooltipMarkup#
{- | The contents of the tooltip on the primary icon, which is marked up
with the [Pango text markup language][PangoMarkupFormat].
Also see 'GI.Gtk.Objects.Entry.entrySetIconTooltipMarkup'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconTooltipMarkupPropertyInfo,
#endif
clearEntryPrimaryIconTooltipMarkup ,
constructEntryPrimaryIconTooltipMarkup ,
#if ENABLE_OVERLOADING
entryPrimaryIconTooltipMarkup ,
#endif
getEntryPrimaryIconTooltipMarkup ,
setEntryPrimaryIconTooltipMarkup ,
-- ** primaryIconTooltipText #attr:primaryIconTooltipText#
{- | The contents of the tooltip on the primary icon.
Also see 'GI.Gtk.Objects.Entry.entrySetIconTooltipText'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryPrimaryIconTooltipTextPropertyInfo ,
#endif
clearEntryPrimaryIconTooltipText ,
constructEntryPrimaryIconTooltipText ,
#if ENABLE_OVERLOADING
entryPrimaryIconTooltipText ,
#endif
getEntryPrimaryIconTooltipText ,
setEntryPrimaryIconTooltipText ,
-- ** progressFraction #attr:progressFraction#
{- | The current fraction of the task that\'s been completed.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryProgressFractionPropertyInfo ,
#endif
constructEntryProgressFraction ,
#if ENABLE_OVERLOADING
entryProgressFraction ,
#endif
getEntryProgressFraction ,
setEntryProgressFraction ,
-- ** progressPulseStep #attr:progressPulseStep#
{- | The fraction of total entry width to move the progress
bouncing block for each call to 'GI.Gtk.Objects.Entry.entryProgressPulse'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntryProgressPulseStepPropertyInfo ,
#endif
constructEntryProgressPulseStep ,
#if ENABLE_OVERLOADING
entryProgressPulseStep ,
#endif
getEntryProgressPulseStep ,
setEntryProgressPulseStep ,
-- ** scrollOffset #attr:scrollOffset#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryScrollOffsetPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryScrollOffset ,
#endif
getEntryScrollOffset ,
-- ** secondaryIconActivatable #attr:secondaryIconActivatable#
{- | Whether the secondary icon is activatable.
GTK+ emits the 'GI.Gtk.Objects.Entry.Entry'::@/icon-press/@ and 'GI.Gtk.Objects.Entry.Entry'::@/icon-release/@
signals only on sensitive, activatable icons.
Sensitive, but non-activatable icons can be used for purely
informational purposes.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconActivatablePropertyInfo,
#endif
constructEntrySecondaryIconActivatable ,
#if ENABLE_OVERLOADING
entrySecondaryIconActivatable ,
#endif
getEntrySecondaryIconActivatable ,
setEntrySecondaryIconActivatable ,
-- ** secondaryIconGicon #attr:secondaryIconGicon#
{- | The 'GI.Gio.Interfaces.Icon.Icon' to use for the secondary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconGiconPropertyInfo ,
#endif
clearEntrySecondaryIconGicon ,
constructEntrySecondaryIconGicon ,
#if ENABLE_OVERLOADING
entrySecondaryIconGicon ,
#endif
getEntrySecondaryIconGicon ,
setEntrySecondaryIconGicon ,
-- ** secondaryIconName #attr:secondaryIconName#
{- | The icon name to use for the secondary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconNamePropertyInfo ,
#endif
clearEntrySecondaryIconName ,
constructEntrySecondaryIconName ,
#if ENABLE_OVERLOADING
entrySecondaryIconName ,
#endif
getEntrySecondaryIconName ,
setEntrySecondaryIconName ,
-- ** secondaryIconPixbuf #attr:secondaryIconPixbuf#
{- | An pixbuf to use as the secondary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconPixbufPropertyInfo ,
#endif
clearEntrySecondaryIconPixbuf ,
constructEntrySecondaryIconPixbuf ,
#if ENABLE_OVERLOADING
entrySecondaryIconPixbuf ,
#endif
getEntrySecondaryIconPixbuf ,
setEntrySecondaryIconPixbuf ,
-- ** secondaryIconSensitive #attr:secondaryIconSensitive#
{- | Whether the secondary icon is sensitive.
An insensitive icon appears grayed out. GTK+ does not emit the
'GI.Gtk.Objects.Entry.Entry'::@/icon-press/@ and 'GI.Gtk.Objects.Entry.Entry'::@/icon-release/@ signals and
does not allow DND from insensitive icons.
An icon should be set insensitive if the action that would trigger
when clicked is currently not available.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconSensitivePropertyInfo ,
#endif
constructEntrySecondaryIconSensitive ,
#if ENABLE_OVERLOADING
entrySecondaryIconSensitive ,
#endif
getEntrySecondaryIconSensitive ,
setEntrySecondaryIconSensitive ,
-- ** secondaryIconStock #attr:secondaryIconStock#
{- | The stock id to use for the secondary icon for the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconStockPropertyInfo ,
#endif
clearEntrySecondaryIconStock ,
constructEntrySecondaryIconStock ,
#if ENABLE_OVERLOADING
entrySecondaryIconStock ,
#endif
getEntrySecondaryIconStock ,
setEntrySecondaryIconStock ,
-- ** secondaryIconStorageType #attr:secondaryIconStorageType#
{- | The representation which is used for the secondary icon of the entry.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconStorageTypePropertyInfo,
#endif
#if ENABLE_OVERLOADING
entrySecondaryIconStorageType ,
#endif
getEntrySecondaryIconStorageType ,
-- ** secondaryIconTooltipMarkup #attr:secondaryIconTooltipMarkup#
{- | The contents of the tooltip on the secondary icon, which is marked up
with the [Pango text markup language][PangoMarkupFormat].
Also see 'GI.Gtk.Objects.Entry.entrySetIconTooltipMarkup'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconTooltipMarkupPropertyInfo,
#endif
clearEntrySecondaryIconTooltipMarkup ,
constructEntrySecondaryIconTooltipMarkup,
#if ENABLE_OVERLOADING
entrySecondaryIconTooltipMarkup ,
#endif
getEntrySecondaryIconTooltipMarkup ,
setEntrySecondaryIconTooltipMarkup ,
-- ** secondaryIconTooltipText #attr:secondaryIconTooltipText#
{- | The contents of the tooltip on the secondary icon.
Also see 'GI.Gtk.Objects.Entry.entrySetIconTooltipText'.
/Since: 2.16/
-}
#if ENABLE_OVERLOADING
EntrySecondaryIconTooltipTextPropertyInfo,
#endif
clearEntrySecondaryIconTooltipText ,
constructEntrySecondaryIconTooltipText ,
#if ENABLE_OVERLOADING
entrySecondaryIconTooltipText ,
#endif
getEntrySecondaryIconTooltipText ,
setEntrySecondaryIconTooltipText ,
-- ** selectionBound #attr:selectionBound#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntrySelectionBoundPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entrySelectionBound ,
#endif
getEntrySelectionBound ,
-- ** shadowType #attr:shadowType#
{- | Which kind of shadow to draw around the entry when
'GI.Gtk.Objects.Entry.Entry':@/has-frame/@ is set to 'True'.
/Since: 2.12/
-}
#if ENABLE_OVERLOADING
EntryShadowTypePropertyInfo ,
#endif
constructEntryShadowType ,
#if ENABLE_OVERLOADING
entryShadowType ,
#endif
getEntryShadowType ,
setEntryShadowType ,
-- ** showEmojiIcon #attr:showEmojiIcon#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryShowEmojiIconPropertyInfo ,
#endif
constructEntryShowEmojiIcon ,
#if ENABLE_OVERLOADING
entryShowEmojiIcon ,
#endif
getEntryShowEmojiIcon ,
setEntryShowEmojiIcon ,
-- ** tabs #attr:tabs#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryTabsPropertyInfo ,
#endif
constructEntryTabs ,
#if ENABLE_OVERLOADING
entryTabs ,
#endif
getEntryTabs ,
setEntryTabs ,
-- ** text #attr:text#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryTextPropertyInfo ,
#endif
constructEntryText ,
#if ENABLE_OVERLOADING
entryText ,
#endif
getEntryText ,
setEntryText ,
-- ** textLength #attr:textLength#
{- | The length of the text in the 'GI.Gtk.Objects.Entry.Entry'.
/Since: 2.14/
-}
#if ENABLE_OVERLOADING
EntryTextLengthPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryTextLength ,
#endif
getEntryTextLength ,
-- ** truncateMultiline #attr:truncateMultiline#
{- | When 'True', pasted multi-line text is truncated to the first line.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
EntryTruncateMultilinePropertyInfo ,
#endif
constructEntryTruncateMultiline ,
#if ENABLE_OVERLOADING
entryTruncateMultiline ,
#endif
getEntryTruncateMultiline ,
setEntryTruncateMultiline ,
-- ** visibility #attr:visibility#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryVisibilityPropertyInfo ,
#endif
constructEntryVisibility ,
#if ENABLE_OVERLOADING
entryVisibility ,
#endif
getEntryVisibility ,
setEntryVisibility ,
-- ** widthChars #attr:widthChars#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
EntryWidthCharsPropertyInfo ,
#endif
constructEntryWidthChars ,
#if ENABLE_OVERLOADING
entryWidthChars ,
#endif
getEntryWidthChars ,
setEntryWidthChars ,
-- ** xalign #attr:xalign#
{- | The horizontal alignment, from 0 (left) to 1 (right).
Reversed for RTL layouts.
/Since: 2.4/
-}
#if ENABLE_OVERLOADING
EntryXalignPropertyInfo ,
#endif
constructEntryXalign ,
#if ENABLE_OVERLOADING
entryXalign ,
#endif
getEntryXalign ,
setEntryXalign ,
-- * Signals
-- ** activate #signal:activate#
C_EntryActivateCallback ,
EntryActivateCallback ,
#if ENABLE_OVERLOADING
EntryActivateSignalInfo ,
#endif
afterEntryActivate ,
genClosure_EntryActivate ,
mk_EntryActivateCallback ,
noEntryActivateCallback ,
onEntryActivate ,
wrap_EntryActivateCallback ,
-- ** backspace #signal:backspace#
C_EntryBackspaceCallback ,
EntryBackspaceCallback ,
#if ENABLE_OVERLOADING
EntryBackspaceSignalInfo ,
#endif
afterEntryBackspace ,
genClosure_EntryBackspace ,
mk_EntryBackspaceCallback ,
noEntryBackspaceCallback ,
onEntryBackspace ,
wrap_EntryBackspaceCallback ,
-- ** copyClipboard #signal:copyClipboard#
C_EntryCopyClipboardCallback ,
EntryCopyClipboardCallback ,
#if ENABLE_OVERLOADING
EntryCopyClipboardSignalInfo ,
#endif
afterEntryCopyClipboard ,
genClosure_EntryCopyClipboard ,
mk_EntryCopyClipboardCallback ,
noEntryCopyClipboardCallback ,
onEntryCopyClipboard ,
wrap_EntryCopyClipboardCallback ,
-- ** cutClipboard #signal:cutClipboard#
C_EntryCutClipboardCallback ,
EntryCutClipboardCallback ,
#if ENABLE_OVERLOADING
EntryCutClipboardSignalInfo ,
#endif
afterEntryCutClipboard ,
genClosure_EntryCutClipboard ,
mk_EntryCutClipboardCallback ,
noEntryCutClipboardCallback ,
onEntryCutClipboard ,
wrap_EntryCutClipboardCallback ,
-- ** deleteFromCursor #signal:deleteFromCursor#
C_EntryDeleteFromCursorCallback ,
EntryDeleteFromCursorCallback ,
#if ENABLE_OVERLOADING
EntryDeleteFromCursorSignalInfo ,
#endif
afterEntryDeleteFromCursor ,
genClosure_EntryDeleteFromCursor ,
mk_EntryDeleteFromCursorCallback ,
noEntryDeleteFromCursorCallback ,
onEntryDeleteFromCursor ,
wrap_EntryDeleteFromCursorCallback ,
-- ** iconPress #signal:iconPress#
C_EntryIconPressCallback ,
EntryIconPressCallback ,
#if ENABLE_OVERLOADING
EntryIconPressSignalInfo ,
#endif
afterEntryIconPress ,
genClosure_EntryIconPress ,
mk_EntryIconPressCallback ,
noEntryIconPressCallback ,
onEntryIconPress ,
wrap_EntryIconPressCallback ,
-- ** iconRelease #signal:iconRelease#
C_EntryIconReleaseCallback ,
EntryIconReleaseCallback ,
#if ENABLE_OVERLOADING
EntryIconReleaseSignalInfo ,
#endif
afterEntryIconRelease ,
genClosure_EntryIconRelease ,
mk_EntryIconReleaseCallback ,
noEntryIconReleaseCallback ,
onEntryIconRelease ,
wrap_EntryIconReleaseCallback ,
-- ** insertAtCursor #signal:insertAtCursor#
C_EntryInsertAtCursorCallback ,
EntryInsertAtCursorCallback ,
#if ENABLE_OVERLOADING
EntryInsertAtCursorSignalInfo ,
#endif
afterEntryInsertAtCursor ,
genClosure_EntryInsertAtCursor ,
mk_EntryInsertAtCursorCallback ,
noEntryInsertAtCursorCallback ,
onEntryInsertAtCursor ,
wrap_EntryInsertAtCursorCallback ,
-- ** insertEmoji #signal:insertEmoji#
C_EntryInsertEmojiCallback ,
EntryInsertEmojiCallback ,
#if ENABLE_OVERLOADING
EntryInsertEmojiSignalInfo ,
#endif
afterEntryInsertEmoji ,
genClosure_EntryInsertEmoji ,
mk_EntryInsertEmojiCallback ,
noEntryInsertEmojiCallback ,
onEntryInsertEmoji ,
wrap_EntryInsertEmojiCallback ,
-- ** moveCursor #signal:moveCursor#
C_EntryMoveCursorCallback ,
EntryMoveCursorCallback ,
#if ENABLE_OVERLOADING
EntryMoveCursorSignalInfo ,
#endif
afterEntryMoveCursor ,
genClosure_EntryMoveCursor ,
mk_EntryMoveCursorCallback ,
noEntryMoveCursorCallback ,
onEntryMoveCursor ,
wrap_EntryMoveCursorCallback ,
-- ** pasteClipboard #signal:pasteClipboard#
C_EntryPasteClipboardCallback ,
EntryPasteClipboardCallback ,
#if ENABLE_OVERLOADING
EntryPasteClipboardSignalInfo ,
#endif
afterEntryPasteClipboard ,
genClosure_EntryPasteClipboard ,
mk_EntryPasteClipboardCallback ,
noEntryPasteClipboardCallback ,
onEntryPasteClipboard ,
wrap_EntryPasteClipboardCallback ,
-- ** populatePopup #signal:populatePopup#
C_EntryPopulatePopupCallback ,
EntryPopulatePopupCallback ,
#if ENABLE_OVERLOADING
EntryPopulatePopupSignalInfo ,
#endif
afterEntryPopulatePopup ,
genClosure_EntryPopulatePopup ,
mk_EntryPopulatePopupCallback ,
noEntryPopulatePopupCallback ,
onEntryPopulatePopup ,
wrap_EntryPopulatePopupCallback ,
-- ** preeditChanged #signal:preeditChanged#
C_EntryPreeditChangedCallback ,
EntryPreeditChangedCallback ,
#if ENABLE_OVERLOADING
EntryPreeditChangedSignalInfo ,
#endif
afterEntryPreeditChanged ,
genClosure_EntryPreeditChanged ,
mk_EntryPreeditChangedCallback ,
noEntryPreeditChangedCallback ,
onEntryPreeditChanged ,
wrap_EntryPreeditChangedCallback ,
-- ** toggleOverwrite #signal:toggleOverwrite#
C_EntryToggleOverwriteCallback ,
EntryToggleOverwriteCallback ,
#if ENABLE_OVERLOADING
EntryToggleOverwriteSignalInfo ,
#endif
afterEntryToggleOverwrite ,
genClosure_EntryToggleOverwrite ,
mk_EntryToggleOverwriteCallback ,
noEntryToggleOverwriteCallback ,
onEntryToggleOverwrite ,
wrap_EntryToggleOverwriteCallback ,
) 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.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Flags as Gdk.Flags
import qualified GI.Gdk.Structs.EventButton as Gdk.EventButton
import qualified GI.Gdk.Structs.EventKey as Gdk.EventKey
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import qualified GI.Gio.Interfaces.Icon as Gio.Icon
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.CellEditable as Gtk.CellEditable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment
import {-# SOURCE #-} qualified GI.Gtk.Objects.EntryBuffer as Gtk.EntryBuffer
import {-# SOURCE #-} qualified GI.Gtk.Objects.EntryCompletion as Gtk.EntryCompletion
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Structs.Border as Gtk.Border
import {-# SOURCE #-} qualified GI.Gtk.Structs.TargetList as Gtk.TargetList
import qualified GI.Pango.Objects.Layout as Pango.Layout
import qualified GI.Pango.Structs.AttrList as Pango.AttrList
import qualified GI.Pango.Structs.TabArray as Pango.TabArray
-- | Memory-managed wrapper type.
newtype Entry = Entry (ManagedPtr Entry)
foreign import ccall "gtk_entry_get_type"
c_gtk_entry_get_type :: IO GType
instance GObject Entry where
gobjectType = c_gtk_entry_get_type
-- | Type class for types which can be safely cast to `Entry`, for instance with `toEntry`.
class (GObject o, O.IsDescendantOf Entry o) => IsEntry o
instance (GObject o, O.IsDescendantOf Entry o) => IsEntry o
instance O.HasParentTypes Entry
type instance O.ParentTypes Entry = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.CellEditable.CellEditable, Gtk.Editable.Editable]
-- | Cast to `Entry`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`.
toEntry :: (MonadIO m, IsEntry o) => o -> m Entry
toEntry = liftIO . unsafeCastTo Entry
-- | A convenience alias for `Nothing` :: `Maybe` `Entry`.
noEntry :: Maybe Entry
noEntry = Nothing
#if ENABLE_OVERLOADING
type family ResolveEntryMethod (t :: Symbol) (o :: *) :: * where
ResolveEntryMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveEntryMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveEntryMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveEntryMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveEntryMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveEntryMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveEntryMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveEntryMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveEntryMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveEntryMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveEntryMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveEntryMethod "childNotify" o = Gtk.Widget.WidgetChildNotifyMethodInfo
ResolveEntryMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveEntryMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveEntryMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveEntryMethod "copyClipboard" o = Gtk.Editable.EditableCopyClipboardMethodInfo
ResolveEntryMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveEntryMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveEntryMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveEntryMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveEntryMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveEntryMethod "cutClipboard" o = Gtk.Editable.EditableCutClipboardMethodInfo
ResolveEntryMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo
ResolveEntryMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo
ResolveEntryMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveEntryMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveEntryMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveEntryMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveEntryMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveEntryMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveEntryMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveEntryMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveEntryMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveEntryMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveEntryMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveEntryMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveEntryMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveEntryMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveEntryMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveEntryMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveEntryMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveEntryMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveEntryMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveEntryMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveEntryMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveEntryMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveEntryMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveEntryMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveEntryMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveEntryMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveEntryMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveEntryMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveEntryMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveEntryMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveEntryMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveEntryMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveEntryMethod "editingDone" o = Gtk.CellEditable.CellEditableEditingDoneMethodInfo
ResolveEntryMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveEntryMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveEntryMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveEntryMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveEntryMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveEntryMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveEntryMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveEntryMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveEntryMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveEntryMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveEntryMethod "grabFocusWithoutSelecting" o = EntryGrabFocusWithoutSelectingMethodInfo
ResolveEntryMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveEntryMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveEntryMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveEntryMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveEntryMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveEntryMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveEntryMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveEntryMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveEntryMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveEntryMethod "imContextFilterKeypress" o = EntryImContextFilterKeypressMethodInfo
ResolveEntryMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveEntryMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveEntryMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveEntryMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveEntryMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo
ResolveEntryMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveEntryMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveEntryMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveEntryMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveEntryMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveEntryMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveEntryMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveEntryMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveEntryMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveEntryMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveEntryMethod "layoutIndexToTextIndex" o = EntryLayoutIndexToTextIndexMethodInfo
ResolveEntryMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveEntryMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveEntryMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveEntryMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveEntryMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveEntryMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveEntryMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveEntryMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveEntryMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveEntryMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveEntryMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveEntryMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveEntryMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveEntryMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveEntryMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveEntryMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveEntryMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveEntryMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveEntryMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveEntryMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveEntryMethod "pasteClipboard" o = Gtk.Editable.EditablePasteClipboardMethodInfo
ResolveEntryMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveEntryMethod "progressPulse" o = EntryProgressPulseMethodInfo
ResolveEntryMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveEntryMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveEntryMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveEntryMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveEntryMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveEntryMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveEntryMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveEntryMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveEntryMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveEntryMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveEntryMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveEntryMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveEntryMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveEntryMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveEntryMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveEntryMethod "removeWidget" o = Gtk.CellEditable.CellEditableRemoveWidgetMethodInfo
ResolveEntryMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveEntryMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveEntryMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveEntryMethod "resetImContext" o = EntryResetImContextMethodInfo
ResolveEntryMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveEntryMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveEntryMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveEntryMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo
ResolveEntryMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveEntryMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveEntryMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveEntryMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveEntryMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveEntryMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveEntryMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveEntryMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveEntryMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveEntryMethod "startEditing" o = Gtk.CellEditable.CellEditableStartEditingMethodInfo
ResolveEntryMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveEntryMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveEntryMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveEntryMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveEntryMethod "textIndexToLayoutIndex" o = EntryTextIndexToLayoutIndexMethodInfo
ResolveEntryMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveEntryMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveEntryMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveEntryMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveEntryMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveEntryMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveEntryMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveEntryMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveEntryMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveEntryMethod "unsetInvisibleChar" o = EntryUnsetInvisibleCharMethodInfo
ResolveEntryMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveEntryMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveEntryMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveEntryMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveEntryMethod "getActivatesDefault" o = EntryGetActivatesDefaultMethodInfo
ResolveEntryMethod "getAlignment" o = EntryGetAlignmentMethodInfo
ResolveEntryMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveEntryMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveEntryMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveEntryMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveEntryMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveEntryMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveEntryMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveEntryMethod "getAttributes" o = EntryGetAttributesMethodInfo
ResolveEntryMethod "getBuffer" o = EntryGetBufferMethodInfo
ResolveEntryMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveEntryMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveEntryMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo
ResolveEntryMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveEntryMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveEntryMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveEntryMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveEntryMethod "getCompletion" o = EntryGetCompletionMethodInfo
ResolveEntryMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveEntryMethod "getCurrentIconDragSource" o = EntryGetCurrentIconDragSourceMethodInfo
ResolveEntryMethod "getCursorHadjustment" o = EntryGetCursorHadjustmentMethodInfo
ResolveEntryMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveEntryMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveEntryMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveEntryMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveEntryMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveEntryMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveEntryMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo
ResolveEntryMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveEntryMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveEntryMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveEntryMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveEntryMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveEntryMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveEntryMethod "getHasFrame" o = EntryGetHasFrameMethodInfo
ResolveEntryMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveEntryMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveEntryMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveEntryMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveEntryMethod "getIconActivatable" o = EntryGetIconActivatableMethodInfo
ResolveEntryMethod "getIconArea" o = EntryGetIconAreaMethodInfo
ResolveEntryMethod "getIconAtPos" o = EntryGetIconAtPosMethodInfo
ResolveEntryMethod "getIconGicon" o = EntryGetIconGiconMethodInfo
ResolveEntryMethod "getIconName" o = EntryGetIconNameMethodInfo
ResolveEntryMethod "getIconPixbuf" o = EntryGetIconPixbufMethodInfo
ResolveEntryMethod "getIconSensitive" o = EntryGetIconSensitiveMethodInfo
ResolveEntryMethod "getIconStock" o = EntryGetIconStockMethodInfo
ResolveEntryMethod "getIconStorageType" o = EntryGetIconStorageTypeMethodInfo
ResolveEntryMethod "getIconTooltipMarkup" o = EntryGetIconTooltipMarkupMethodInfo
ResolveEntryMethod "getIconTooltipText" o = EntryGetIconTooltipTextMethodInfo
ResolveEntryMethod "getInnerBorder" o = EntryGetInnerBorderMethodInfo
ResolveEntryMethod "getInputHints" o = EntryGetInputHintsMethodInfo
ResolveEntryMethod "getInputPurpose" o = EntryGetInputPurposeMethodInfo
ResolveEntryMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveEntryMethod "getInvisibleChar" o = EntryGetInvisibleCharMethodInfo
ResolveEntryMethod "getLayout" o = EntryGetLayoutMethodInfo
ResolveEntryMethod "getLayoutOffsets" o = EntryGetLayoutOffsetsMethodInfo
ResolveEntryMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveEntryMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveEntryMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveEntryMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveEntryMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveEntryMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveEntryMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveEntryMethod "getMaxLength" o = EntryGetMaxLengthMethodInfo
ResolveEntryMethod "getMaxWidthChars" o = EntryGetMaxWidthCharsMethodInfo
ResolveEntryMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveEntryMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveEntryMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveEntryMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveEntryMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveEntryMethod "getOverwriteMode" o = EntryGetOverwriteModeMethodInfo
ResolveEntryMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveEntryMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveEntryMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveEntryMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveEntryMethod "getPlaceholderText" o = EntryGetPlaceholderTextMethodInfo
ResolveEntryMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveEntryMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo
ResolveEntryMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveEntryMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveEntryMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveEntryMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveEntryMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveEntryMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveEntryMethod "getProgressFraction" o = EntryGetProgressFractionMethodInfo
ResolveEntryMethod "getProgressPulseStep" o = EntryGetProgressPulseStepMethodInfo
ResolveEntryMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveEntryMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveEntryMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveEntryMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveEntryMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveEntryMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveEntryMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveEntryMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveEntryMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveEntryMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo
ResolveEntryMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveEntryMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveEntryMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveEntryMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveEntryMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveEntryMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveEntryMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveEntryMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveEntryMethod "getTabs" o = EntryGetTabsMethodInfo
ResolveEntryMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveEntryMethod "getText" o = EntryGetTextMethodInfo
ResolveEntryMethod "getTextArea" o = EntryGetTextAreaMethodInfo
ResolveEntryMethod "getTextLength" o = EntryGetTextLengthMethodInfo
ResolveEntryMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveEntryMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveEntryMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveEntryMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveEntryMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveEntryMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveEntryMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveEntryMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveEntryMethod "getVisibility" o = EntryGetVisibilityMethodInfo
ResolveEntryMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveEntryMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveEntryMethod "getWidthChars" o = EntryGetWidthCharsMethodInfo
ResolveEntryMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveEntryMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveEntryMethod "setActivatesDefault" o = EntrySetActivatesDefaultMethodInfo
ResolveEntryMethod "setAlignment" o = EntrySetAlignmentMethodInfo
ResolveEntryMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveEntryMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveEntryMethod "setAttributes" o = EntrySetAttributesMethodInfo
ResolveEntryMethod "setBuffer" o = EntrySetBufferMethodInfo
ResolveEntryMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveEntryMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveEntryMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveEntryMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveEntryMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveEntryMethod "setCompletion" o = EntrySetCompletionMethodInfo
ResolveEntryMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveEntryMethod "setCursorHadjustment" o = EntrySetCursorHadjustmentMethodInfo
ResolveEntryMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveEntryMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveEntryMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveEntryMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveEntryMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveEntryMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo
ResolveEntryMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveEntryMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveEntryMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveEntryMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveEntryMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveEntryMethod "setHasFrame" o = EntrySetHasFrameMethodInfo
ResolveEntryMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveEntryMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveEntryMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveEntryMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveEntryMethod "setIconActivatable" o = EntrySetIconActivatableMethodInfo
ResolveEntryMethod "setIconDragSource" o = EntrySetIconDragSourceMethodInfo
ResolveEntryMethod "setIconFromGicon" o = EntrySetIconFromGiconMethodInfo
ResolveEntryMethod "setIconFromIconName" o = EntrySetIconFromIconNameMethodInfo
ResolveEntryMethod "setIconFromPixbuf" o = EntrySetIconFromPixbufMethodInfo
ResolveEntryMethod "setIconFromStock" o = EntrySetIconFromStockMethodInfo
ResolveEntryMethod "setIconSensitive" o = EntrySetIconSensitiveMethodInfo
ResolveEntryMethod "setIconTooltipMarkup" o = EntrySetIconTooltipMarkupMethodInfo
ResolveEntryMethod "setIconTooltipText" o = EntrySetIconTooltipTextMethodInfo
ResolveEntryMethod "setInnerBorder" o = EntrySetInnerBorderMethodInfo
ResolveEntryMethod "setInputHints" o = EntrySetInputHintsMethodInfo
ResolveEntryMethod "setInputPurpose" o = EntrySetInputPurposeMethodInfo
ResolveEntryMethod "setInvisibleChar" o = EntrySetInvisibleCharMethodInfo
ResolveEntryMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveEntryMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveEntryMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveEntryMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveEntryMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveEntryMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveEntryMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveEntryMethod "setMaxLength" o = EntrySetMaxLengthMethodInfo
ResolveEntryMethod "setMaxWidthChars" o = EntrySetMaxWidthCharsMethodInfo
ResolveEntryMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveEntryMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveEntryMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveEntryMethod "setOverwriteMode" o = EntrySetOverwriteModeMethodInfo
ResolveEntryMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveEntryMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveEntryMethod "setPlaceholderText" o = EntrySetPlaceholderTextMethodInfo
ResolveEntryMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo
ResolveEntryMethod "setProgressFraction" o = EntrySetProgressFractionMethodInfo
ResolveEntryMethod "setProgressPulseStep" o = EntrySetProgressPulseStepMethodInfo
ResolveEntryMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveEntryMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveEntryMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveEntryMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveEntryMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveEntryMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveEntryMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveEntryMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveEntryMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveEntryMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveEntryMethod "setTabs" o = EntrySetTabsMethodInfo
ResolveEntryMethod "setText" o = EntrySetTextMethodInfo
ResolveEntryMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveEntryMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveEntryMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveEntryMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveEntryMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveEntryMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveEntryMethod "setVisibility" o = EntrySetVisibilityMethodInfo
ResolveEntryMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveEntryMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveEntryMethod "setWidthChars" o = EntrySetWidthCharsMethodInfo
ResolveEntryMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveEntryMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveEntryMethod t Entry, O.MethodInfo info Entry p) => OL.IsLabel t (Entry -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
-- signal Entry::activate
{- |
The ::activate signal is emitted when the user hits
the Enter key.
While this signal is used as a
[keybinding signal][GtkBindingSignal],
it is also commonly used by applications to intercept
activation of entries.
The default bindings for this signal are all forms of the Enter key.
-}
type EntryActivateCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryActivateCallback`@.
noEntryActivateCallback :: Maybe EntryActivateCallback
noEntryActivateCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryActivateCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryActivateCallback`.
foreign import ccall "wrapper"
mk_EntryActivateCallback :: C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryActivate :: MonadIO m => EntryActivateCallback -> m (GClosure C_EntryActivateCallback)
genClosure_EntryActivate cb = liftIO $ do
let cb' = wrap_EntryActivateCallback cb
mk_EntryActivateCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryActivateCallback` into a `C_EntryActivateCallback`.
wrap_EntryActivateCallback ::
EntryActivateCallback ->
C_EntryActivateCallback
wrap_EntryActivateCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@activate@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #activate callback
@
-}
onEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
onEntryActivate obj cb = liftIO $ do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@activate@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #activate callback
@
-}
afterEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
afterEntryActivate obj cb = liftIO $ do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' SignalConnectAfter
-- signal Entry::backspace
{- |
The ::backspace signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted when the user asks for it.
The default bindings for this signal are
Backspace and Shift-Backspace.
-}
type EntryBackspaceCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryBackspaceCallback`@.
noEntryBackspaceCallback :: Maybe EntryBackspaceCallback
noEntryBackspaceCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryBackspaceCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryBackspaceCallback`.
foreign import ccall "wrapper"
mk_EntryBackspaceCallback :: C_EntryBackspaceCallback -> IO (FunPtr C_EntryBackspaceCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryBackspace :: MonadIO m => EntryBackspaceCallback -> m (GClosure C_EntryBackspaceCallback)
genClosure_EntryBackspace cb = liftIO $ do
let cb' = wrap_EntryBackspaceCallback cb
mk_EntryBackspaceCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryBackspaceCallback` into a `C_EntryBackspaceCallback`.
wrap_EntryBackspaceCallback ::
EntryBackspaceCallback ->
C_EntryBackspaceCallback
wrap_EntryBackspaceCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@backspace@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #backspace callback
@
-}
onEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
onEntryBackspace obj cb = liftIO $ do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@backspace@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #backspace callback
@
-}
afterEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
afterEntryBackspace obj cb = liftIO $ do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectAfter
-- signal Entry::copy-clipboard
{- |
The ::copy-clipboard signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted to copy the selection to the clipboard.
The default bindings for this signal are
Ctrl-c and Ctrl-Insert.
-}
type EntryCopyClipboardCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryCopyClipboardCallback`@.
noEntryCopyClipboardCallback :: Maybe EntryCopyClipboardCallback
noEntryCopyClipboardCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryCopyClipboardCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryCopyClipboardCallback`.
foreign import ccall "wrapper"
mk_EntryCopyClipboardCallback :: C_EntryCopyClipboardCallback -> IO (FunPtr C_EntryCopyClipboardCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryCopyClipboard :: MonadIO m => EntryCopyClipboardCallback -> m (GClosure C_EntryCopyClipboardCallback)
genClosure_EntryCopyClipboard cb = liftIO $ do
let cb' = wrap_EntryCopyClipboardCallback cb
mk_EntryCopyClipboardCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryCopyClipboardCallback` into a `C_EntryCopyClipboardCallback`.
wrap_EntryCopyClipboardCallback ::
EntryCopyClipboardCallback ->
C_EntryCopyClipboardCallback
wrap_EntryCopyClipboardCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@copy-clipboard@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #copyClipboard callback
@
-}
onEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
onEntryCopyClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@copy-clipboard@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #copyClipboard callback
@
-}
afterEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
afterEntryCopyClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectAfter
-- signal Entry::cut-clipboard
{- |
The ::cut-clipboard signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted to cut the selection to the clipboard.
The default bindings for this signal are
Ctrl-x and Shift-Delete.
-}
type EntryCutClipboardCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryCutClipboardCallback`@.
noEntryCutClipboardCallback :: Maybe EntryCutClipboardCallback
noEntryCutClipboardCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryCutClipboardCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryCutClipboardCallback`.
foreign import ccall "wrapper"
mk_EntryCutClipboardCallback :: C_EntryCutClipboardCallback -> IO (FunPtr C_EntryCutClipboardCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryCutClipboard :: MonadIO m => EntryCutClipboardCallback -> m (GClosure C_EntryCutClipboardCallback)
genClosure_EntryCutClipboard cb = liftIO $ do
let cb' = wrap_EntryCutClipboardCallback cb
mk_EntryCutClipboardCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryCutClipboardCallback` into a `C_EntryCutClipboardCallback`.
wrap_EntryCutClipboardCallback ::
EntryCutClipboardCallback ->
C_EntryCutClipboardCallback
wrap_EntryCutClipboardCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@cut-clipboard@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #cutClipboard callback
@
-}
onEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
onEntryCutClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@cut-clipboard@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #cutClipboard callback
@
-}
afterEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
afterEntryCutClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectAfter
-- signal Entry::delete-from-cursor
{- |
The ::delete-from-cursor signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted when the user initiates a text deletion.
If the /@type@/ is 'GI.Gtk.Enums.DeleteTypeChars', GTK+ deletes the selection
if there is one, otherwise it deletes the requested number
of characters.
The default bindings for this signal are
Delete for deleting a character and Ctrl-Delete for
deleting a word.
-}
type EntryDeleteFromCursorCallback =
Gtk.Enums.DeleteType
{- ^ /@type@/: the granularity of the deletion, as a 'GI.Gtk.Enums.DeleteType' -}
-> Int32
{- ^ /@count@/: the number of /@type@/ units to delete -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryDeleteFromCursorCallback`@.
noEntryDeleteFromCursorCallback :: Maybe EntryDeleteFromCursorCallback
noEntryDeleteFromCursorCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryDeleteFromCursorCallback =
Ptr () -> -- object
CUInt ->
Int32 ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryDeleteFromCursorCallback`.
foreign import ccall "wrapper"
mk_EntryDeleteFromCursorCallback :: C_EntryDeleteFromCursorCallback -> IO (FunPtr C_EntryDeleteFromCursorCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryDeleteFromCursor :: MonadIO m => EntryDeleteFromCursorCallback -> m (GClosure C_EntryDeleteFromCursorCallback)
genClosure_EntryDeleteFromCursor cb = liftIO $ do
let cb' = wrap_EntryDeleteFromCursorCallback cb
mk_EntryDeleteFromCursorCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryDeleteFromCursorCallback` into a `C_EntryDeleteFromCursorCallback`.
wrap_EntryDeleteFromCursorCallback ::
EntryDeleteFromCursorCallback ->
C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback _cb _ type_ count _ = do
let type_' = (toEnum . fromIntegral) type_
_cb type_' count
{- |
Connect a signal handler for the “@delete-from-cursor@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #deleteFromCursor callback
@
-}
onEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
onEntryDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@delete-from-cursor@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #deleteFromCursor callback
@
-}
afterEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
afterEntryDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectAfter
-- signal Entry::icon-press
{- |
The ::icon-press signal is emitted when an activatable icon
is clicked.
/Since: 2.16/
-}
type EntryIconPressCallback =
Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: The position of the clicked icon -}
-> Gdk.EventButton.EventButton
{- ^ /@event@/: the button press event -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryIconPressCallback`@.
noEntryIconPressCallback :: Maybe EntryIconPressCallback
noEntryIconPressCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryIconPressCallback =
Ptr () -> -- object
CUInt ->
Ptr Gdk.EventButton.EventButton ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryIconPressCallback`.
foreign import ccall "wrapper"
mk_EntryIconPressCallback :: C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryIconPress :: MonadIO m => EntryIconPressCallback -> m (GClosure C_EntryIconPressCallback)
genClosure_EntryIconPress cb = liftIO $ do
let cb' = wrap_EntryIconPressCallback cb
mk_EntryIconPressCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryIconPressCallback` into a `C_EntryIconPressCallback`.
wrap_EntryIconPressCallback ::
EntryIconPressCallback ->
C_EntryIconPressCallback
wrap_EntryIconPressCallback _cb _ iconPos event _ = do
let iconPos' = (toEnum . fromIntegral) iconPos
event' <- (newPtr Gdk.EventButton.EventButton) event
_cb iconPos' event'
{- |
Connect a signal handler for the “@icon-press@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #iconPress callback
@
-}
onEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
onEntryIconPress obj cb = liftIO $ do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@icon-press@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #iconPress callback
@
-}
afterEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
afterEntryIconPress obj cb = liftIO $ do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' SignalConnectAfter
-- signal Entry::icon-release
{- |
The ::icon-release signal is emitted on the button release from a
mouse click over an activatable icon.
/Since: 2.16/
-}
type EntryIconReleaseCallback =
Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: The position of the clicked icon -}
-> Gdk.EventButton.EventButton
{- ^ /@event@/: the button release event -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryIconReleaseCallback`@.
noEntryIconReleaseCallback :: Maybe EntryIconReleaseCallback
noEntryIconReleaseCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryIconReleaseCallback =
Ptr () -> -- object
CUInt ->
Ptr Gdk.EventButton.EventButton ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryIconReleaseCallback`.
foreign import ccall "wrapper"
mk_EntryIconReleaseCallback :: C_EntryIconReleaseCallback -> IO (FunPtr C_EntryIconReleaseCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryIconRelease :: MonadIO m => EntryIconReleaseCallback -> m (GClosure C_EntryIconReleaseCallback)
genClosure_EntryIconRelease cb = liftIO $ do
let cb' = wrap_EntryIconReleaseCallback cb
mk_EntryIconReleaseCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryIconReleaseCallback` into a `C_EntryIconReleaseCallback`.
wrap_EntryIconReleaseCallback ::
EntryIconReleaseCallback ->
C_EntryIconReleaseCallback
wrap_EntryIconReleaseCallback _cb _ iconPos event _ = do
let iconPos' = (toEnum . fromIntegral) iconPos
event' <- (newPtr Gdk.EventButton.EventButton) event
_cb iconPos' event'
{- |
Connect a signal handler for the “@icon-release@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #iconRelease callback
@
-}
onEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
onEntryIconRelease obj cb = liftIO $ do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@icon-release@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #iconRelease callback
@
-}
afterEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
afterEntryIconRelease obj cb = liftIO $ do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' SignalConnectAfter
-- signal Entry::insert-at-cursor
{- |
The ::insert-at-cursor signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted when the user initiates the insertion of a
fixed string at the cursor.
This signal has no default bindings.
-}
type EntryInsertAtCursorCallback =
T.Text
{- ^ /@string@/: the string to insert -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryInsertAtCursorCallback`@.
noEntryInsertAtCursorCallback :: Maybe EntryInsertAtCursorCallback
noEntryInsertAtCursorCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryInsertAtCursorCallback =
Ptr () -> -- object
CString ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryInsertAtCursorCallback`.
foreign import ccall "wrapper"
mk_EntryInsertAtCursorCallback :: C_EntryInsertAtCursorCallback -> IO (FunPtr C_EntryInsertAtCursorCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryInsertAtCursor :: MonadIO m => EntryInsertAtCursorCallback -> m (GClosure C_EntryInsertAtCursorCallback)
genClosure_EntryInsertAtCursor cb = liftIO $ do
let cb' = wrap_EntryInsertAtCursorCallback cb
mk_EntryInsertAtCursorCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryInsertAtCursorCallback` into a `C_EntryInsertAtCursorCallback`.
wrap_EntryInsertAtCursorCallback ::
EntryInsertAtCursorCallback ->
C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback _cb _ string _ = do
string' <- cstringToText string
_cb string'
{- |
Connect a signal handler for the “@insert-at-cursor@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #insertAtCursor callback
@
-}
onEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
onEntryInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@insert-at-cursor@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #insertAtCursor callback
@
-}
afterEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
afterEntryInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectAfter
-- signal Entry::insert-emoji
{- |
The ::insert-emoji signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted to present the Emoji chooser for the /@entry@/.
The default bindings for this signal are Ctrl-. and Ctrl-;
/Since: 3.22.27/
-}
type EntryInsertEmojiCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryInsertEmojiCallback`@.
noEntryInsertEmojiCallback :: Maybe EntryInsertEmojiCallback
noEntryInsertEmojiCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryInsertEmojiCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryInsertEmojiCallback`.
foreign import ccall "wrapper"
mk_EntryInsertEmojiCallback :: C_EntryInsertEmojiCallback -> IO (FunPtr C_EntryInsertEmojiCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryInsertEmoji :: MonadIO m => EntryInsertEmojiCallback -> m (GClosure C_EntryInsertEmojiCallback)
genClosure_EntryInsertEmoji cb = liftIO $ do
let cb' = wrap_EntryInsertEmojiCallback cb
mk_EntryInsertEmojiCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryInsertEmojiCallback` into a `C_EntryInsertEmojiCallback`.
wrap_EntryInsertEmojiCallback ::
EntryInsertEmojiCallback ->
C_EntryInsertEmojiCallback
wrap_EntryInsertEmojiCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@insert-emoji@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #insertEmoji callback
@
-}
onEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
onEntryInsertEmoji obj cb = liftIO $ do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@insert-emoji@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #insertEmoji callback
@
-}
afterEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
afterEntryInsertEmoji obj cb = liftIO $ do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectAfter
-- signal Entry::move-cursor
{- |
The ::move-cursor signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted when the user initiates a cursor movement.
If the cursor is not visible in /@entry@/, this signal causes
the viewport to be moved instead.
Applications should not connect to it, but may emit it with
@/g_signal_emit_by_name()/@ if they need to control the cursor
programmatically.
The default bindings for this signal come in two variants,
the variant with the Shift modifier extends the selection,
the variant without the Shift modifer does not.
There are too many key combinations to list them all here.
* Arrow keys move by individual characters\/lines
* Ctrl-arrow key combinations move by words\/paragraphs
* Home\/End keys move to the ends of the buffer
-}
type EntryMoveCursorCallback =
Gtk.Enums.MovementStep
{- ^ /@step@/: the granularity of the move, as a 'GI.Gtk.Enums.MovementStep' -}
-> Int32
{- ^ /@count@/: the number of /@step@/ units to move -}
-> Bool
{- ^ /@extendSelection@/: 'True' if the move should extend the selection -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryMoveCursorCallback`@.
noEntryMoveCursorCallback :: Maybe EntryMoveCursorCallback
noEntryMoveCursorCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryMoveCursorCallback =
Ptr () -> -- object
CUInt ->
Int32 ->
CInt ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryMoveCursorCallback`.
foreign import ccall "wrapper"
mk_EntryMoveCursorCallback :: C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryMoveCursor :: MonadIO m => EntryMoveCursorCallback -> m (GClosure C_EntryMoveCursorCallback)
genClosure_EntryMoveCursor cb = liftIO $ do
let cb' = wrap_EntryMoveCursorCallback cb
mk_EntryMoveCursorCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryMoveCursorCallback` into a `C_EntryMoveCursorCallback`.
wrap_EntryMoveCursorCallback ::
EntryMoveCursorCallback ->
C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback _cb _ step count extendSelection _ = do
let step' = (toEnum . fromIntegral) step
let extendSelection' = (/= 0) extendSelection
_cb step' count extendSelection'
{- |
Connect a signal handler for the “@move-cursor@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #moveCursor callback
@
-}
onEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
onEntryMoveCursor obj cb = liftIO $ do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@move-cursor@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #moveCursor callback
@
-}
afterEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
afterEntryMoveCursor obj cb = liftIO $ do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectAfter
-- signal Entry::paste-clipboard
{- |
The ::paste-clipboard signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted to paste the contents of the clipboard
into the text view.
The default bindings for this signal are
Ctrl-v and Shift-Insert.
-}
type EntryPasteClipboardCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryPasteClipboardCallback`@.
noEntryPasteClipboardCallback :: Maybe EntryPasteClipboardCallback
noEntryPasteClipboardCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryPasteClipboardCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryPasteClipboardCallback`.
foreign import ccall "wrapper"
mk_EntryPasteClipboardCallback :: C_EntryPasteClipboardCallback -> IO (FunPtr C_EntryPasteClipboardCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryPasteClipboard :: MonadIO m => EntryPasteClipboardCallback -> m (GClosure C_EntryPasteClipboardCallback)
genClosure_EntryPasteClipboard cb = liftIO $ do
let cb' = wrap_EntryPasteClipboardCallback cb
mk_EntryPasteClipboardCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryPasteClipboardCallback` into a `C_EntryPasteClipboardCallback`.
wrap_EntryPasteClipboardCallback ::
EntryPasteClipboardCallback ->
C_EntryPasteClipboardCallback
wrap_EntryPasteClipboardCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@paste-clipboard@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #pasteClipboard callback
@
-}
onEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
onEntryPasteClipboard obj cb = liftIO $ do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@paste-clipboard@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #pasteClipboard callback
@
-}
afterEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
afterEntryPasteClipboard obj cb = liftIO $ do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectAfter
-- signal Entry::populate-popup
{- |
The ::populate-popup signal gets emitted before showing the
context menu of the entry.
If you need to add items to the context menu, connect
to this signal and append your items to the /@widget@/, which
will be a 'GI.Gtk.Objects.Menu.Menu' in this case.
If 'GI.Gtk.Objects.Entry.Entry':@/populate-all/@ is 'True', this signal will
also be emitted to populate touch popups. In this case,
/@widget@/ will be a different container, e.g. a 'GI.Gtk.Objects.Toolbar.Toolbar'.
The signal handler should not make assumptions about the
type of /@widget@/.
-}
type EntryPopulatePopupCallback =
Gtk.Widget.Widget
{- ^ /@widget@/: the container that is being populated -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryPopulatePopupCallback`@.
noEntryPopulatePopupCallback :: Maybe EntryPopulatePopupCallback
noEntryPopulatePopupCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryPopulatePopupCallback =
Ptr () -> -- object
Ptr Gtk.Widget.Widget ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryPopulatePopupCallback`.
foreign import ccall "wrapper"
mk_EntryPopulatePopupCallback :: C_EntryPopulatePopupCallback -> IO (FunPtr C_EntryPopulatePopupCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryPopulatePopup :: MonadIO m => EntryPopulatePopupCallback -> m (GClosure C_EntryPopulatePopupCallback)
genClosure_EntryPopulatePopup cb = liftIO $ do
let cb' = wrap_EntryPopulatePopupCallback cb
mk_EntryPopulatePopupCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryPopulatePopupCallback` into a `C_EntryPopulatePopupCallback`.
wrap_EntryPopulatePopupCallback ::
EntryPopulatePopupCallback ->
C_EntryPopulatePopupCallback
wrap_EntryPopulatePopupCallback _cb _ widget _ = do
widget' <- (newObject Gtk.Widget.Widget) widget
_cb widget'
{- |
Connect a signal handler for the “@populate-popup@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #populatePopup callback
@
-}
onEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
onEntryPopulatePopup obj cb = liftIO $ do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@populate-popup@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #populatePopup callback
@
-}
afterEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
afterEntryPopulatePopup obj cb = liftIO $ do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectAfter
-- signal Entry::preedit-changed
{- |
If an input method is used, the typed text will not immediately
be committed to the buffer. So if you are interested in the text,
connect to this signal.
/Since: 2.20/
-}
type EntryPreeditChangedCallback =
T.Text
{- ^ /@preedit@/: the current preedit string -}
-> IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryPreeditChangedCallback`@.
noEntryPreeditChangedCallback :: Maybe EntryPreeditChangedCallback
noEntryPreeditChangedCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryPreeditChangedCallback =
Ptr () -> -- object
CString ->
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryPreeditChangedCallback`.
foreign import ccall "wrapper"
mk_EntryPreeditChangedCallback :: C_EntryPreeditChangedCallback -> IO (FunPtr C_EntryPreeditChangedCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryPreeditChanged :: MonadIO m => EntryPreeditChangedCallback -> m (GClosure C_EntryPreeditChangedCallback)
genClosure_EntryPreeditChanged cb = liftIO $ do
let cb' = wrap_EntryPreeditChangedCallback cb
mk_EntryPreeditChangedCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryPreeditChangedCallback` into a `C_EntryPreeditChangedCallback`.
wrap_EntryPreeditChangedCallback ::
EntryPreeditChangedCallback ->
C_EntryPreeditChangedCallback
wrap_EntryPreeditChangedCallback _cb _ preedit _ = do
preedit' <- cstringToText preedit
_cb preedit'
{- |
Connect a signal handler for the “@preedit-changed@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #preeditChanged callback
@
-}
onEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
onEntryPreeditChanged obj cb = liftIO $ do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@preedit-changed@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #preeditChanged callback
@
-}
afterEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
afterEntryPreeditChanged obj cb = liftIO $ do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectAfter
-- signal Entry::toggle-overwrite
{- |
The ::toggle-overwrite signal is a
[keybinding signal][GtkBindingSignal]
which gets emitted to toggle the overwrite mode of the entry.
The default bindings for this signal is Insert.
-}
type EntryToggleOverwriteCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `EntryToggleOverwriteCallback`@.
noEntryToggleOverwriteCallback :: Maybe EntryToggleOverwriteCallback
noEntryToggleOverwriteCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_EntryToggleOverwriteCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_EntryToggleOverwriteCallback`.
foreign import ccall "wrapper"
mk_EntryToggleOverwriteCallback :: C_EntryToggleOverwriteCallback -> IO (FunPtr C_EntryToggleOverwriteCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_EntryToggleOverwrite :: MonadIO m => EntryToggleOverwriteCallback -> m (GClosure C_EntryToggleOverwriteCallback)
genClosure_EntryToggleOverwrite cb = liftIO $ do
let cb' = wrap_EntryToggleOverwriteCallback cb
mk_EntryToggleOverwriteCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `EntryToggleOverwriteCallback` into a `C_EntryToggleOverwriteCallback`.
wrap_EntryToggleOverwriteCallback ::
EntryToggleOverwriteCallback ->
C_EntryToggleOverwriteCallback
wrap_EntryToggleOverwriteCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@toggle-overwrite@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' entry #toggleOverwrite callback
@
-}
onEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
onEntryToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@toggle-overwrite@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' entry #toggleOverwrite callback
@
-}
afterEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
afterEntryToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectAfter
-- VVV Prop "activates-default"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@activates-default@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #activatesDefault
@
-}
getEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryActivatesDefault obj = liftIO $ B.Properties.getObjectPropertyBool obj "activates-default"
{- |
Set the value of the “@activates-default@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #activatesDefault 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryActivatesDefault obj val = liftIO $ B.Properties.setObjectPropertyBool obj "activates-default" val
{- |
Construct a `GValueConstruct` with valid value for the “@activates-default@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryActivatesDefault :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryActivatesDefault val = B.Properties.constructObjectPropertyBool "activates-default" val
#if ENABLE_OVERLOADING
data EntryActivatesDefaultPropertyInfo
instance AttrInfo EntryActivatesDefaultPropertyInfo where
type AttrAllowedOps EntryActivatesDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryActivatesDefaultPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryActivatesDefaultPropertyInfo = IsEntry
type AttrGetType EntryActivatesDefaultPropertyInfo = Bool
type AttrLabel EntryActivatesDefaultPropertyInfo = "activates-default"
type AttrOrigin EntryActivatesDefaultPropertyInfo = Entry
attrGet _ = getEntryActivatesDefault
attrSet _ = setEntryActivatesDefault
attrConstruct _ = constructEntryActivatesDefault
attrClear _ = undefined
#endif
-- VVV Prop "attributes"
-- Type: TInterface (Name {namespace = "Pango", name = "AttrList"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just True,Just False)
{- |
Get the value of the “@attributes@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #attributes
@
-}
getEntryAttributes :: (MonadIO m, IsEntry o) => o -> m (Maybe Pango.AttrList.AttrList)
getEntryAttributes obj = liftIO $ B.Properties.getObjectPropertyBoxed obj "attributes" Pango.AttrList.AttrList
{- |
Set the value of the “@attributes@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #attributes 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryAttributes :: (MonadIO m, IsEntry o) => o -> Pango.AttrList.AttrList -> m ()
setEntryAttributes obj val = liftIO $ B.Properties.setObjectPropertyBoxed obj "attributes" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@attributes@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryAttributes :: (IsEntry o) => Pango.AttrList.AttrList -> IO (GValueConstruct o)
constructEntryAttributes val = B.Properties.constructObjectPropertyBoxed "attributes" (Just val)
#if ENABLE_OVERLOADING
data EntryAttributesPropertyInfo
instance AttrInfo EntryAttributesPropertyInfo where
type AttrAllowedOps EntryAttributesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrBaseTypeConstraint EntryAttributesPropertyInfo = IsEntry
type AttrGetType EntryAttributesPropertyInfo = (Maybe Pango.AttrList.AttrList)
type AttrLabel EntryAttributesPropertyInfo = "attributes"
type AttrOrigin EntryAttributesPropertyInfo = Entry
attrGet _ = getEntryAttributes
attrSet _ = setEntryAttributes
attrConstruct _ = constructEntryAttributes
attrClear _ = undefined
#endif
-- VVV Prop "buffer"
-- Type: TInterface (Name {namespace = "Gtk", name = "EntryBuffer"})
-- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@buffer@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #buffer
@
-}
getEntryBuffer :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryBuffer.EntryBuffer
getEntryBuffer obj = liftIO $ checkUnexpectedNothing "getEntryBuffer" $ B.Properties.getObjectPropertyObject obj "buffer" Gtk.EntryBuffer.EntryBuffer
{- |
Set the value of the “@buffer@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #buffer 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryBuffer :: (MonadIO m, IsEntry o, Gtk.EntryBuffer.IsEntryBuffer a) => o -> a -> m ()
setEntryBuffer obj val = liftIO $ B.Properties.setObjectPropertyObject obj "buffer" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@buffer@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryBuffer :: (IsEntry o, Gtk.EntryBuffer.IsEntryBuffer a) => a -> IO (GValueConstruct o)
constructEntryBuffer val = B.Properties.constructObjectPropertyObject "buffer" (Just val)
#if ENABLE_OVERLOADING
data EntryBufferPropertyInfo
instance AttrInfo EntryBufferPropertyInfo where
type AttrAllowedOps EntryBufferPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryBufferPropertyInfo = Gtk.EntryBuffer.IsEntryBuffer
type AttrBaseTypeConstraint EntryBufferPropertyInfo = IsEntry
type AttrGetType EntryBufferPropertyInfo = Gtk.EntryBuffer.EntryBuffer
type AttrLabel EntryBufferPropertyInfo = "buffer"
type AttrOrigin EntryBufferPropertyInfo = Entry
attrGet _ = getEntryBuffer
attrSet _ = setEntryBuffer
attrConstruct _ = constructEntryBuffer
attrClear _ = undefined
#endif
-- VVV Prop "caps-lock-warning"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@caps-lock-warning@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #capsLockWarning
@
-}
getEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryCapsLockWarning obj = liftIO $ B.Properties.getObjectPropertyBool obj "caps-lock-warning"
{- |
Set the value of the “@caps-lock-warning@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #capsLockWarning 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryCapsLockWarning obj val = liftIO $ B.Properties.setObjectPropertyBool obj "caps-lock-warning" val
{- |
Construct a `GValueConstruct` with valid value for the “@caps-lock-warning@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryCapsLockWarning :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryCapsLockWarning val = B.Properties.constructObjectPropertyBool "caps-lock-warning" val
#if ENABLE_OVERLOADING
data EntryCapsLockWarningPropertyInfo
instance AttrInfo EntryCapsLockWarningPropertyInfo where
type AttrAllowedOps EntryCapsLockWarningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryCapsLockWarningPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryCapsLockWarningPropertyInfo = IsEntry
type AttrGetType EntryCapsLockWarningPropertyInfo = Bool
type AttrLabel EntryCapsLockWarningPropertyInfo = "caps-lock-warning"
type AttrOrigin EntryCapsLockWarningPropertyInfo = Entry
attrGet _ = getEntryCapsLockWarning
attrSet _ = setEntryCapsLockWarning
attrConstruct _ = constructEntryCapsLockWarning
attrClear _ = undefined
#endif
-- VVV Prop "completion"
-- Type: TInterface (Name {namespace = "Gtk", name = "EntryCompletion"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just True)
{- |
Get the value of the “@completion@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #completion
@
-}
getEntryCompletion :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryCompletion.EntryCompletion
getEntryCompletion obj = liftIO $ checkUnexpectedNothing "getEntryCompletion" $ B.Properties.getObjectPropertyObject obj "completion" Gtk.EntryCompletion.EntryCompletion
{- |
Set the value of the “@completion@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #completion 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryCompletion :: (MonadIO m, IsEntry o, Gtk.EntryCompletion.IsEntryCompletion a) => o -> a -> m ()
setEntryCompletion obj val = liftIO $ B.Properties.setObjectPropertyObject obj "completion" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@completion@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryCompletion :: (IsEntry o, Gtk.EntryCompletion.IsEntryCompletion a) => a -> IO (GValueConstruct o)
constructEntryCompletion val = B.Properties.constructObjectPropertyObject "completion" (Just val)
{- |
Set the value of the “@completion@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #completion
@
-}
clearEntryCompletion :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryCompletion obj = liftIO $ B.Properties.setObjectPropertyObject obj "completion" (Nothing :: Maybe Gtk.EntryCompletion.EntryCompletion)
#if ENABLE_OVERLOADING
data EntryCompletionPropertyInfo
instance AttrInfo EntryCompletionPropertyInfo where
type AttrAllowedOps EntryCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryCompletionPropertyInfo = Gtk.EntryCompletion.IsEntryCompletion
type AttrBaseTypeConstraint EntryCompletionPropertyInfo = IsEntry
type AttrGetType EntryCompletionPropertyInfo = Gtk.EntryCompletion.EntryCompletion
type AttrLabel EntryCompletionPropertyInfo = "completion"
type AttrOrigin EntryCompletionPropertyInfo = Entry
attrGet _ = getEntryCompletion
attrSet _ = setEntryCompletion
attrConstruct _ = constructEntryCompletion
attrClear _ = clearEntryCompletion
#endif
-- VVV Prop "cursor-position"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@cursor-position@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #cursorPosition
@
-}
getEntryCursorPosition :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryCursorPosition obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "cursor-position"
#if ENABLE_OVERLOADING
data EntryCursorPositionPropertyInfo
instance AttrInfo EntryCursorPositionPropertyInfo where
type AttrAllowedOps EntryCursorPositionPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryCursorPositionPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryCursorPositionPropertyInfo = IsEntry
type AttrGetType EntryCursorPositionPropertyInfo = Int32
type AttrLabel EntryCursorPositionPropertyInfo = "cursor-position"
type AttrOrigin EntryCursorPositionPropertyInfo = Entry
attrGet _ = getEntryCursorPosition
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "editable"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@editable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #editable
@
-}
getEntryEditable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEditable obj = liftIO $ B.Properties.getObjectPropertyBool obj "editable"
{- |
Set the value of the “@editable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #editable 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryEditable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEditable obj val = liftIO $ B.Properties.setObjectPropertyBool obj "editable" val
{- |
Construct a `GValueConstruct` with valid value for the “@editable@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryEditable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryEditable val = B.Properties.constructObjectPropertyBool "editable" val
#if ENABLE_OVERLOADING
data EntryEditablePropertyInfo
instance AttrInfo EntryEditablePropertyInfo where
type AttrAllowedOps EntryEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryEditablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryEditablePropertyInfo = IsEntry
type AttrGetType EntryEditablePropertyInfo = Bool
type AttrLabel EntryEditablePropertyInfo = "editable"
type AttrOrigin EntryEditablePropertyInfo = Entry
attrGet _ = getEntryEditable
attrSet _ = setEntryEditable
attrConstruct _ = constructEntryEditable
attrClear _ = undefined
#endif
-- VVV Prop "enable-emoji-completion"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@enable-emoji-completion@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #enableEmojiCompletion
@
-}
getEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEnableEmojiCompletion obj = liftIO $ B.Properties.getObjectPropertyBool obj "enable-emoji-completion"
{- |
Set the value of the “@enable-emoji-completion@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #enableEmojiCompletion 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEnableEmojiCompletion obj val = liftIO $ B.Properties.setObjectPropertyBool obj "enable-emoji-completion" val
{- |
Construct a `GValueConstruct` with valid value for the “@enable-emoji-completion@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryEnableEmojiCompletion :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryEnableEmojiCompletion val = B.Properties.constructObjectPropertyBool "enable-emoji-completion" val
#if ENABLE_OVERLOADING
data EntryEnableEmojiCompletionPropertyInfo
instance AttrInfo EntryEnableEmojiCompletionPropertyInfo where
type AttrAllowedOps EntryEnableEmojiCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryEnableEmojiCompletionPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryEnableEmojiCompletionPropertyInfo = IsEntry
type AttrGetType EntryEnableEmojiCompletionPropertyInfo = Bool
type AttrLabel EntryEnableEmojiCompletionPropertyInfo = "enable-emoji-completion"
type AttrOrigin EntryEnableEmojiCompletionPropertyInfo = Entry
attrGet _ = getEntryEnableEmojiCompletion
attrSet _ = setEntryEnableEmojiCompletion
attrConstruct _ = constructEntryEnableEmojiCompletion
attrClear _ = undefined
#endif
-- VVV Prop "has-frame"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@has-frame@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #hasFrame
@
-}
getEntryHasFrame :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryHasFrame obj = liftIO $ B.Properties.getObjectPropertyBool obj "has-frame"
{- |
Set the value of the “@has-frame@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #hasFrame 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryHasFrame :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryHasFrame obj val = liftIO $ B.Properties.setObjectPropertyBool obj "has-frame" val
{- |
Construct a `GValueConstruct` with valid value for the “@has-frame@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryHasFrame :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryHasFrame val = B.Properties.constructObjectPropertyBool "has-frame" val
#if ENABLE_OVERLOADING
data EntryHasFramePropertyInfo
instance AttrInfo EntryHasFramePropertyInfo where
type AttrAllowedOps EntryHasFramePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryHasFramePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryHasFramePropertyInfo = IsEntry
type AttrGetType EntryHasFramePropertyInfo = Bool
type AttrLabel EntryHasFramePropertyInfo = "has-frame"
type AttrOrigin EntryHasFramePropertyInfo = Entry
attrGet _ = getEntryHasFrame
attrSet _ = setEntryHasFrame
attrConstruct _ = constructEntryHasFrame
attrClear _ = undefined
#endif
-- VVV Prop "im-module"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@im-module@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #imModule
@
-}
getEntryImModule :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryImModule obj = liftIO $ B.Properties.getObjectPropertyString obj "im-module"
{- |
Set the value of the “@im-module@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #imModule 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryImModule :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryImModule obj val = liftIO $ B.Properties.setObjectPropertyString obj "im-module" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@im-module@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryImModule :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryImModule val = B.Properties.constructObjectPropertyString "im-module" (Just val)
{- |
Set the value of the “@im-module@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #imModule
@
-}
clearEntryImModule :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryImModule obj = liftIO $ B.Properties.setObjectPropertyString obj "im-module" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryImModulePropertyInfo
instance AttrInfo EntryImModulePropertyInfo where
type AttrAllowedOps EntryImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryImModulePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryImModulePropertyInfo = IsEntry
type AttrGetType EntryImModulePropertyInfo = (Maybe T.Text)
type AttrLabel EntryImModulePropertyInfo = "im-module"
type AttrOrigin EntryImModulePropertyInfo = Entry
attrGet _ = getEntryImModule
attrSet _ = setEntryImModule
attrConstruct _ = constructEntryImModule
attrClear _ = clearEntryImModule
#endif
-- VVV Prop "inner-border"
-- Type: TInterface (Name {namespace = "Gtk", name = "Border"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just True,Just True)
{- |
Get the value of the “@inner-border@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #innerBorder
@
-}
getEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m (Maybe Gtk.Border.Border)
getEntryInnerBorder obj = liftIO $ B.Properties.getObjectPropertyBoxed obj "inner-border" Gtk.Border.Border
{- |
Set the value of the “@inner-border@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #innerBorder 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> Gtk.Border.Border -> m ()
setEntryInnerBorder obj val = liftIO $ B.Properties.setObjectPropertyBoxed obj "inner-border" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@inner-border@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryInnerBorder :: (IsEntry o) => Gtk.Border.Border -> IO (GValueConstruct o)
constructEntryInnerBorder val = B.Properties.constructObjectPropertyBoxed "inner-border" (Just val)
{- |
Set the value of the “@inner-border@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #innerBorder
@
-}
clearEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryInnerBorder obj = liftIO $ B.Properties.setObjectPropertyBoxed obj "inner-border" (Nothing :: Maybe Gtk.Border.Border)
#if ENABLE_OVERLOADING
data EntryInnerBorderPropertyInfo
instance AttrInfo EntryInnerBorderPropertyInfo where
type AttrAllowedOps EntryInnerBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryInnerBorderPropertyInfo = (~) Gtk.Border.Border
type AttrBaseTypeConstraint EntryInnerBorderPropertyInfo = IsEntry
type AttrGetType EntryInnerBorderPropertyInfo = (Maybe Gtk.Border.Border)
type AttrLabel EntryInnerBorderPropertyInfo = "inner-border"
type AttrOrigin EntryInnerBorderPropertyInfo = Entry
attrGet _ = getEntryInnerBorder
attrSet _ = setEntryInnerBorder
attrConstruct _ = constructEntryInnerBorder
attrClear _ = clearEntryInnerBorder
#endif
-- VVV Prop "input-hints"
-- Type: TInterface (Name {namespace = "Gtk", name = "InputHints"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@input-hints@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #inputHints
@
-}
getEntryInputHints :: (MonadIO m, IsEntry o) => o -> m [Gtk.Flags.InputHints]
getEntryInputHints obj = liftIO $ B.Properties.getObjectPropertyFlags obj "input-hints"
{- |
Set the value of the “@input-hints@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #inputHints 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryInputHints :: (MonadIO m, IsEntry o) => o -> [Gtk.Flags.InputHints] -> m ()
setEntryInputHints obj val = liftIO $ B.Properties.setObjectPropertyFlags obj "input-hints" val
{- |
Construct a `GValueConstruct` with valid value for the “@input-hints@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryInputHints :: (IsEntry o) => [Gtk.Flags.InputHints] -> IO (GValueConstruct o)
constructEntryInputHints val = B.Properties.constructObjectPropertyFlags "input-hints" val
#if ENABLE_OVERLOADING
data EntryInputHintsPropertyInfo
instance AttrInfo EntryInputHintsPropertyInfo where
type AttrAllowedOps EntryInputHintsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInputHintsPropertyInfo = (~) [Gtk.Flags.InputHints]
type AttrBaseTypeConstraint EntryInputHintsPropertyInfo = IsEntry
type AttrGetType EntryInputHintsPropertyInfo = [Gtk.Flags.InputHints]
type AttrLabel EntryInputHintsPropertyInfo = "input-hints"
type AttrOrigin EntryInputHintsPropertyInfo = Entry
attrGet _ = getEntryInputHints
attrSet _ = setEntryInputHints
attrConstruct _ = constructEntryInputHints
attrClear _ = undefined
#endif
-- VVV Prop "input-purpose"
-- Type: TInterface (Name {namespace = "Gtk", name = "InputPurpose"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@input-purpose@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #inputPurpose
@
-}
getEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.InputPurpose
getEntryInputPurpose obj = liftIO $ B.Properties.getObjectPropertyEnum obj "input-purpose"
{- |
Set the value of the “@input-purpose@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #inputPurpose 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> Gtk.Enums.InputPurpose -> m ()
setEntryInputPurpose obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "input-purpose" val
{- |
Construct a `GValueConstruct` with valid value for the “@input-purpose@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryInputPurpose :: (IsEntry o) => Gtk.Enums.InputPurpose -> IO (GValueConstruct o)
constructEntryInputPurpose val = B.Properties.constructObjectPropertyEnum "input-purpose" val
#if ENABLE_OVERLOADING
data EntryInputPurposePropertyInfo
instance AttrInfo EntryInputPurposePropertyInfo where
type AttrAllowedOps EntryInputPurposePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInputPurposePropertyInfo = (~) Gtk.Enums.InputPurpose
type AttrBaseTypeConstraint EntryInputPurposePropertyInfo = IsEntry
type AttrGetType EntryInputPurposePropertyInfo = Gtk.Enums.InputPurpose
type AttrLabel EntryInputPurposePropertyInfo = "input-purpose"
type AttrOrigin EntryInputPurposePropertyInfo = Entry
attrGet _ = getEntryInputPurpose
attrSet _ = setEntryInputPurpose
attrConstruct _ = constructEntryInputPurpose
attrClear _ = undefined
#endif
-- VVV Prop "invisible-char"
-- Type: TBasicType TUInt
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@invisible-char@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #invisibleChar
@
-}
getEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> m Word32
getEntryInvisibleChar obj = liftIO $ B.Properties.getObjectPropertyUInt32 obj "invisible-char"
{- |
Set the value of the “@invisible-char@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #invisibleChar 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> Word32 -> m ()
setEntryInvisibleChar obj val = liftIO $ B.Properties.setObjectPropertyUInt32 obj "invisible-char" val
{- |
Construct a `GValueConstruct` with valid value for the “@invisible-char@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryInvisibleChar :: (IsEntry o) => Word32 -> IO (GValueConstruct o)
constructEntryInvisibleChar val = B.Properties.constructObjectPropertyUInt32 "invisible-char" val
#if ENABLE_OVERLOADING
data EntryInvisibleCharPropertyInfo
instance AttrInfo EntryInvisibleCharPropertyInfo where
type AttrAllowedOps EntryInvisibleCharPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInvisibleCharPropertyInfo = (~) Word32
type AttrBaseTypeConstraint EntryInvisibleCharPropertyInfo = IsEntry
type AttrGetType EntryInvisibleCharPropertyInfo = Word32
type AttrLabel EntryInvisibleCharPropertyInfo = "invisible-char"
type AttrOrigin EntryInvisibleCharPropertyInfo = Entry
attrGet _ = getEntryInvisibleChar
attrSet _ = setEntryInvisibleChar
attrConstruct _ = constructEntryInvisibleChar
attrClear _ = undefined
#endif
-- VVV Prop "invisible-char-set"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@invisible-char-set@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #invisibleCharSet
@
-}
getEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryInvisibleCharSet obj = liftIO $ B.Properties.getObjectPropertyBool obj "invisible-char-set"
{- |
Set the value of the “@invisible-char-set@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #invisibleCharSet 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryInvisibleCharSet obj val = liftIO $ B.Properties.setObjectPropertyBool obj "invisible-char-set" val
{- |
Construct a `GValueConstruct` with valid value for the “@invisible-char-set@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryInvisibleCharSet :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryInvisibleCharSet val = B.Properties.constructObjectPropertyBool "invisible-char-set" val
#if ENABLE_OVERLOADING
data EntryInvisibleCharSetPropertyInfo
instance AttrInfo EntryInvisibleCharSetPropertyInfo where
type AttrAllowedOps EntryInvisibleCharSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInvisibleCharSetPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryInvisibleCharSetPropertyInfo = IsEntry
type AttrGetType EntryInvisibleCharSetPropertyInfo = Bool
type AttrLabel EntryInvisibleCharSetPropertyInfo = "invisible-char-set"
type AttrOrigin EntryInvisibleCharSetPropertyInfo = Entry
attrGet _ = getEntryInvisibleCharSet
attrSet _ = setEntryInvisibleCharSet
attrConstruct _ = constructEntryInvisibleCharSet
attrClear _ = undefined
#endif
-- VVV Prop "max-length"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@max-length@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #maxLength
@
-}
getEntryMaxLength :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryMaxLength obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "max-length"
{- |
Set the value of the “@max-length@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #maxLength 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryMaxLength :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryMaxLength obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "max-length" val
{- |
Construct a `GValueConstruct` with valid value for the “@max-length@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryMaxLength :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryMaxLength val = B.Properties.constructObjectPropertyInt32 "max-length" val
#if ENABLE_OVERLOADING
data EntryMaxLengthPropertyInfo
instance AttrInfo EntryMaxLengthPropertyInfo where
type AttrAllowedOps EntryMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryMaxLengthPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryMaxLengthPropertyInfo = IsEntry
type AttrGetType EntryMaxLengthPropertyInfo = Int32
type AttrLabel EntryMaxLengthPropertyInfo = "max-length"
type AttrOrigin EntryMaxLengthPropertyInfo = Entry
attrGet _ = getEntryMaxLength
attrSet _ = setEntryMaxLength
attrConstruct _ = constructEntryMaxLength
attrClear _ = undefined
#endif
-- VVV Prop "max-width-chars"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@max-width-chars@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #maxWidthChars
@
-}
getEntryMaxWidthChars :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryMaxWidthChars obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "max-width-chars"
{- |
Set the value of the “@max-width-chars@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #maxWidthChars 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryMaxWidthChars :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryMaxWidthChars obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "max-width-chars" val
{- |
Construct a `GValueConstruct` with valid value for the “@max-width-chars@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryMaxWidthChars :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryMaxWidthChars val = B.Properties.constructObjectPropertyInt32 "max-width-chars" val
#if ENABLE_OVERLOADING
data EntryMaxWidthCharsPropertyInfo
instance AttrInfo EntryMaxWidthCharsPropertyInfo where
type AttrAllowedOps EntryMaxWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryMaxWidthCharsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryMaxWidthCharsPropertyInfo = IsEntry
type AttrGetType EntryMaxWidthCharsPropertyInfo = Int32
type AttrLabel EntryMaxWidthCharsPropertyInfo = "max-width-chars"
type AttrOrigin EntryMaxWidthCharsPropertyInfo = Entry
attrGet _ = getEntryMaxWidthChars
attrSet _ = setEntryMaxWidthChars
attrConstruct _ = constructEntryMaxWidthChars
attrClear _ = undefined
#endif
-- VVV Prop "overwrite-mode"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@overwrite-mode@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #overwriteMode
@
-}
getEntryOverwriteMode :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryOverwriteMode obj = liftIO $ B.Properties.getObjectPropertyBool obj "overwrite-mode"
{- |
Set the value of the “@overwrite-mode@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #overwriteMode 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryOverwriteMode :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryOverwriteMode obj val = liftIO $ B.Properties.setObjectPropertyBool obj "overwrite-mode" val
{- |
Construct a `GValueConstruct` with valid value for the “@overwrite-mode@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryOverwriteMode :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryOverwriteMode val = B.Properties.constructObjectPropertyBool "overwrite-mode" val
#if ENABLE_OVERLOADING
data EntryOverwriteModePropertyInfo
instance AttrInfo EntryOverwriteModePropertyInfo where
type AttrAllowedOps EntryOverwriteModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryOverwriteModePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryOverwriteModePropertyInfo = IsEntry
type AttrGetType EntryOverwriteModePropertyInfo = Bool
type AttrLabel EntryOverwriteModePropertyInfo = "overwrite-mode"
type AttrOrigin EntryOverwriteModePropertyInfo = Entry
attrGet _ = getEntryOverwriteMode
attrSet _ = setEntryOverwriteMode
attrConstruct _ = constructEntryOverwriteMode
attrClear _ = undefined
#endif
-- VVV Prop "placeholder-text"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just True)
{- |
Get the value of the “@placeholder-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #placeholderText
@
-}
getEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> m T.Text
getEntryPlaceholderText obj = liftIO $ checkUnexpectedNothing "getEntryPlaceholderText" $ B.Properties.getObjectPropertyString obj "placeholder-text"
{- |
Set the value of the “@placeholder-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #placeholderText 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPlaceholderText obj val = liftIO $ B.Properties.setObjectPropertyString obj "placeholder-text" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@placeholder-text@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPlaceholderText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPlaceholderText val = B.Properties.constructObjectPropertyString "placeholder-text" (Just val)
{- |
Set the value of the “@placeholder-text@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #placeholderText
@
-}
clearEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPlaceholderText obj = liftIO $ B.Properties.setObjectPropertyString obj "placeholder-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPlaceholderTextPropertyInfo
instance AttrInfo EntryPlaceholderTextPropertyInfo where
type AttrAllowedOps EntryPlaceholderTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPlaceholderTextPropertyInfo = IsEntry
type AttrGetType EntryPlaceholderTextPropertyInfo = T.Text
type AttrLabel EntryPlaceholderTextPropertyInfo = "placeholder-text"
type AttrOrigin EntryPlaceholderTextPropertyInfo = Entry
attrGet _ = getEntryPlaceholderText
attrSet _ = setEntryPlaceholderText
attrConstruct _ = constructEntryPlaceholderText
attrClear _ = clearEntryPlaceholderText
#endif
-- VVV Prop "populate-all"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@populate-all@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #populateAll
@
-}
getEntryPopulateAll :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPopulateAll obj = liftIO $ B.Properties.getObjectPropertyBool obj "populate-all"
{- |
Set the value of the “@populate-all@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #populateAll 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPopulateAll :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPopulateAll obj val = liftIO $ B.Properties.setObjectPropertyBool obj "populate-all" val
{- |
Construct a `GValueConstruct` with valid value for the “@populate-all@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPopulateAll :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPopulateAll val = B.Properties.constructObjectPropertyBool "populate-all" val
#if ENABLE_OVERLOADING
data EntryPopulateAllPropertyInfo
instance AttrInfo EntryPopulateAllPropertyInfo where
type AttrAllowedOps EntryPopulateAllPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPopulateAllPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPopulateAllPropertyInfo = IsEntry
type AttrGetType EntryPopulateAllPropertyInfo = Bool
type AttrLabel EntryPopulateAllPropertyInfo = "populate-all"
type AttrOrigin EntryPopulateAllPropertyInfo = Entry
attrGet _ = getEntryPopulateAll
attrSet _ = setEntryPopulateAll
attrConstruct _ = constructEntryPopulateAll
attrClear _ = undefined
#endif
-- VVV Prop "primary-icon-activatable"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-activatable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconActivatable
@
-}
getEntryPrimaryIconActivatable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPrimaryIconActivatable obj = liftIO $ B.Properties.getObjectPropertyBool obj "primary-icon-activatable"
{- |
Set the value of the “@primary-icon-activatable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconActivatable 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconActivatable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPrimaryIconActivatable obj val = liftIO $ B.Properties.setObjectPropertyBool obj "primary-icon-activatable" val
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-activatable@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconActivatable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPrimaryIconActivatable val = B.Properties.constructObjectPropertyBool "primary-icon-activatable" val
#if ENABLE_OVERLOADING
data EntryPrimaryIconActivatablePropertyInfo
instance AttrInfo EntryPrimaryIconActivatablePropertyInfo where
type AttrAllowedOps EntryPrimaryIconActivatablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconActivatablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPrimaryIconActivatablePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconActivatablePropertyInfo = Bool
type AttrLabel EntryPrimaryIconActivatablePropertyInfo = "primary-icon-activatable"
type AttrOrigin EntryPrimaryIconActivatablePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconActivatable
attrSet _ = setEntryPrimaryIconActivatable
attrConstruct _ = constructEntryPrimaryIconActivatable
attrClear _ = undefined
#endif
-- VVV Prop "primary-icon-gicon"
-- Type: TInterface (Name {namespace = "Gio", name = "Icon"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-gicon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconGicon
@
-}
getEntryPrimaryIconGicon :: (MonadIO m, IsEntry o) => o -> m (Maybe Gio.Icon.Icon)
getEntryPrimaryIconGicon obj = liftIO $ B.Properties.getObjectPropertyObject obj "primary-icon-gicon" Gio.Icon.Icon
{- |
Set the value of the “@primary-icon-gicon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconGicon 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconGicon :: (MonadIO m, IsEntry o, Gio.Icon.IsIcon a) => o -> a -> m ()
setEntryPrimaryIconGicon obj val = liftIO $ B.Properties.setObjectPropertyObject obj "primary-icon-gicon" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-gicon@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconGicon :: (IsEntry o, Gio.Icon.IsIcon a) => a -> IO (GValueConstruct o)
constructEntryPrimaryIconGicon val = B.Properties.constructObjectPropertyObject "primary-icon-gicon" (Just val)
{- |
Set the value of the “@primary-icon-gicon@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconGicon
@
-}
clearEntryPrimaryIconGicon :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconGicon obj = liftIO $ B.Properties.setObjectPropertyObject obj "primary-icon-gicon" (Nothing :: Maybe Gio.Icon.Icon)
#if ENABLE_OVERLOADING
data EntryPrimaryIconGiconPropertyInfo
instance AttrInfo EntryPrimaryIconGiconPropertyInfo where
type AttrAllowedOps EntryPrimaryIconGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconGiconPropertyInfo = Gio.Icon.IsIcon
type AttrBaseTypeConstraint EntryPrimaryIconGiconPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconGiconPropertyInfo = (Maybe Gio.Icon.Icon)
type AttrLabel EntryPrimaryIconGiconPropertyInfo = "primary-icon-gicon"
type AttrOrigin EntryPrimaryIconGiconPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconGicon
attrSet _ = setEntryPrimaryIconGicon
attrConstruct _ = constructEntryPrimaryIconGicon
attrClear _ = clearEntryPrimaryIconGicon
#endif
-- VVV Prop "primary-icon-name"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-name@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconName
@
-}
getEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconName obj = liftIO $ B.Properties.getObjectPropertyString obj "primary-icon-name"
{- |
Set the value of the “@primary-icon-name@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconName 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconName obj val = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-name" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-name@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconName :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconName val = B.Properties.constructObjectPropertyString "primary-icon-name" (Just val)
{- |
Set the value of the “@primary-icon-name@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconName
@
-}
clearEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconName obj = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconNamePropertyInfo
instance AttrInfo EntryPrimaryIconNamePropertyInfo where
type AttrAllowedOps EntryPrimaryIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconNamePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconNamePropertyInfo = "primary-icon-name"
type AttrOrigin EntryPrimaryIconNamePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconName
attrSet _ = setEntryPrimaryIconName
attrConstruct _ = constructEntryPrimaryIconName
attrClear _ = clearEntryPrimaryIconName
#endif
-- VVV Prop "primary-icon-pixbuf"
-- Type: TInterface (Name {namespace = "GdkPixbuf", name = "Pixbuf"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-pixbuf@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconPixbuf
@
-}
getEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
getEntryPrimaryIconPixbuf obj = liftIO $ B.Properties.getObjectPropertyObject obj "primary-icon-pixbuf" GdkPixbuf.Pixbuf.Pixbuf
{- |
Set the value of the “@primary-icon-pixbuf@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconPixbuf 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setEntryPrimaryIconPixbuf obj val = liftIO $ B.Properties.setObjectPropertyObject obj "primary-icon-pixbuf" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-pixbuf@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconPixbuf :: (IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> IO (GValueConstruct o)
constructEntryPrimaryIconPixbuf val = B.Properties.constructObjectPropertyObject "primary-icon-pixbuf" (Just val)
{- |
Set the value of the “@primary-icon-pixbuf@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconPixbuf
@
-}
clearEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconPixbuf obj = liftIO $ B.Properties.setObjectPropertyObject obj "primary-icon-pixbuf" (Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if ENABLE_OVERLOADING
data EntryPrimaryIconPixbufPropertyInfo
instance AttrInfo EntryPrimaryIconPixbufPropertyInfo where
type AttrAllowedOps EntryPrimaryIconPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrBaseTypeConstraint EntryPrimaryIconPixbufPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconPixbufPropertyInfo = (Maybe GdkPixbuf.Pixbuf.Pixbuf)
type AttrLabel EntryPrimaryIconPixbufPropertyInfo = "primary-icon-pixbuf"
type AttrOrigin EntryPrimaryIconPixbufPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconPixbuf
attrSet _ = setEntryPrimaryIconPixbuf
attrConstruct _ = constructEntryPrimaryIconPixbuf
attrClear _ = clearEntryPrimaryIconPixbuf
#endif
-- VVV Prop "primary-icon-sensitive"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-sensitive@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconSensitive
@
-}
getEntryPrimaryIconSensitive :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPrimaryIconSensitive obj = liftIO $ B.Properties.getObjectPropertyBool obj "primary-icon-sensitive"
{- |
Set the value of the “@primary-icon-sensitive@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconSensitive 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconSensitive :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPrimaryIconSensitive obj val = liftIO $ B.Properties.setObjectPropertyBool obj "primary-icon-sensitive" val
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-sensitive@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconSensitive :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPrimaryIconSensitive val = B.Properties.constructObjectPropertyBool "primary-icon-sensitive" val
#if ENABLE_OVERLOADING
data EntryPrimaryIconSensitivePropertyInfo
instance AttrInfo EntryPrimaryIconSensitivePropertyInfo where
type AttrAllowedOps EntryPrimaryIconSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconSensitivePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPrimaryIconSensitivePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconSensitivePropertyInfo = Bool
type AttrLabel EntryPrimaryIconSensitivePropertyInfo = "primary-icon-sensitive"
type AttrOrigin EntryPrimaryIconSensitivePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconSensitive
attrSet _ = setEntryPrimaryIconSensitive
attrConstruct _ = constructEntryPrimaryIconSensitive
attrClear _ = undefined
#endif
-- VVV Prop "primary-icon-stock"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-stock@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconStock
@
-}
getEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconStock obj = liftIO $ B.Properties.getObjectPropertyString obj "primary-icon-stock"
{- |
Set the value of the “@primary-icon-stock@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconStock 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconStock obj val = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-stock" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-stock@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconStock :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconStock val = B.Properties.constructObjectPropertyString "primary-icon-stock" (Just val)
{- |
Set the value of the “@primary-icon-stock@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconStock
@
-}
clearEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconStock obj = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-stock" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconStockPropertyInfo
instance AttrInfo EntryPrimaryIconStockPropertyInfo where
type AttrAllowedOps EntryPrimaryIconStockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconStockPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconStockPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconStockPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconStockPropertyInfo = "primary-icon-stock"
type AttrOrigin EntryPrimaryIconStockPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconStock
attrSet _ = setEntryPrimaryIconStock
attrConstruct _ = constructEntryPrimaryIconStock
attrClear _ = clearEntryPrimaryIconStock
#endif
-- VVV Prop "primary-icon-storage-type"
-- Type: TInterface (Name {namespace = "Gtk", name = "ImageType"})
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-storage-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconStorageType
@
-}
getEntryPrimaryIconStorageType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ImageType
getEntryPrimaryIconStorageType obj = liftIO $ B.Properties.getObjectPropertyEnum obj "primary-icon-storage-type"
#if ENABLE_OVERLOADING
data EntryPrimaryIconStorageTypePropertyInfo
instance AttrInfo EntryPrimaryIconStorageTypePropertyInfo where
type AttrAllowedOps EntryPrimaryIconStorageTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconStorageTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryPrimaryIconStorageTypePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconStorageTypePropertyInfo = Gtk.Enums.ImageType
type AttrLabel EntryPrimaryIconStorageTypePropertyInfo = "primary-icon-storage-type"
type AttrOrigin EntryPrimaryIconStorageTypePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconStorageType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "primary-icon-tooltip-markup"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-tooltip-markup@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconTooltipMarkup
@
-}
getEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconTooltipMarkup obj = liftIO $ B.Properties.getObjectPropertyString obj "primary-icon-tooltip-markup"
{- |
Set the value of the “@primary-icon-tooltip-markup@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconTooltipMarkup 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconTooltipMarkup obj val = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-tooltip-markup" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-tooltip-markup@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconTooltipMarkup :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconTooltipMarkup val = B.Properties.constructObjectPropertyString "primary-icon-tooltip-markup" (Just val)
{- |
Set the value of the “@primary-icon-tooltip-markup@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconTooltipMarkup
@
-}
clearEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconTooltipMarkup obj = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-tooltip-markup" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconTooltipMarkupPropertyInfo
instance AttrInfo EntryPrimaryIconTooltipMarkupPropertyInfo where
type AttrAllowedOps EntryPrimaryIconTooltipMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconTooltipMarkupPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconTooltipMarkupPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconTooltipMarkupPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconTooltipMarkupPropertyInfo = "primary-icon-tooltip-markup"
type AttrOrigin EntryPrimaryIconTooltipMarkupPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconTooltipMarkup
attrSet _ = setEntryPrimaryIconTooltipMarkup
attrConstruct _ = constructEntryPrimaryIconTooltipMarkup
attrClear _ = clearEntryPrimaryIconTooltipMarkup
#endif
-- VVV Prop "primary-icon-tooltip-text"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@primary-icon-tooltip-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #primaryIconTooltipText
@
-}
getEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconTooltipText obj = liftIO $ B.Properties.getObjectPropertyString obj "primary-icon-tooltip-text"
{- |
Set the value of the “@primary-icon-tooltip-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #primaryIconTooltipText 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconTooltipText obj val = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-tooltip-text" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@primary-icon-tooltip-text@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryPrimaryIconTooltipText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconTooltipText val = B.Properties.constructObjectPropertyString "primary-icon-tooltip-text" (Just val)
{- |
Set the value of the “@primary-icon-tooltip-text@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #primaryIconTooltipText
@
-}
clearEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconTooltipText obj = liftIO $ B.Properties.setObjectPropertyString obj "primary-icon-tooltip-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconTooltipTextPropertyInfo
instance AttrInfo EntryPrimaryIconTooltipTextPropertyInfo where
type AttrAllowedOps EntryPrimaryIconTooltipTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconTooltipTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconTooltipTextPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconTooltipTextPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconTooltipTextPropertyInfo = "primary-icon-tooltip-text"
type AttrOrigin EntryPrimaryIconTooltipTextPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconTooltipText
attrSet _ = setEntryPrimaryIconTooltipText
attrConstruct _ = constructEntryPrimaryIconTooltipText
attrClear _ = clearEntryPrimaryIconTooltipText
#endif
-- VVV Prop "progress-fraction"
-- Type: TBasicType TDouble
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@progress-fraction@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #progressFraction
@
-}
getEntryProgressFraction :: (MonadIO m, IsEntry o) => o -> m Double
getEntryProgressFraction obj = liftIO $ B.Properties.getObjectPropertyDouble obj "progress-fraction"
{- |
Set the value of the “@progress-fraction@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #progressFraction 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryProgressFraction :: (MonadIO m, IsEntry o) => o -> Double -> m ()
setEntryProgressFraction obj val = liftIO $ B.Properties.setObjectPropertyDouble obj "progress-fraction" val
{- |
Construct a `GValueConstruct` with valid value for the “@progress-fraction@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryProgressFraction :: (IsEntry o) => Double -> IO (GValueConstruct o)
constructEntryProgressFraction val = B.Properties.constructObjectPropertyDouble "progress-fraction" val
#if ENABLE_OVERLOADING
data EntryProgressFractionPropertyInfo
instance AttrInfo EntryProgressFractionPropertyInfo where
type AttrAllowedOps EntryProgressFractionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryProgressFractionPropertyInfo = (~) Double
type AttrBaseTypeConstraint EntryProgressFractionPropertyInfo = IsEntry
type AttrGetType EntryProgressFractionPropertyInfo = Double
type AttrLabel EntryProgressFractionPropertyInfo = "progress-fraction"
type AttrOrigin EntryProgressFractionPropertyInfo = Entry
attrGet _ = getEntryProgressFraction
attrSet _ = setEntryProgressFraction
attrConstruct _ = constructEntryProgressFraction
attrClear _ = undefined
#endif
-- VVV Prop "progress-pulse-step"
-- Type: TBasicType TDouble
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@progress-pulse-step@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #progressPulseStep
@
-}
getEntryProgressPulseStep :: (MonadIO m, IsEntry o) => o -> m Double
getEntryProgressPulseStep obj = liftIO $ B.Properties.getObjectPropertyDouble obj "progress-pulse-step"
{- |
Set the value of the “@progress-pulse-step@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #progressPulseStep 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryProgressPulseStep :: (MonadIO m, IsEntry o) => o -> Double -> m ()
setEntryProgressPulseStep obj val = liftIO $ B.Properties.setObjectPropertyDouble obj "progress-pulse-step" val
{- |
Construct a `GValueConstruct` with valid value for the “@progress-pulse-step@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryProgressPulseStep :: (IsEntry o) => Double -> IO (GValueConstruct o)
constructEntryProgressPulseStep val = B.Properties.constructObjectPropertyDouble "progress-pulse-step" val
#if ENABLE_OVERLOADING
data EntryProgressPulseStepPropertyInfo
instance AttrInfo EntryProgressPulseStepPropertyInfo where
type AttrAllowedOps EntryProgressPulseStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryProgressPulseStepPropertyInfo = (~) Double
type AttrBaseTypeConstraint EntryProgressPulseStepPropertyInfo = IsEntry
type AttrGetType EntryProgressPulseStepPropertyInfo = Double
type AttrLabel EntryProgressPulseStepPropertyInfo = "progress-pulse-step"
type AttrOrigin EntryProgressPulseStepPropertyInfo = Entry
attrGet _ = getEntryProgressPulseStep
attrSet _ = setEntryProgressPulseStep
attrConstruct _ = constructEntryProgressPulseStep
attrClear _ = undefined
#endif
-- VVV Prop "scroll-offset"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@scroll-offset@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #scrollOffset
@
-}
getEntryScrollOffset :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryScrollOffset obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "scroll-offset"
#if ENABLE_OVERLOADING
data EntryScrollOffsetPropertyInfo
instance AttrInfo EntryScrollOffsetPropertyInfo where
type AttrAllowedOps EntryScrollOffsetPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryScrollOffsetPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryScrollOffsetPropertyInfo = IsEntry
type AttrGetType EntryScrollOffsetPropertyInfo = Int32
type AttrLabel EntryScrollOffsetPropertyInfo = "scroll-offset"
type AttrOrigin EntryScrollOffsetPropertyInfo = Entry
attrGet _ = getEntryScrollOffset
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "secondary-icon-activatable"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-activatable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconActivatable
@
-}
getEntrySecondaryIconActivatable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntrySecondaryIconActivatable obj = liftIO $ B.Properties.getObjectPropertyBool obj "secondary-icon-activatable"
{- |
Set the value of the “@secondary-icon-activatable@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconActivatable 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconActivatable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntrySecondaryIconActivatable obj val = liftIO $ B.Properties.setObjectPropertyBool obj "secondary-icon-activatable" val
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-activatable@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconActivatable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntrySecondaryIconActivatable val = B.Properties.constructObjectPropertyBool "secondary-icon-activatable" val
#if ENABLE_OVERLOADING
data EntrySecondaryIconActivatablePropertyInfo
instance AttrInfo EntrySecondaryIconActivatablePropertyInfo where
type AttrAllowedOps EntrySecondaryIconActivatablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconActivatablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntrySecondaryIconActivatablePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconActivatablePropertyInfo = Bool
type AttrLabel EntrySecondaryIconActivatablePropertyInfo = "secondary-icon-activatable"
type AttrOrigin EntrySecondaryIconActivatablePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconActivatable
attrSet _ = setEntrySecondaryIconActivatable
attrConstruct _ = constructEntrySecondaryIconActivatable
attrClear _ = undefined
#endif
-- VVV Prop "secondary-icon-gicon"
-- Type: TInterface (Name {namespace = "Gio", name = "Icon"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-gicon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconGicon
@
-}
getEntrySecondaryIconGicon :: (MonadIO m, IsEntry o) => o -> m (Maybe Gio.Icon.Icon)
getEntrySecondaryIconGicon obj = liftIO $ B.Properties.getObjectPropertyObject obj "secondary-icon-gicon" Gio.Icon.Icon
{- |
Set the value of the “@secondary-icon-gicon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconGicon 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconGicon :: (MonadIO m, IsEntry o, Gio.Icon.IsIcon a) => o -> a -> m ()
setEntrySecondaryIconGicon obj val = liftIO $ B.Properties.setObjectPropertyObject obj "secondary-icon-gicon" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-gicon@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconGicon :: (IsEntry o, Gio.Icon.IsIcon a) => a -> IO (GValueConstruct o)
constructEntrySecondaryIconGicon val = B.Properties.constructObjectPropertyObject "secondary-icon-gicon" (Just val)
{- |
Set the value of the “@secondary-icon-gicon@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconGicon
@
-}
clearEntrySecondaryIconGicon :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconGicon obj = liftIO $ B.Properties.setObjectPropertyObject obj "secondary-icon-gicon" (Nothing :: Maybe Gio.Icon.Icon)
#if ENABLE_OVERLOADING
data EntrySecondaryIconGiconPropertyInfo
instance AttrInfo EntrySecondaryIconGiconPropertyInfo where
type AttrAllowedOps EntrySecondaryIconGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconGiconPropertyInfo = Gio.Icon.IsIcon
type AttrBaseTypeConstraint EntrySecondaryIconGiconPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconGiconPropertyInfo = (Maybe Gio.Icon.Icon)
type AttrLabel EntrySecondaryIconGiconPropertyInfo = "secondary-icon-gicon"
type AttrOrigin EntrySecondaryIconGiconPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconGicon
attrSet _ = setEntrySecondaryIconGicon
attrConstruct _ = constructEntrySecondaryIconGicon
attrClear _ = clearEntrySecondaryIconGicon
#endif
-- VVV Prop "secondary-icon-name"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-name@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconName
@
-}
getEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconName obj = liftIO $ B.Properties.getObjectPropertyString obj "secondary-icon-name"
{- |
Set the value of the “@secondary-icon-name@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconName 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconName obj val = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-name" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-name@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconName :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconName val = B.Properties.constructObjectPropertyString "secondary-icon-name" (Just val)
{- |
Set the value of the “@secondary-icon-name@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconName
@
-}
clearEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconName obj = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconNamePropertyInfo
instance AttrInfo EntrySecondaryIconNamePropertyInfo where
type AttrAllowedOps EntrySecondaryIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconNamePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconNamePropertyInfo = "secondary-icon-name"
type AttrOrigin EntrySecondaryIconNamePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconName
attrSet _ = setEntrySecondaryIconName
attrConstruct _ = constructEntrySecondaryIconName
attrClear _ = clearEntrySecondaryIconName
#endif
-- VVV Prop "secondary-icon-pixbuf"
-- Type: TInterface (Name {namespace = "GdkPixbuf", name = "Pixbuf"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-pixbuf@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconPixbuf
@
-}
getEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
getEntrySecondaryIconPixbuf obj = liftIO $ B.Properties.getObjectPropertyObject obj "secondary-icon-pixbuf" GdkPixbuf.Pixbuf.Pixbuf
{- |
Set the value of the “@secondary-icon-pixbuf@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconPixbuf 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setEntrySecondaryIconPixbuf obj val = liftIO $ B.Properties.setObjectPropertyObject obj "secondary-icon-pixbuf" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-pixbuf@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconPixbuf :: (IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> IO (GValueConstruct o)
constructEntrySecondaryIconPixbuf val = B.Properties.constructObjectPropertyObject "secondary-icon-pixbuf" (Just val)
{- |
Set the value of the “@secondary-icon-pixbuf@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconPixbuf
@
-}
clearEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconPixbuf obj = liftIO $ B.Properties.setObjectPropertyObject obj "secondary-icon-pixbuf" (Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if ENABLE_OVERLOADING
data EntrySecondaryIconPixbufPropertyInfo
instance AttrInfo EntrySecondaryIconPixbufPropertyInfo where
type AttrAllowedOps EntrySecondaryIconPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrBaseTypeConstraint EntrySecondaryIconPixbufPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconPixbufPropertyInfo = (Maybe GdkPixbuf.Pixbuf.Pixbuf)
type AttrLabel EntrySecondaryIconPixbufPropertyInfo = "secondary-icon-pixbuf"
type AttrOrigin EntrySecondaryIconPixbufPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconPixbuf
attrSet _ = setEntrySecondaryIconPixbuf
attrConstruct _ = constructEntrySecondaryIconPixbuf
attrClear _ = clearEntrySecondaryIconPixbuf
#endif
-- VVV Prop "secondary-icon-sensitive"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-sensitive@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconSensitive
@
-}
getEntrySecondaryIconSensitive :: (MonadIO m, IsEntry o) => o -> m Bool
getEntrySecondaryIconSensitive obj = liftIO $ B.Properties.getObjectPropertyBool obj "secondary-icon-sensitive"
{- |
Set the value of the “@secondary-icon-sensitive@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconSensitive 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconSensitive :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntrySecondaryIconSensitive obj val = liftIO $ B.Properties.setObjectPropertyBool obj "secondary-icon-sensitive" val
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-sensitive@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconSensitive :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntrySecondaryIconSensitive val = B.Properties.constructObjectPropertyBool "secondary-icon-sensitive" val
#if ENABLE_OVERLOADING
data EntrySecondaryIconSensitivePropertyInfo
instance AttrInfo EntrySecondaryIconSensitivePropertyInfo where
type AttrAllowedOps EntrySecondaryIconSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconSensitivePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntrySecondaryIconSensitivePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconSensitivePropertyInfo = Bool
type AttrLabel EntrySecondaryIconSensitivePropertyInfo = "secondary-icon-sensitive"
type AttrOrigin EntrySecondaryIconSensitivePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconSensitive
attrSet _ = setEntrySecondaryIconSensitive
attrConstruct _ = constructEntrySecondaryIconSensitive
attrClear _ = undefined
#endif
-- VVV Prop "secondary-icon-stock"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-stock@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconStock
@
-}
getEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconStock obj = liftIO $ B.Properties.getObjectPropertyString obj "secondary-icon-stock"
{- |
Set the value of the “@secondary-icon-stock@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconStock 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconStock obj val = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-stock" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-stock@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconStock :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconStock val = B.Properties.constructObjectPropertyString "secondary-icon-stock" (Just val)
{- |
Set the value of the “@secondary-icon-stock@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconStock
@
-}
clearEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconStock obj = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-stock" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconStockPropertyInfo
instance AttrInfo EntrySecondaryIconStockPropertyInfo where
type AttrAllowedOps EntrySecondaryIconStockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconStockPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconStockPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconStockPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconStockPropertyInfo = "secondary-icon-stock"
type AttrOrigin EntrySecondaryIconStockPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconStock
attrSet _ = setEntrySecondaryIconStock
attrConstruct _ = constructEntrySecondaryIconStock
attrClear _ = clearEntrySecondaryIconStock
#endif
-- VVV Prop "secondary-icon-storage-type"
-- Type: TInterface (Name {namespace = "Gtk", name = "ImageType"})
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-storage-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconStorageType
@
-}
getEntrySecondaryIconStorageType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ImageType
getEntrySecondaryIconStorageType obj = liftIO $ B.Properties.getObjectPropertyEnum obj "secondary-icon-storage-type"
#if ENABLE_OVERLOADING
data EntrySecondaryIconStorageTypePropertyInfo
instance AttrInfo EntrySecondaryIconStorageTypePropertyInfo where
type AttrAllowedOps EntrySecondaryIconStorageTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconStorageTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint EntrySecondaryIconStorageTypePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconStorageTypePropertyInfo = Gtk.Enums.ImageType
type AttrLabel EntrySecondaryIconStorageTypePropertyInfo = "secondary-icon-storage-type"
type AttrOrigin EntrySecondaryIconStorageTypePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconStorageType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "secondary-icon-tooltip-markup"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-tooltip-markup@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconTooltipMarkup
@
-}
getEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconTooltipMarkup obj = liftIO $ B.Properties.getObjectPropertyString obj "secondary-icon-tooltip-markup"
{- |
Set the value of the “@secondary-icon-tooltip-markup@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconTooltipMarkup 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconTooltipMarkup obj val = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-tooltip-markup" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-tooltip-markup@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconTooltipMarkup :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconTooltipMarkup val = B.Properties.constructObjectPropertyString "secondary-icon-tooltip-markup" (Just val)
{- |
Set the value of the “@secondary-icon-tooltip-markup@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconTooltipMarkup
@
-}
clearEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconTooltipMarkup obj = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-tooltip-markup" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconTooltipMarkupPropertyInfo
instance AttrInfo EntrySecondaryIconTooltipMarkupPropertyInfo where
type AttrAllowedOps EntrySecondaryIconTooltipMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconTooltipMarkupPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconTooltipMarkupPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconTooltipMarkupPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconTooltipMarkupPropertyInfo = "secondary-icon-tooltip-markup"
type AttrOrigin EntrySecondaryIconTooltipMarkupPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconTooltipMarkup
attrSet _ = setEntrySecondaryIconTooltipMarkup
attrConstruct _ = constructEntrySecondaryIconTooltipMarkup
attrClear _ = clearEntrySecondaryIconTooltipMarkup
#endif
-- VVV Prop "secondary-icon-tooltip-text"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@secondary-icon-tooltip-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #secondaryIconTooltipText
@
-}
getEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconTooltipText obj = liftIO $ B.Properties.getObjectPropertyString obj "secondary-icon-tooltip-text"
{- |
Set the value of the “@secondary-icon-tooltip-text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #secondaryIconTooltipText 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconTooltipText obj val = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-tooltip-text" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@secondary-icon-tooltip-text@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntrySecondaryIconTooltipText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconTooltipText val = B.Properties.constructObjectPropertyString "secondary-icon-tooltip-text" (Just val)
{- |
Set the value of the “@secondary-icon-tooltip-text@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #secondaryIconTooltipText
@
-}
clearEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconTooltipText obj = liftIO $ B.Properties.setObjectPropertyString obj "secondary-icon-tooltip-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconTooltipTextPropertyInfo
instance AttrInfo EntrySecondaryIconTooltipTextPropertyInfo where
type AttrAllowedOps EntrySecondaryIconTooltipTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconTooltipTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconTooltipTextPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconTooltipTextPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconTooltipTextPropertyInfo = "secondary-icon-tooltip-text"
type AttrOrigin EntrySecondaryIconTooltipTextPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconTooltipText
attrSet _ = setEntrySecondaryIconTooltipText
attrConstruct _ = constructEntrySecondaryIconTooltipText
attrClear _ = clearEntrySecondaryIconTooltipText
#endif
-- VVV Prop "selection-bound"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@selection-bound@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #selectionBound
@
-}
getEntrySelectionBound :: (MonadIO m, IsEntry o) => o -> m Int32
getEntrySelectionBound obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "selection-bound"
#if ENABLE_OVERLOADING
data EntrySelectionBoundPropertyInfo
instance AttrInfo EntrySelectionBoundPropertyInfo where
type AttrAllowedOps EntrySelectionBoundPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntrySelectionBoundPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntrySelectionBoundPropertyInfo = IsEntry
type AttrGetType EntrySelectionBoundPropertyInfo = Int32
type AttrLabel EntrySelectionBoundPropertyInfo = "selection-bound"
type AttrOrigin EntrySelectionBoundPropertyInfo = Entry
attrGet _ = getEntrySelectionBound
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "shadow-type"
-- Type: TInterface (Name {namespace = "Gtk", name = "ShadowType"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@shadow-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #shadowType
@
-}
getEntryShadowType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ShadowType
getEntryShadowType obj = liftIO $ B.Properties.getObjectPropertyEnum obj "shadow-type"
{- |
Set the value of the “@shadow-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #shadowType 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryShadowType :: (MonadIO m, IsEntry o) => o -> Gtk.Enums.ShadowType -> m ()
setEntryShadowType obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "shadow-type" val
{- |
Construct a `GValueConstruct` with valid value for the “@shadow-type@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryShadowType :: (IsEntry o) => Gtk.Enums.ShadowType -> IO (GValueConstruct o)
constructEntryShadowType val = B.Properties.constructObjectPropertyEnum "shadow-type" val
#if ENABLE_OVERLOADING
data EntryShadowTypePropertyInfo
instance AttrInfo EntryShadowTypePropertyInfo where
type AttrAllowedOps EntryShadowTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryShadowTypePropertyInfo = (~) Gtk.Enums.ShadowType
type AttrBaseTypeConstraint EntryShadowTypePropertyInfo = IsEntry
type AttrGetType EntryShadowTypePropertyInfo = Gtk.Enums.ShadowType
type AttrLabel EntryShadowTypePropertyInfo = "shadow-type"
type AttrOrigin EntryShadowTypePropertyInfo = Entry
attrGet _ = getEntryShadowType
attrSet _ = setEntryShadowType
attrConstruct _ = constructEntryShadowType
attrClear _ = undefined
#endif
-- VVV Prop "show-emoji-icon"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@show-emoji-icon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #showEmojiIcon
@
-}
getEntryShowEmojiIcon :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryShowEmojiIcon obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-emoji-icon"
{- |
Set the value of the “@show-emoji-icon@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #showEmojiIcon 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryShowEmojiIcon :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryShowEmojiIcon obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-emoji-icon" val
{- |
Construct a `GValueConstruct` with valid value for the “@show-emoji-icon@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryShowEmojiIcon :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryShowEmojiIcon val = B.Properties.constructObjectPropertyBool "show-emoji-icon" val
#if ENABLE_OVERLOADING
data EntryShowEmojiIconPropertyInfo
instance AttrInfo EntryShowEmojiIconPropertyInfo where
type AttrAllowedOps EntryShowEmojiIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryShowEmojiIconPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryShowEmojiIconPropertyInfo = IsEntry
type AttrGetType EntryShowEmojiIconPropertyInfo = Bool
type AttrLabel EntryShowEmojiIconPropertyInfo = "show-emoji-icon"
type AttrOrigin EntryShowEmojiIconPropertyInfo = Entry
attrGet _ = getEntryShowEmojiIcon
attrSet _ = setEntryShowEmojiIcon
attrConstruct _ = constructEntryShowEmojiIcon
attrClear _ = undefined
#endif
-- VVV Prop "tabs"
-- Type: TInterface (Name {namespace = "Pango", name = "TabArray"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just True,Just False)
{- |
Get the value of the “@tabs@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #tabs
@
-}
getEntryTabs :: (MonadIO m, IsEntry o) => o -> m (Maybe Pango.TabArray.TabArray)
getEntryTabs obj = liftIO $ B.Properties.getObjectPropertyBoxed obj "tabs" Pango.TabArray.TabArray
{- |
Set the value of the “@tabs@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #tabs 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryTabs :: (MonadIO m, IsEntry o) => o -> Pango.TabArray.TabArray -> m ()
setEntryTabs obj val = liftIO $ B.Properties.setObjectPropertyBoxed obj "tabs" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@tabs@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryTabs :: (IsEntry o) => Pango.TabArray.TabArray -> IO (GValueConstruct o)
constructEntryTabs val = B.Properties.constructObjectPropertyBoxed "tabs" (Just val)
#if ENABLE_OVERLOADING
data EntryTabsPropertyInfo
instance AttrInfo EntryTabsPropertyInfo where
type AttrAllowedOps EntryTabsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTabsPropertyInfo = (~) Pango.TabArray.TabArray
type AttrBaseTypeConstraint EntryTabsPropertyInfo = IsEntry
type AttrGetType EntryTabsPropertyInfo = (Maybe Pango.TabArray.TabArray)
type AttrLabel EntryTabsPropertyInfo = "tabs"
type AttrOrigin EntryTabsPropertyInfo = Entry
attrGet _ = getEntryTabs
attrSet _ = setEntryTabs
attrConstruct _ = constructEntryTabs
attrClear _ = undefined
#endif
-- VVV Prop "text"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #text
@
-}
getEntryText :: (MonadIO m, IsEntry o) => o -> m T.Text
getEntryText obj = liftIO $ checkUnexpectedNothing "getEntryText" $ B.Properties.getObjectPropertyString obj "text"
{- |
Set the value of the “@text@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #text 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryText obj val = liftIO $ B.Properties.setObjectPropertyString obj "text" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@text@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryText val = B.Properties.constructObjectPropertyString "text" (Just val)
#if ENABLE_OVERLOADING
data EntryTextPropertyInfo
instance AttrInfo EntryTextPropertyInfo where
type AttrAllowedOps EntryTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryTextPropertyInfo = IsEntry
type AttrGetType EntryTextPropertyInfo = T.Text
type AttrLabel EntryTextPropertyInfo = "text"
type AttrOrigin EntryTextPropertyInfo = Entry
attrGet _ = getEntryText
attrSet _ = setEntryText
attrConstruct _ = constructEntryText
attrClear _ = undefined
#endif
-- VVV Prop "text-length"
-- Type: TBasicType TUInt
-- Flags: [PropertyReadable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@text-length@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #textLength
@
-}
getEntryTextLength :: (MonadIO m, IsEntry o) => o -> m Word32
getEntryTextLength obj = liftIO $ B.Properties.getObjectPropertyUInt32 obj "text-length"
#if ENABLE_OVERLOADING
data EntryTextLengthPropertyInfo
instance AttrInfo EntryTextLengthPropertyInfo where
type AttrAllowedOps EntryTextLengthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryTextLengthPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryTextLengthPropertyInfo = IsEntry
type AttrGetType EntryTextLengthPropertyInfo = Word32
type AttrLabel EntryTextLengthPropertyInfo = "text-length"
type AttrOrigin EntryTextLengthPropertyInfo = Entry
attrGet _ = getEntryTextLength
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
-- VVV Prop "truncate-multiline"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@truncate-multiline@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #truncateMultiline
@
-}
getEntryTruncateMultiline :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryTruncateMultiline obj = liftIO $ B.Properties.getObjectPropertyBool obj "truncate-multiline"
{- |
Set the value of the “@truncate-multiline@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #truncateMultiline 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryTruncateMultiline :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryTruncateMultiline obj val = liftIO $ B.Properties.setObjectPropertyBool obj "truncate-multiline" val
{- |
Construct a `GValueConstruct` with valid value for the “@truncate-multiline@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryTruncateMultiline :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryTruncateMultiline val = B.Properties.constructObjectPropertyBool "truncate-multiline" val
#if ENABLE_OVERLOADING
data EntryTruncateMultilinePropertyInfo
instance AttrInfo EntryTruncateMultilinePropertyInfo where
type AttrAllowedOps EntryTruncateMultilinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTruncateMultilinePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryTruncateMultilinePropertyInfo = IsEntry
type AttrGetType EntryTruncateMultilinePropertyInfo = Bool
type AttrLabel EntryTruncateMultilinePropertyInfo = "truncate-multiline"
type AttrOrigin EntryTruncateMultilinePropertyInfo = Entry
attrGet _ = getEntryTruncateMultiline
attrSet _ = setEntryTruncateMultiline
attrConstruct _ = constructEntryTruncateMultiline
attrClear _ = undefined
#endif
-- VVV Prop "visibility"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@visibility@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #visibility
@
-}
getEntryVisibility :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryVisibility obj = liftIO $ B.Properties.getObjectPropertyBool obj "visibility"
{- |
Set the value of the “@visibility@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #visibility 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryVisibility :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryVisibility obj val = liftIO $ B.Properties.setObjectPropertyBool obj "visibility" val
{- |
Construct a `GValueConstruct` with valid value for the “@visibility@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryVisibility :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryVisibility val = B.Properties.constructObjectPropertyBool "visibility" val
#if ENABLE_OVERLOADING
data EntryVisibilityPropertyInfo
instance AttrInfo EntryVisibilityPropertyInfo where
type AttrAllowedOps EntryVisibilityPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryVisibilityPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryVisibilityPropertyInfo = IsEntry
type AttrGetType EntryVisibilityPropertyInfo = Bool
type AttrLabel EntryVisibilityPropertyInfo = "visibility"
type AttrOrigin EntryVisibilityPropertyInfo = Entry
attrGet _ = getEntryVisibility
attrSet _ = setEntryVisibility
attrConstruct _ = constructEntryVisibility
attrClear _ = undefined
#endif
-- VVV Prop "width-chars"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@width-chars@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #widthChars
@
-}
getEntryWidthChars :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryWidthChars obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "width-chars"
{- |
Set the value of the “@width-chars@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #widthChars 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryWidthChars :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryWidthChars obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "width-chars" val
{- |
Construct a `GValueConstruct` with valid value for the “@width-chars@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryWidthChars :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryWidthChars val = B.Properties.constructObjectPropertyInt32 "width-chars" val
#if ENABLE_OVERLOADING
data EntryWidthCharsPropertyInfo
instance AttrInfo EntryWidthCharsPropertyInfo where
type AttrAllowedOps EntryWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryWidthCharsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryWidthCharsPropertyInfo = IsEntry
type AttrGetType EntryWidthCharsPropertyInfo = Int32
type AttrLabel EntryWidthCharsPropertyInfo = "width-chars"
type AttrOrigin EntryWidthCharsPropertyInfo = Entry
attrGet _ = getEntryWidthChars
attrSet _ = setEntryWidthChars
attrConstruct _ = constructEntryWidthChars
attrClear _ = undefined
#endif
-- VVV Prop "xalign"
-- Type: TBasicType TFloat
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Nothing,Nothing)
{- |
Get the value of the “@xalign@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' entry #xalign
@
-}
getEntryXalign :: (MonadIO m, IsEntry o) => o -> m Float
getEntryXalign obj = liftIO $ B.Properties.getObjectPropertyFloat obj "xalign"
{- |
Set the value of the “@xalign@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' entry [ #xalign 'Data.GI.Base.Attributes.:=' value ]
@
-}
setEntryXalign :: (MonadIO m, IsEntry o) => o -> Float -> m ()
setEntryXalign obj val = liftIO $ B.Properties.setObjectPropertyFloat obj "xalign" val
{- |
Construct a `GValueConstruct` with valid value for the “@xalign@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructEntryXalign :: (IsEntry o) => Float -> IO (GValueConstruct o)
constructEntryXalign val = B.Properties.constructObjectPropertyFloat "xalign" val
#if ENABLE_OVERLOADING
data EntryXalignPropertyInfo
instance AttrInfo EntryXalignPropertyInfo where
type AttrAllowedOps EntryXalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryXalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint EntryXalignPropertyInfo = IsEntry
type AttrGetType EntryXalignPropertyInfo = Float
type AttrLabel EntryXalignPropertyInfo = "xalign"
type AttrOrigin EntryXalignPropertyInfo = Entry
attrGet _ = getEntryXalign
attrSet _ = setEntryXalign
attrConstruct _ = constructEntryXalign
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList Entry
type instance O.AttributeList Entry = EntryAttributeList
type EntryAttributeList = ('[ '("activatesDefault", EntryActivatesDefaultPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("attributes", EntryAttributesPropertyInfo), '("buffer", EntryBufferPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("capsLockWarning", EntryCapsLockWarningPropertyInfo), '("completion", EntryCompletionPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("cursorPosition", EntryCursorPositionPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("editable", EntryEditablePropertyInfo), '("editingCanceled", Gtk.CellEditable.CellEditableEditingCanceledPropertyInfo), '("enableEmojiCompletion", EntryEnableEmojiCompletionPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasFrame", EntryHasFramePropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("imModule", EntryImModulePropertyInfo), '("innerBorder", EntryInnerBorderPropertyInfo), '("inputHints", EntryInputHintsPropertyInfo), '("inputPurpose", EntryInputPurposePropertyInfo), '("invisibleChar", EntryInvisibleCharPropertyInfo), '("invisibleCharSet", EntryInvisibleCharSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxLength", EntryMaxLengthPropertyInfo), '("maxWidthChars", EntryMaxWidthCharsPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overwriteMode", EntryOverwriteModePropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("placeholderText", EntryPlaceholderTextPropertyInfo), '("populateAll", EntryPopulateAllPropertyInfo), '("primaryIconActivatable", EntryPrimaryIconActivatablePropertyInfo), '("primaryIconGicon", EntryPrimaryIconGiconPropertyInfo), '("primaryIconName", EntryPrimaryIconNamePropertyInfo), '("primaryIconPixbuf", EntryPrimaryIconPixbufPropertyInfo), '("primaryIconSensitive", EntryPrimaryIconSensitivePropertyInfo), '("primaryIconStock", EntryPrimaryIconStockPropertyInfo), '("primaryIconStorageType", EntryPrimaryIconStorageTypePropertyInfo), '("primaryIconTooltipMarkup", EntryPrimaryIconTooltipMarkupPropertyInfo), '("primaryIconTooltipText", EntryPrimaryIconTooltipTextPropertyInfo), '("progressFraction", EntryProgressFractionPropertyInfo), '("progressPulseStep", EntryProgressPulseStepPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("scrollOffset", EntryScrollOffsetPropertyInfo), '("secondaryIconActivatable", EntrySecondaryIconActivatablePropertyInfo), '("secondaryIconGicon", EntrySecondaryIconGiconPropertyInfo), '("secondaryIconName", EntrySecondaryIconNamePropertyInfo), '("secondaryIconPixbuf", EntrySecondaryIconPixbufPropertyInfo), '("secondaryIconSensitive", EntrySecondaryIconSensitivePropertyInfo), '("secondaryIconStock", EntrySecondaryIconStockPropertyInfo), '("secondaryIconStorageType", EntrySecondaryIconStorageTypePropertyInfo), '("secondaryIconTooltipMarkup", EntrySecondaryIconTooltipMarkupPropertyInfo), '("secondaryIconTooltipText", EntrySecondaryIconTooltipTextPropertyInfo), '("selectionBound", EntrySelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("shadowType", EntryShadowTypePropertyInfo), '("showEmojiIcon", EntryShowEmojiIconPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tabs", EntryTabsPropertyInfo), '("text", EntryTextPropertyInfo), '("textLength", EntryTextLengthPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("truncateMultiline", EntryTruncateMultilinePropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visibility", EntryVisibilityPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", EntryWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("xalign", EntryXalignPropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
entryActivatesDefault :: AttrLabelProxy "activatesDefault"
entryActivatesDefault = AttrLabelProxy
entryAttributes :: AttrLabelProxy "attributes"
entryAttributes = AttrLabelProxy
entryBuffer :: AttrLabelProxy "buffer"
entryBuffer = AttrLabelProxy
entryCapsLockWarning :: AttrLabelProxy "capsLockWarning"
entryCapsLockWarning = AttrLabelProxy
entryCompletion :: AttrLabelProxy "completion"
entryCompletion = AttrLabelProxy
entryCursorPosition :: AttrLabelProxy "cursorPosition"
entryCursorPosition = AttrLabelProxy
entryEditable :: AttrLabelProxy "editable"
entryEditable = AttrLabelProxy
entryEnableEmojiCompletion :: AttrLabelProxy "enableEmojiCompletion"
entryEnableEmojiCompletion = AttrLabelProxy
entryHasFrame :: AttrLabelProxy "hasFrame"
entryHasFrame = AttrLabelProxy
entryImModule :: AttrLabelProxy "imModule"
entryImModule = AttrLabelProxy
entryInnerBorder :: AttrLabelProxy "innerBorder"
entryInnerBorder = AttrLabelProxy
entryInputHints :: AttrLabelProxy "inputHints"
entryInputHints = AttrLabelProxy
entryInputPurpose :: AttrLabelProxy "inputPurpose"
entryInputPurpose = AttrLabelProxy
entryInvisibleChar :: AttrLabelProxy "invisibleChar"
entryInvisibleChar = AttrLabelProxy
entryInvisibleCharSet :: AttrLabelProxy "invisibleCharSet"
entryInvisibleCharSet = AttrLabelProxy
entryMaxLength :: AttrLabelProxy "maxLength"
entryMaxLength = AttrLabelProxy
entryMaxWidthChars :: AttrLabelProxy "maxWidthChars"
entryMaxWidthChars = AttrLabelProxy
entryOverwriteMode :: AttrLabelProxy "overwriteMode"
entryOverwriteMode = AttrLabelProxy
entryPlaceholderText :: AttrLabelProxy "placeholderText"
entryPlaceholderText = AttrLabelProxy
entryPopulateAll :: AttrLabelProxy "populateAll"
entryPopulateAll = AttrLabelProxy
entryPrimaryIconActivatable :: AttrLabelProxy "primaryIconActivatable"
entryPrimaryIconActivatable = AttrLabelProxy
entryPrimaryIconGicon :: AttrLabelProxy "primaryIconGicon"
entryPrimaryIconGicon = AttrLabelProxy
entryPrimaryIconName :: AttrLabelProxy "primaryIconName"
entryPrimaryIconName = AttrLabelProxy
entryPrimaryIconPixbuf :: AttrLabelProxy "primaryIconPixbuf"
entryPrimaryIconPixbuf = AttrLabelProxy
entryPrimaryIconSensitive :: AttrLabelProxy "primaryIconSensitive"
entryPrimaryIconSensitive = AttrLabelProxy
entryPrimaryIconStock :: AttrLabelProxy "primaryIconStock"
entryPrimaryIconStock = AttrLabelProxy
entryPrimaryIconStorageType :: AttrLabelProxy "primaryIconStorageType"
entryPrimaryIconStorageType = AttrLabelProxy
entryPrimaryIconTooltipMarkup :: AttrLabelProxy "primaryIconTooltipMarkup"
entryPrimaryIconTooltipMarkup = AttrLabelProxy
entryPrimaryIconTooltipText :: AttrLabelProxy "primaryIconTooltipText"
entryPrimaryIconTooltipText = AttrLabelProxy
entryProgressFraction :: AttrLabelProxy "progressFraction"
entryProgressFraction = AttrLabelProxy
entryProgressPulseStep :: AttrLabelProxy "progressPulseStep"
entryProgressPulseStep = AttrLabelProxy
entryScrollOffset :: AttrLabelProxy "scrollOffset"
entryScrollOffset = AttrLabelProxy
entrySecondaryIconActivatable :: AttrLabelProxy "secondaryIconActivatable"
entrySecondaryIconActivatable = AttrLabelProxy
entrySecondaryIconGicon :: AttrLabelProxy "secondaryIconGicon"
entrySecondaryIconGicon = AttrLabelProxy
entrySecondaryIconName :: AttrLabelProxy "secondaryIconName"
entrySecondaryIconName = AttrLabelProxy
entrySecondaryIconPixbuf :: AttrLabelProxy "secondaryIconPixbuf"
entrySecondaryIconPixbuf = AttrLabelProxy
entrySecondaryIconSensitive :: AttrLabelProxy "secondaryIconSensitive"
entrySecondaryIconSensitive = AttrLabelProxy
entrySecondaryIconStock :: AttrLabelProxy "secondaryIconStock"
entrySecondaryIconStock = AttrLabelProxy
entrySecondaryIconStorageType :: AttrLabelProxy "secondaryIconStorageType"
entrySecondaryIconStorageType = AttrLabelProxy
entrySecondaryIconTooltipMarkup :: AttrLabelProxy "secondaryIconTooltipMarkup"
entrySecondaryIconTooltipMarkup = AttrLabelProxy
entrySecondaryIconTooltipText :: AttrLabelProxy "secondaryIconTooltipText"
entrySecondaryIconTooltipText = AttrLabelProxy
entrySelectionBound :: AttrLabelProxy "selectionBound"
entrySelectionBound = AttrLabelProxy
entryShadowType :: AttrLabelProxy "shadowType"
entryShadowType = AttrLabelProxy
entryShowEmojiIcon :: AttrLabelProxy "showEmojiIcon"
entryShowEmojiIcon = AttrLabelProxy
entryTabs :: AttrLabelProxy "tabs"
entryTabs = AttrLabelProxy
entryText :: AttrLabelProxy "text"
entryText = AttrLabelProxy
entryTextLength :: AttrLabelProxy "textLength"
entryTextLength = AttrLabelProxy
entryTruncateMultiline :: AttrLabelProxy "truncateMultiline"
entryTruncateMultiline = AttrLabelProxy
entryVisibility :: AttrLabelProxy "visibility"
entryVisibility = AttrLabelProxy
entryWidthChars :: AttrLabelProxy "widthChars"
entryWidthChars = AttrLabelProxy
entryXalign :: AttrLabelProxy "xalign"
entryXalign = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
data EntryActivateSignalInfo
instance SignalInfo EntryActivateSignalInfo where
type HaskellCallbackType EntryActivateSignalInfo = EntryActivateCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' connectMode
data EntryBackspaceSignalInfo
instance SignalInfo EntryBackspaceSignalInfo where
type HaskellCallbackType EntryBackspaceSignalInfo = EntryBackspaceCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' connectMode
data EntryCopyClipboardSignalInfo
instance SignalInfo EntryCopyClipboardSignalInfo where
type HaskellCallbackType EntryCopyClipboardSignalInfo = EntryCopyClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' connectMode
data EntryCutClipboardSignalInfo
instance SignalInfo EntryCutClipboardSignalInfo where
type HaskellCallbackType EntryCutClipboardSignalInfo = EntryCutClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' connectMode
data EntryDeleteFromCursorSignalInfo
instance SignalInfo EntryDeleteFromCursorSignalInfo where
type HaskellCallbackType EntryDeleteFromCursorSignalInfo = EntryDeleteFromCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' connectMode
data EntryIconPressSignalInfo
instance SignalInfo EntryIconPressSignalInfo where
type HaskellCallbackType EntryIconPressSignalInfo = EntryIconPressCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' connectMode
data EntryIconReleaseSignalInfo
instance SignalInfo EntryIconReleaseSignalInfo where
type HaskellCallbackType EntryIconReleaseSignalInfo = EntryIconReleaseCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' connectMode
data EntryInsertAtCursorSignalInfo
instance SignalInfo EntryInsertAtCursorSignalInfo where
type HaskellCallbackType EntryInsertAtCursorSignalInfo = EntryInsertAtCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' connectMode
data EntryInsertEmojiSignalInfo
instance SignalInfo EntryInsertEmojiSignalInfo where
type HaskellCallbackType EntryInsertEmojiSignalInfo = EntryInsertEmojiCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' connectMode
data EntryMoveCursorSignalInfo
instance SignalInfo EntryMoveCursorSignalInfo where
type HaskellCallbackType EntryMoveCursorSignalInfo = EntryMoveCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' connectMode
data EntryPasteClipboardSignalInfo
instance SignalInfo EntryPasteClipboardSignalInfo where
type HaskellCallbackType EntryPasteClipboardSignalInfo = EntryPasteClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' connectMode
data EntryPopulatePopupSignalInfo
instance SignalInfo EntryPopulatePopupSignalInfo where
type HaskellCallbackType EntryPopulatePopupSignalInfo = EntryPopulatePopupCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' connectMode
data EntryPreeditChangedSignalInfo
instance SignalInfo EntryPreeditChangedSignalInfo where
type HaskellCallbackType EntryPreeditChangedSignalInfo = EntryPreeditChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' connectMode
data EntryToggleOverwriteSignalInfo
instance SignalInfo EntryToggleOverwriteSignalInfo where
type HaskellCallbackType EntryToggleOverwriteSignalInfo = EntryToggleOverwriteCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' connectMode
type instance O.SignalList Entry = EntrySignalList
type EntrySignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activate", EntryActivateSignalInfo), '("backspace", EntryBackspaceSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("changed", Gtk.Editable.EditableChangedSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("copyClipboard", EntryCopyClipboardSignalInfo), '("cutClipboard", EntryCutClipboardSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("deleteFromCursor", EntryDeleteFromCursorSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("editingDone", Gtk.CellEditable.CellEditableEditingDoneSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("iconPress", EntryIconPressSignalInfo), '("iconRelease", EntryIconReleaseSignalInfo), '("insertAtCursor", EntryInsertAtCursorSignalInfo), '("insertEmoji", EntryInsertEmojiSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveCursor", EntryMoveCursorSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("pasteClipboard", EntryPasteClipboardSignalInfo), '("populatePopup", EntryPopulatePopupSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("preeditChanged", EntryPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("removeWidget", Gtk.CellEditable.CellEditableRemoveWidgetSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("toggleOverwrite", EntryToggleOverwriteSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
-- method Entry::new
-- method type : Constructor
-- Args : []
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "Entry"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_new" gtk_entry_new ::
IO (Ptr Entry)
{- |
Creates a new entry.
-}
entryNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Entry
{- ^ __Returns:__ a new 'GI.Gtk.Objects.Entry.Entry'. -}
entryNew = liftIO $ do
result <- gtk_entry_new
checkUnexpectedReturnNULL "entryNew" result
result' <- (newObject Entry) result
return result'
#if ENABLE_OVERLOADING
#endif
-- method Entry::new_with_buffer
-- method type : Constructor
-- Args : [Arg {argCName = "buffer", argType = TInterface (Name {namespace = "Gtk", name = "EntryBuffer"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "The buffer to use for the new #GtkEntry.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "Entry"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_new_with_buffer" gtk_entry_new_with_buffer ::
Ptr Gtk.EntryBuffer.EntryBuffer -> -- buffer : TInterface (Name {namespace = "Gtk", name = "EntryBuffer"})
IO (Ptr Entry)
{- |
Creates a new entry with the specified text buffer.
/Since: 2.18/
-}
entryNewWithBuffer ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.EntryBuffer.IsEntryBuffer a) =>
a
{- ^ /@buffer@/: The buffer to use for the new 'GI.Gtk.Objects.Entry.Entry'. -}
-> m Entry
{- ^ __Returns:__ a new 'GI.Gtk.Objects.Entry.Entry' -}
entryNewWithBuffer buffer = liftIO $ do
buffer' <- unsafeManagedPtrCastPtr buffer
result <- gtk_entry_new_with_buffer buffer'
checkUnexpectedReturnNULL "entryNewWithBuffer" result
result' <- (newObject Entry) result
touchManagedPtr buffer
return result'
#if ENABLE_OVERLOADING
#endif
-- method Entry::get_activates_default
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_activates_default" gtk_entry_get_activates_default ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CInt
{- |
Retrieves the value set by 'GI.Gtk.Objects.Entry.entrySetActivatesDefault'.
-}
entryGetActivatesDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Bool
{- ^ __Returns:__ 'True' if the entry will activate the default widget -}
entryGetActivatesDefault entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_activates_default entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetActivatesDefaultMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetActivatesDefaultMethodInfo a signature where
overloadedMethod _ = entryGetActivatesDefault
#endif
-- method Entry::get_alignment
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TFloat)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_alignment" gtk_entry_get_alignment ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CFloat
{- |
Gets the value set by 'GI.Gtk.Objects.Entry.entrySetAlignment'.
/Since: 2.4/
-}
entryGetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Float
{- ^ __Returns:__ the alignment -}
entryGetAlignment entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_alignment entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetAlignmentMethodInfo
instance (signature ~ (m Float), MonadIO m, IsEntry a) => O.MethodInfo EntryGetAlignmentMethodInfo a signature where
overloadedMethod _ = entryGetAlignment
#endif
-- method Entry::get_attributes
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Pango", name = "AttrList"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_attributes" gtk_entry_get_attributes ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Pango.AttrList.AttrList)
{- |
Gets the attribute list that was set on the entry using
'GI.Gtk.Objects.Entry.entrySetAttributes', if any.
/Since: 3.6/
-}
entryGetAttributes ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m (Maybe Pango.AttrList.AttrList)
{- ^ __Returns:__ the attribute list, or 'Nothing'
if none was set. -}
entryGetAttributes entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_attributes entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Pango.AttrList.AttrList) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetAttributesMethodInfo
instance (signature ~ (m (Maybe Pango.AttrList.AttrList)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetAttributesMethodInfo a signature where
overloadedMethod _ = entryGetAttributes
#endif
-- method Entry::get_buffer
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "EntryBuffer"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_buffer" gtk_entry_get_buffer ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Gtk.EntryBuffer.EntryBuffer)
{- |
Get the 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' object which holds the text for
this widget.
/Since: 2.18/
-}
entryGetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Gtk.EntryBuffer.EntryBuffer
{- ^ __Returns:__ A 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' object. -}
entryGetBuffer entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_buffer entry'
checkUnexpectedReturnNULL "entryGetBuffer" result
result' <- (newObject Gtk.EntryBuffer.EntryBuffer) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetBufferMethodInfo
instance (signature ~ (m Gtk.EntryBuffer.EntryBuffer), MonadIO m, IsEntry a) => O.MethodInfo EntryGetBufferMethodInfo a signature where
overloadedMethod _ = entryGetBuffer
#endif
-- method Entry::get_completion
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "EntryCompletion"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_completion" gtk_entry_get_completion ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Gtk.EntryCompletion.EntryCompletion)
{- |
Returns the auxiliary completion object currently in use by /@entry@/.
/Since: 2.4/
-}
entryGetCompletion ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> m Gtk.EntryCompletion.EntryCompletion
{- ^ __Returns:__ The auxiliary completion object currently
in use by /@entry@/. -}
entryGetCompletion entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_completion entry'
checkUnexpectedReturnNULL "entryGetCompletion" result
result' <- (newObject Gtk.EntryCompletion.EntryCompletion) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetCompletionMethodInfo
instance (signature ~ (m Gtk.EntryCompletion.EntryCompletion), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCompletionMethodInfo a signature where
overloadedMethod _ = entryGetCompletion
#endif
-- method Entry::get_current_icon_drag_source
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_current_icon_drag_source" gtk_entry_get_current_icon_drag_source ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO Int32
{- |
Returns the index of the icon which is the source of the current
DND operation, or -1.
This function is meant to be used in a 'GI.Gtk.Objects.Widget.Widget'::@/drag-data-get/@
callback.
/Since: 2.16/
-}
entryGetCurrentIconDragSource ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Int32
{- ^ __Returns:__ index of the icon which is the source of the current
DND operation, or -1. -}
entryGetCurrentIconDragSource entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_current_icon_drag_source entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetCurrentIconDragSourceMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCurrentIconDragSourceMethodInfo a signature where
overloadedMethod _ = entryGetCurrentIconDragSource
#endif
-- method Entry::get_cursor_hadjustment
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "Adjustment"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_cursor_hadjustment" gtk_entry_get_cursor_hadjustment ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Gtk.Adjustment.Adjustment)
{- |
Retrieves the horizontal cursor adjustment for the entry.
See 'GI.Gtk.Objects.Entry.entrySetCursorHadjustment'.
/Since: 2.12/
-}
entryGetCursorHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m (Maybe Gtk.Adjustment.Adjustment)
{- ^ __Returns:__ the horizontal cursor adjustment, or 'Nothing'
if none has been set. -}
entryGetCursorHadjustment entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_cursor_hadjustment entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Adjustment.Adjustment) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetCursorHadjustmentMethodInfo
instance (signature ~ (m (Maybe Gtk.Adjustment.Adjustment)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCursorHadjustmentMethodInfo a signature where
overloadedMethod _ = entryGetCursorHadjustment
#endif
-- method Entry::get_has_frame
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_has_frame" gtk_entry_get_has_frame ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CInt
{- |
Gets the value set by 'GI.Gtk.Objects.Entry.entrySetHasFrame'.
-}
entryGetHasFrame ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Bool
{- ^ __Returns:__ whether the entry has a beveled frame -}
entryGetHasFrame entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_has_frame entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetHasFrameMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetHasFrameMethodInfo a signature where
overloadedMethod _ = entryGetHasFrame
#endif
-- method Entry::get_icon_activatable
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_activatable" gtk_entry_get_icon_activatable ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CInt
{- |
Returns whether the icon is activatable.
/Since: 2.16/
-}
entryGetIconActivatable ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m Bool
{- ^ __Returns:__ 'True' if the icon is activatable. -}
entryGetIconActivatable entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_activatable entry' iconPos'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconActivatableMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconActivatableMethodInfo a signature where
overloadedMethod _ = entryGetIconActivatable
#endif
-- method Entry::get_icon_area
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_area", argType = TInterface (Name {namespace = "Gdk", name = "Rectangle"}), direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Return location for the icon\8217s area", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_area" gtk_entry_get_icon_area ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
Ptr Gdk.Rectangle.Rectangle -> -- icon_area : TInterface (Name {namespace = "Gdk", name = "Rectangle"})
IO ()
{- |
Gets the area where entry’s icon at /@iconPos@/ is drawn.
This function is useful when drawing something to the
entry in a draw callback.
If the entry is not realized or has no icon at the given position,
/@iconArea@/ is filled with zeros. Otherwise, /@iconArea@/ will be filled
with the icon’s allocation, relative to /@entry@/’s allocation.
See also 'GI.Gtk.Objects.Entry.entryGetTextArea'
/Since: 3.0/
-}
entryGetIconArea ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m (Gdk.Rectangle.Rectangle)
entryGetIconArea entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
iconArea <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_entry_get_icon_area entry' iconPos' iconArea
iconArea' <- (wrapBoxed Gdk.Rectangle.Rectangle) iconArea
touchManagedPtr entry
return iconArea'
#if ENABLE_OVERLOADING
data EntryGetIconAreaMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Gdk.Rectangle.Rectangle)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconAreaMethodInfo a signature where
overloadedMethod _ = entryGetIconArea
#endif
-- method Entry::get_icon_at_pos
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the x coordinate of the position to find", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the y coordinate of the position to find", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_at_pos" gtk_entry_get_icon_at_pos ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- x : TBasicType TInt
Int32 -> -- y : TBasicType TInt
IO Int32
{- |
Finds the icon at the given position and return its index. The
position’s coordinates are relative to the /@entry@/’s top left corner.
If /@x@/, /@y@/ doesn’t lie inside an icon, -1 is returned.
This function is intended for use in a 'GI.Gtk.Objects.Widget.Widget'::@/query-tooltip/@
signal handler.
/Since: 2.16/
-}
entryGetIconAtPos ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@x@/: the x coordinate of the position to find -}
-> Int32
{- ^ /@y@/: the y coordinate of the position to find -}
-> m Int32
{- ^ __Returns:__ the index of the icon at the given position, or -1 -}
entryGetIconAtPos entry x y = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_icon_at_pos entry' x y
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetIconAtPosMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconAtPosMethodInfo a signature where
overloadedMethod _ = entryGetIconAtPos
#endif
-- method Entry::get_icon_gicon
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gio", name = "Icon"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_gicon" gtk_entry_get_icon_gicon ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO (Ptr Gio.Icon.Icon)
{- |
Retrieves the 'GI.Gio.Interfaces.Icon.Icon' used for the icon, or 'Nothing' if there is
no icon or if the icon was set by some other method (e.g., by
stock, pixbuf, or icon name).
/Since: 2.16/
-}
entryGetIconGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m (Maybe Gio.Icon.Icon)
{- ^ __Returns:__ A 'GI.Gio.Interfaces.Icon.Icon', or 'Nothing' if no icon is set
or if the icon is not a 'GI.Gio.Interfaces.Icon.Icon' -}
entryGetIconGicon entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_gicon entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gio.Icon.Icon) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconGiconMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe Gio.Icon.Icon)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconGiconMethodInfo a signature where
overloadedMethod _ = entryGetIconGicon
#endif
-- method Entry::get_icon_name
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_name" gtk_entry_get_icon_name ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CString
{- |
Retrieves the icon name used for the icon, or 'Nothing' if there is
no icon or if the icon was set by some other method (e.g., by
pixbuf, stock or gicon).
/Since: 2.16/
-}
entryGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m (Maybe T.Text)
{- ^ __Returns:__ An icon name, or 'Nothing' if no icon is set or if the icon
wasn’t set from an icon name -}
entryGetIconName entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_name entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconNameMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconNameMethodInfo a signature where
overloadedMethod _ = entryGetIconName
#endif
-- method Entry::get_icon_pixbuf
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "GdkPixbuf", name = "Pixbuf"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_pixbuf" gtk_entry_get_icon_pixbuf ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO (Ptr GdkPixbuf.Pixbuf.Pixbuf)
{- |
Retrieves the image used for the icon.
Unlike the other methods of setting and getting icon data, this
method will work regardless of whether the icon was set using a
'GI.GdkPixbuf.Objects.Pixbuf.Pixbuf', a 'GI.Gio.Interfaces.Icon.Icon', a stock item, or an icon name.
/Since: 2.16/
-}
entryGetIconPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
{- ^ __Returns:__ A 'GI.GdkPixbuf.Objects.Pixbuf.Pixbuf', or 'Nothing' if no icon is
set for this position. -}
entryGetIconPixbuf entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_pixbuf entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject GdkPixbuf.Pixbuf.Pixbuf) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconPixbufMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconPixbufMethodInfo a signature where
overloadedMethod _ = entryGetIconPixbuf
#endif
-- method Entry::get_icon_sensitive
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_sensitive" gtk_entry_get_icon_sensitive ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CInt
{- |
Returns whether the icon appears sensitive or insensitive.
/Since: 2.16/
-}
entryGetIconSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m Bool
{- ^ __Returns:__ 'True' if the icon is sensitive. -}
entryGetIconSensitive entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_sensitive entry' iconPos'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconSensitiveMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconSensitiveMethodInfo a signature where
overloadedMethod _ = entryGetIconSensitive
#endif
-- method Entry::get_icon_stock
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_stock" gtk_entry_get_icon_stock ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CString
{-# DEPRECATED entryGetIconStock ["(Since version 3.10)","Use 'GI.Gtk.Objects.Entry.entryGetIconName' instead."] #-}
{- |
Retrieves the stock id used for the icon, or 'Nothing' if there is
no icon or if the icon was set by some other method (e.g., by
pixbuf, icon name or gicon).
/Since: 2.16/
-}
entryGetIconStock ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m T.Text
{- ^ __Returns:__ A stock id, or 'Nothing' if no icon is set or if the icon
wasn’t set from a stock id -}
entryGetIconStock entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_stock entry' iconPos'
checkUnexpectedReturnNULL "entryGetIconStock" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconStockMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconStockMethodInfo a signature where
overloadedMethod _ = entryGetIconStock
#endif
-- method Entry::get_icon_storage_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "ImageType"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_storage_type" gtk_entry_get_icon_storage_type ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CUInt
{- |
Gets the type of representation being used by the icon
to store image data. If the icon has no image data,
the return value will be 'GI.Gtk.Enums.ImageTypeEmpty'.
/Since: 2.16/
-}
entryGetIconStorageType ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> m Gtk.Enums.ImageType
{- ^ __Returns:__ image representation being used -}
entryGetIconStorageType entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_storage_type entry' iconPos'
let result' = (toEnum . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconStorageTypeMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Gtk.Enums.ImageType), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconStorageTypeMethodInfo a signature where
overloadedMethod _ = entryGetIconStorageType
#endif
-- method Entry::get_icon_tooltip_markup
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_tooltip_markup" gtk_entry_get_icon_tooltip_markup ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CString
{- |
Gets the contents of the tooltip on the icon at the specified
position in /@entry@/.
/Since: 2.16/
-}
entryGetIconTooltipMarkup ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: the icon position -}
-> m (Maybe T.Text)
{- ^ __Returns:__ the tooltip text, or 'Nothing'. Free the returned
string with 'GI.GLib.Functions.free' when done. -}
entryGetIconTooltipMarkup entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_tooltip_markup entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
freeMem result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconTooltipMarkupMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconTooltipMarkupMethodInfo a signature where
overloadedMethod _ = entryGetIconTooltipMarkup
#endif
-- method Entry::get_icon_tooltip_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_icon_tooltip_text" gtk_entry_get_icon_tooltip_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
IO CString
{- |
Gets the contents of the tooltip on the icon at the specified
position in /@entry@/.
/Since: 2.16/
-}
entryGetIconTooltipText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: the icon position -}
-> m (Maybe T.Text)
{- ^ __Returns:__ the tooltip text, or 'Nothing'. Free the returned
string with 'GI.GLib.Functions.free' when done. -}
entryGetIconTooltipText entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_tooltip_text entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
freeMem result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconTooltipTextMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconTooltipTextMethodInfo a signature where
overloadedMethod _ = entryGetIconTooltipText
#endif
-- method Entry::get_inner_border
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "Border"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_inner_border" gtk_entry_get_inner_border ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Gtk.Border.Border)
{-# DEPRECATED entryGetInnerBorder ["(Since version 3.4)","Use the standard border and padding CSS properties (through"," objects like 'GI.Gtk.Objects.StyleContext.StyleContext' and 'GI.Gtk.Objects.CssProvider.CssProvider'); the value returned by"," this function is ignored by 'GI.Gtk.Objects.Entry.Entry'."] #-}
{- |
This function returns the entry’s 'GI.Gtk.Objects.Entry.Entry':@/inner-border/@ property. See
'GI.Gtk.Objects.Entry.entrySetInnerBorder' for more information.
/Since: 2.10/
-}
entryGetInnerBorder ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m (Maybe Gtk.Border.Border)
{- ^ __Returns:__ the entry’s 'GI.Gtk.Structs.Border.Border', or
'Nothing' if none was set. -}
entryGetInnerBorder entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_inner_border entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Gtk.Border.Border) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetInnerBorderMethodInfo
instance (signature ~ (m (Maybe Gtk.Border.Border)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInnerBorderMethodInfo a signature where
overloadedMethod _ = entryGetInnerBorder
#endif
-- method Entry::get_input_hints
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "InputHints"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_input_hints" gtk_entry_get_input_hints ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CUInt
{- |
Gets the value of the 'GI.Gtk.Objects.Entry.Entry':@/input-hints/@ property.
/Since: 3.6/
-}
entryGetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m [Gtk.Flags.InputHints]
entryGetInputHints entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_input_hints entry'
let result' = wordToGFlags result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInputHintsMethodInfo
instance (signature ~ (m [Gtk.Flags.InputHints]), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInputHintsMethodInfo a signature where
overloadedMethod _ = entryGetInputHints
#endif
-- method Entry::get_input_purpose
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "InputPurpose"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_input_purpose" gtk_entry_get_input_purpose ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CUInt
{- |
Gets the value of the 'GI.Gtk.Objects.Entry.Entry':@/input-purpose/@ property.
/Since: 3.6/
-}
entryGetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Gtk.Enums.InputPurpose
entryGetInputPurpose entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_input_purpose entry'
let result' = (toEnum . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInputPurposeMethodInfo
instance (signature ~ (m Gtk.Enums.InputPurpose), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInputPurposeMethodInfo a signature where
overloadedMethod _ = entryGetInputPurpose
#endif
-- method Entry::get_invisible_char
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUniChar)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_invisible_char" gtk_entry_get_invisible_char ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CInt
{- |
Retrieves the character displayed in place of the real characters
for entries with visibility set to false. See 'GI.Gtk.Objects.Entry.entrySetInvisibleChar'.
-}
entryGetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Char
{- ^ __Returns:__ the current invisible char, or 0, if the entry does not
show invisible text at all. -}
entryGetInvisibleChar entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_invisible_char entry'
let result' = (chr . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInvisibleCharMethodInfo
instance (signature ~ (m Char), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entryGetInvisibleChar
#endif
-- method Entry::get_layout
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Pango", name = "Layout"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_layout" gtk_entry_get_layout ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Pango.Layout.Layout)
{- |
Gets the 'GI.Pango.Objects.Layout.Layout' used to display the entry.
The layout is useful to e.g. convert text positions to
pixel positions, in combination with 'GI.Gtk.Objects.Entry.entryGetLayoutOffsets'.
The returned layout is owned by the entry and must not be
modified or freed by the caller.
Keep in mind that the layout text may contain a preedit string, so
'GI.Gtk.Objects.Entry.entryLayoutIndexToTextIndex' and
'GI.Gtk.Objects.Entry.entryTextIndexToLayoutIndex' are needed to convert byte
indices in the layout to byte indices in the entry contents.
-}
entryGetLayout ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Pango.Layout.Layout
{- ^ __Returns:__ the 'GI.Pango.Objects.Layout.Layout' for this entry -}
entryGetLayout entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_layout entry'
checkUnexpectedReturnNULL "entryGetLayout" result
result' <- (newObject Pango.Layout.Layout) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetLayoutMethodInfo
instance (signature ~ (m Pango.Layout.Layout), MonadIO m, IsEntry a) => O.MethodInfo EntryGetLayoutMethodInfo a signature where
overloadedMethod _ = entryGetLayout
#endif
-- method Entry::get_layout_offsets
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store X offset of layout, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "y", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "location to store Y offset of layout, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_layout_offsets" gtk_entry_get_layout_offsets ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Int32 -> -- x : TBasicType TInt
Ptr Int32 -> -- y : TBasicType TInt
IO ()
{- |
Obtains the position of the 'GI.Pango.Objects.Layout.Layout' used to render text
in the entry, in widget coordinates. Useful if you want to line
up the text in an entry with some other text, e.g. when using the
entry to implement editable cells in a sheet widget.
Also useful to convert mouse events into coordinates inside the
'GI.Pango.Objects.Layout.Layout', e.g. to take some action if some part of the entry text
is clicked.
Note that as the user scrolls around in the entry the offsets will
change; you’ll need to connect to the “notify::scroll-offset”
signal to track this. Remember when using the 'GI.Pango.Objects.Layout.Layout'
functions you need to convert to and from pixels using
@/PANGO_PIXELS()/@ or 'GI.Pango.Constants.SCALE'.
Keep in mind that the layout text may contain a preedit string, so
'GI.Gtk.Objects.Entry.entryLayoutIndexToTextIndex' and
'GI.Gtk.Objects.Entry.entryTextIndexToLayoutIndex' are needed to convert byte
indices in the layout to byte indices in the entry contents.
-}
entryGetLayoutOffsets ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m ((Int32, Int32))
entryGetLayoutOffsets entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
x <- allocMem :: IO (Ptr Int32)
y <- allocMem :: IO (Ptr Int32)
gtk_entry_get_layout_offsets entry' x y
x' <- peek x
y' <- peek y
touchManagedPtr entry
freeMem x
freeMem y
return (x', y')
#if ENABLE_OVERLOADING
data EntryGetLayoutOffsetsMethodInfo
instance (signature ~ (m ((Int32, Int32))), MonadIO m, IsEntry a) => O.MethodInfo EntryGetLayoutOffsetsMethodInfo a signature where
overloadedMethod _ = entryGetLayoutOffsets
#endif
-- method Entry::get_max_length
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_max_length" gtk_entry_get_max_length ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO Int32
{- |
Retrieves the maximum allowed length of the text in
/@entry@/. See 'GI.Gtk.Objects.Entry.entrySetMaxLength'.
This is equivalent to getting /@entry@/\'s 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' and
calling 'GI.Gtk.Objects.EntryBuffer.entryBufferGetMaxLength' on it.
-}
entryGetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Int32
{- ^ __Returns:__ the maximum allowed number of characters
in 'GI.Gtk.Objects.Entry.Entry', or 0 if there is no maximum. -}
entryGetMaxLength entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_max_length entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetMaxLengthMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetMaxLengthMethodInfo a signature where
overloadedMethod _ = entryGetMaxLength
#endif
-- method Entry::get_max_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_max_width_chars" gtk_entry_get_max_width_chars ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO Int32
{- |
Retrieves the desired maximum width of /@entry@/, in characters.
See 'GI.Gtk.Objects.Entry.entrySetMaxWidthChars'.
/Since: 3.12/
-}
entryGetMaxWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Int32
{- ^ __Returns:__ the maximum width of the entry, in characters -}
entryGetMaxWidthChars entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_max_width_chars entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetMaxWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetMaxWidthCharsMethodInfo a signature where
overloadedMethod _ = entryGetMaxWidthChars
#endif
-- method Entry::get_overwrite_mode
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_overwrite_mode" gtk_entry_get_overwrite_mode ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CInt
{- |
Gets the value set by 'GI.Gtk.Objects.Entry.entrySetOverwriteMode'.
/Since: 2.14/
-}
entryGetOverwriteMode ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Bool
{- ^ __Returns:__ whether the text is overwritten when typing. -}
entryGetOverwriteMode entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_overwrite_mode entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetOverwriteModeMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetOverwriteModeMethodInfo a signature where
overloadedMethod _ = entryGetOverwriteMode
#endif
-- method Entry::get_placeholder_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_placeholder_text" gtk_entry_get_placeholder_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CString
{- |
Retrieves the text that will be displayed when /@entry@/ is empty and unfocused
/Since: 3.2/
-}
entryGetPlaceholderText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m T.Text
{- ^ __Returns:__ a pointer to the placeholder text as a string. This string points to internally allocated
storage in the widget and must not be freed, modified or stored. -}
entryGetPlaceholderText entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_placeholder_text entry'
checkUnexpectedReturnNULL "entryGetPlaceholderText" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetPlaceholderTextMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetPlaceholderTextMethodInfo a signature where
overloadedMethod _ = entryGetPlaceholderText
#endif
-- method Entry::get_progress_fraction
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_progress_fraction" gtk_entry_get_progress_fraction ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CDouble
{- |
Returns the current fraction of the task that’s been completed.
See 'GI.Gtk.Objects.Entry.entrySetProgressFraction'.
/Since: 2.16/
-}
entryGetProgressFraction ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Double
{- ^ __Returns:__ a fraction from 0.0 to 1.0 -}
entryGetProgressFraction entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_progress_fraction entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetProgressFractionMethodInfo
instance (signature ~ (m Double), MonadIO m, IsEntry a) => O.MethodInfo EntryGetProgressFractionMethodInfo a signature where
overloadedMethod _ = entryGetProgressFraction
#endif
-- method Entry::get_progress_pulse_step
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_progress_pulse_step" gtk_entry_get_progress_pulse_step ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CDouble
{- |
Retrieves the pulse step set with 'GI.Gtk.Objects.Entry.entrySetProgressPulseStep'.
/Since: 2.16/
-}
entryGetProgressPulseStep ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Double
{- ^ __Returns:__ a fraction from 0.0 to 1.0 -}
entryGetProgressPulseStep entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_progress_pulse_step entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetProgressPulseStepMethodInfo
instance (signature ~ (m Double), MonadIO m, IsEntry a) => O.MethodInfo EntryGetProgressPulseStepMethodInfo a signature where
overloadedMethod _ = entryGetProgressPulseStep
#endif
-- method Entry::get_tabs
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Pango", name = "TabArray"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_tabs" gtk_entry_get_tabs ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO (Ptr Pango.TabArray.TabArray)
{- |
Gets the tabstops that were set on the entry using 'GI.Gtk.Objects.Entry.entrySetTabs', if
any.
/Since: 3.10/
-}
entryGetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m (Maybe Pango.TabArray.TabArray)
{- ^ __Returns:__ the tabstops, or 'Nothing' if none was set. -}
entryGetTabs entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_tabs entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Pango.TabArray.TabArray) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetTabsMethodInfo
instance (signature ~ (m (Maybe Pango.TabArray.TabArray)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTabsMethodInfo a signature where
overloadedMethod _ = entryGetTabs
#endif
-- method Entry::get_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_text" gtk_entry_get_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CString
{- |
Retrieves the contents of the entry widget.
See also 'GI.Gtk.Interfaces.Editable.editableGetChars'.
This is equivalent to getting /@entry@/\'s 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' and calling
'GI.Gtk.Objects.EntryBuffer.entryBufferGetText' on it.
-}
entryGetText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m T.Text
{- ^ __Returns:__ a pointer to the contents of the widget as a
string. This string points to internally allocated
storage in the widget and must not be freed, modified or
stored. -}
entryGetText entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_text entry'
checkUnexpectedReturnNULL "entryGetText" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetTextMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextMethodInfo a signature where
overloadedMethod _ = entryGetText
#endif
-- method Entry::get_text_area
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text_area", argType = TInterface (Name {namespace = "Gdk", name = "Rectangle"}), direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Return location for the text area.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_text_area" gtk_entry_get_text_area ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gdk.Rectangle.Rectangle -> -- text_area : TInterface (Name {namespace = "Gdk", name = "Rectangle"})
IO ()
{- |
Gets the area where the entry’s text is drawn. This function is
useful when drawing something to the entry in a draw callback.
If the entry is not realized, /@textArea@/ is filled with zeros.
See also 'GI.Gtk.Objects.Entry.entryGetIconArea'.
/Since: 3.0/
-}
entryGetTextArea ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m (Gdk.Rectangle.Rectangle)
entryGetTextArea entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
textArea <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_entry_get_text_area entry' textArea
textArea' <- (wrapBoxed Gdk.Rectangle.Rectangle) textArea
touchManagedPtr entry
return textArea'
#if ENABLE_OVERLOADING
data EntryGetTextAreaMethodInfo
instance (signature ~ (m (Gdk.Rectangle.Rectangle)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextAreaMethodInfo a signature where
overloadedMethod _ = entryGetTextArea
#endif
-- method Entry::get_text_length
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUInt16)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_text_length" gtk_entry_get_text_length ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO Word16
{- |
Retrieves the current length of the text in
/@entry@/.
This is equivalent to getting /@entry@/\'s 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' and
calling 'GI.Gtk.Objects.EntryBuffer.entryBufferGetLength' on it.
/Since: 2.14/
-}
entryGetTextLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Word16
{- ^ __Returns:__ the current number of characters
in 'GI.Gtk.Objects.Entry.Entry', or 0 if there are none. -}
entryGetTextLength entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_text_length entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetTextLengthMethodInfo
instance (signature ~ (m Word16), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextLengthMethodInfo a signature where
overloadedMethod _ = entryGetTextLength
#endif
-- method Entry::get_visibility
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_visibility" gtk_entry_get_visibility ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO CInt
{- |
Retrieves whether the text in /@entry@/ is visible. See
'GI.Gtk.Objects.Entry.entrySetVisibility'.
-}
entryGetVisibility ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Bool
{- ^ __Returns:__ 'True' if the text is currently visible -}
entryGetVisibility entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_visibility entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetVisibilityMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetVisibilityMethodInfo a signature where
overloadedMethod _ = entryGetVisibility
#endif
-- method Entry::get_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_get_width_chars" gtk_entry_get_width_chars ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO Int32
{- |
Gets the value set by 'GI.Gtk.Objects.Entry.entrySetWidthChars'.
-}
entryGetWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m Int32
{- ^ __Returns:__ number of chars to request space for, or negative if unset -}
entryGetWidthChars entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_width_chars entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetWidthCharsMethodInfo a signature where
overloadedMethod _ = entryGetWidthChars
#endif
-- method Entry::grab_focus_without_selecting
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_grab_focus_without_selecting" gtk_entry_grab_focus_without_selecting ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO ()
{- |
Causes /@entry@/ to have keyboard focus.
It behaves like 'GI.Gtk.Objects.Widget.widgetGrabFocus',
except that it doesn\'t select the contents of the entry.
You only want to call this on some special entries
which the user usually doesn\'t want to replace all text in,
such as search-as-you-type entries.
/Since: 3.16/
-}
entryGrabFocusWithoutSelecting ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m ()
entryGrabFocusWithoutSelecting entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_grab_focus_without_selecting entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryGrabFocusWithoutSelectingMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryGrabFocusWithoutSelectingMethodInfo a signature where
overloadedMethod _ = entryGrabFocusWithoutSelecting
#endif
-- method Entry::im_context_filter_keypress
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface (Name {namespace = "Gdk", name = "EventKey"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the key event", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_im_context_filter_keypress" gtk_entry_im_context_filter_keypress ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gdk.EventKey.EventKey -> -- event : TInterface (Name {namespace = "Gdk", name = "EventKey"})
IO CInt
{- |
Allow the 'GI.Gtk.Objects.Entry.Entry' input method to internally handle key press
and release events. If this function returns 'True', then no further
processing should be done for this key event. See
'GI.Gtk.Objects.IMContext.iMContextFilterKeypress'.
Note that you are expected to call this function from your handler
when overriding key event handling. This is needed in the case when
you need to insert your own key handling between the input method
and the default key event handling of the 'GI.Gtk.Objects.Entry.Entry'.
See 'GI.Gtk.Objects.TextView.textViewResetImContext' for an example of use.
/Since: 2.22/
-}
entryImContextFilterKeypress ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gdk.EventKey.EventKey
{- ^ /@event@/: the key event -}
-> m Bool
{- ^ __Returns:__ 'True' if the input method handled the key event. -}
entryImContextFilterKeypress entry event = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
event' <- unsafeManagedPtrGetPtr event
result <- gtk_entry_im_context_filter_keypress entry' event'
let result' = (/= 0) result
touchManagedPtr entry
touchManagedPtr event
return result'
#if ENABLE_OVERLOADING
data EntryImContextFilterKeypressMethodInfo
instance (signature ~ (Gdk.EventKey.EventKey -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryImContextFilterKeypressMethodInfo a signature where
overloadedMethod _ = entryImContextFilterKeypress
#endif
-- method Entry::layout_index_to_text_index
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "layout_index", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "byte index into the entry layout text", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_layout_index_to_text_index" gtk_entry_layout_index_to_text_index ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- layout_index : TBasicType TInt
IO Int32
{- |
Converts from a position in the entry’s 'GI.Pango.Objects.Layout.Layout' (returned by
'GI.Gtk.Objects.Entry.entryGetLayout') to a position in the entry contents
(returned by 'GI.Gtk.Objects.Entry.entryGetText').
-}
entryLayoutIndexToTextIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@layoutIndex@/: byte index into the entry layout text -}
-> m Int32
{- ^ __Returns:__ byte index into the entry contents -}
entryLayoutIndexToTextIndex entry layoutIndex = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_layout_index_to_text_index entry' layoutIndex
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryLayoutIndexToTextIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryLayoutIndexToTextIndexMethodInfo a signature where
overloadedMethod _ = entryLayoutIndexToTextIndex
#endif
-- method Entry::progress_pulse
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_progress_pulse" gtk_entry_progress_pulse ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO ()
{- |
Indicates that some progress is made, but you don’t know how much.
Causes the entry’s progress indicator to enter “activity mode,”
where a block bounces back and forth. Each call to
'GI.Gtk.Objects.Entry.entryProgressPulse' causes the block to move by a little bit
(the amount of movement per pulse is determined by
'GI.Gtk.Objects.Entry.entrySetProgressPulseStep').
/Since: 2.16/
-}
entryProgressPulse ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m ()
entryProgressPulse entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_progress_pulse entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryProgressPulseMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryProgressPulseMethodInfo a signature where
overloadedMethod _ = entryProgressPulse
#endif
-- method Entry::reset_im_context
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_reset_im_context" gtk_entry_reset_im_context ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO ()
{- |
Reset the input method context of the entry if needed.
This can be necessary in the case where modifying the buffer
would confuse on-going input method behavior.
/Since: 2.22/
-}
entryResetImContext ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m ()
entryResetImContext entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_reset_im_context entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryResetImContextMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryResetImContextMethodInfo a signature where
overloadedMethod _ = entryResetImContext
#endif
-- method Entry::set_activates_default
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "setting", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE to activate window\8217s default widget on Enter keypress", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_activates_default" gtk_entry_set_activates_default ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CInt -> -- setting : TBasicType TBoolean
IO ()
{- |
If /@setting@/ is 'True', pressing Enter in the /@entry@/ will activate the default
widget for the window containing the entry. This usually means that
the dialog box containing the entry will be closed, since the default
widget is usually one of the dialog buttons.
(For experts: if /@setting@/ is 'True', the entry calls
'GI.Gtk.Objects.Window.windowActivateDefault' on the window containing the entry, in
the default handler for the 'GI.Gtk.Objects.Entry.Entry'::@/activate/@ signal.)
-}
entrySetActivatesDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Bool
{- ^ /@setting@/: 'True' to activate window’s default widget on Enter keypress -}
-> m ()
entrySetActivatesDefault entry setting = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let setting' = (fromIntegral . fromEnum) setting
gtk_entry_set_activates_default entry' setting'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetActivatesDefaultMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetActivatesDefaultMethodInfo a signature where
overloadedMethod _ = entrySetActivatesDefault
#endif
-- method Entry::set_alignment
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xalign", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "The horizontal alignment, from 0 (left) to 1 (right).\n Reversed for RTL layouts", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_alignment" gtk_entry_set_alignment ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CFloat -> -- xalign : TBasicType TFloat
IO ()
{- |
Sets the alignment for the contents of the entry. This controls
the horizontal positioning of the contents when the displayed
text is shorter than the width of the entry.
/Since: 2.4/
-}
entrySetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Float
{- ^ /@xalign@/: The horizontal alignment, from 0 (left) to 1 (right).
Reversed for RTL layouts -}
-> m ()
entrySetAlignment entry xalign = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let xalign' = realToFrac xalign
gtk_entry_set_alignment entry' xalign'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetAlignmentMethodInfo
instance (signature ~ (Float -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetAlignmentMethodInfo a signature where
overloadedMethod _ = entrySetAlignment
#endif
-- method Entry::set_attributes
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "attrs", argType = TInterface (Name {namespace = "Pango", name = "AttrList"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #PangoAttrList", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_attributes" gtk_entry_set_attributes ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Pango.AttrList.AttrList -> -- attrs : TInterface (Name {namespace = "Pango", name = "AttrList"})
IO ()
{- |
Sets a 'GI.Pango.Structs.AttrList.AttrList'; the attributes in the list are applied to the
entry text.
/Since: 3.6/
-}
entrySetAttributes ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Pango.AttrList.AttrList
{- ^ /@attrs@/: a 'GI.Pango.Structs.AttrList.AttrList' -}
-> m ()
entrySetAttributes entry attrs = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
attrs' <- unsafeManagedPtrGetPtr attrs
gtk_entry_set_attributes entry' attrs'
touchManagedPtr entry
touchManagedPtr attrs
return ()
#if ENABLE_OVERLOADING
data EntrySetAttributesMethodInfo
instance (signature ~ (Pango.AttrList.AttrList -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetAttributesMethodInfo a signature where
overloadedMethod _ = entrySetAttributes
#endif
-- method Entry::set_buffer
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "buffer", argType = TInterface (Name {namespace = "Gtk", name = "EntryBuffer"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntryBuffer", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_buffer" gtk_entry_set_buffer ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gtk.EntryBuffer.EntryBuffer -> -- buffer : TInterface (Name {namespace = "Gtk", name = "EntryBuffer"})
IO ()
{- |
Set the 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' object which holds the text for
this widget.
/Since: 2.18/
-}
entrySetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.EntryBuffer.IsEntryBuffer b) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> b
{- ^ /@buffer@/: a 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' -}
-> m ()
entrySetBuffer entry buffer = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
buffer' <- unsafeManagedPtrCastPtr buffer
gtk_entry_set_buffer entry' buffer'
touchManagedPtr entry
touchManagedPtr buffer
return ()
#if ENABLE_OVERLOADING
data EntrySetBufferMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsEntry a, Gtk.EntryBuffer.IsEntryBuffer b) => O.MethodInfo EntrySetBufferMethodInfo a signature where
overloadedMethod _ = entrySetBuffer
#endif
-- method Entry::set_completion
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "completion", argType = TInterface (Name {namespace = "Gtk", name = "EntryCompletion"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The #GtkEntryCompletion or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_completion" gtk_entry_set_completion ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gtk.EntryCompletion.EntryCompletion -> -- completion : TInterface (Name {namespace = "Gtk", name = "EntryCompletion"})
IO ()
{- |
Sets /@completion@/ to be the auxiliary completion object to use with /@entry@/.
All further configuration of the completion mechanism is done on
/@completion@/ using the 'GI.Gtk.Objects.EntryCompletion.EntryCompletion' API. Completion is disabled if
/@completion@/ is set to 'Nothing'.
/Since: 2.4/
-}
entrySetCompletion ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.EntryCompletion.IsEntryCompletion b) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Maybe (b)
{- ^ /@completion@/: The 'GI.Gtk.Objects.EntryCompletion.EntryCompletion' or 'Nothing' -}
-> m ()
entrySetCompletion entry completion = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeCompletion <- case completion of
Nothing -> return nullPtr
Just jCompletion -> do
jCompletion' <- unsafeManagedPtrCastPtr jCompletion
return jCompletion'
gtk_entry_set_completion entry' maybeCompletion
touchManagedPtr entry
whenJust completion touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetCompletionMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsEntry a, Gtk.EntryCompletion.IsEntryCompletion b) => O.MethodInfo EntrySetCompletionMethodInfo a signature where
overloadedMethod _ = entrySetCompletion
#endif
-- method Entry::set_cursor_hadjustment
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "adjustment", argType = TInterface (Name {namespace = "Gtk", name = "Adjustment"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "an adjustment which should be adjusted when the cursor\n is moved, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_cursor_hadjustment" gtk_entry_set_cursor_hadjustment ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gtk.Adjustment.Adjustment -> -- adjustment : TInterface (Name {namespace = "Gtk", name = "Adjustment"})
IO ()
{- |
Hooks up an adjustment to the cursor position in an entry, so that when
the cursor is moved, the adjustment is scrolled to show that position.
See 'GI.Gtk.Objects.ScrolledWindow.scrolledWindowGetHadjustment' for a typical way of obtaining
the adjustment.
The adjustment has to be in pixel units and in the same coordinate system
as the entry.
/Since: 2.12/
-}
entrySetCursorHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.Adjustment.IsAdjustment b) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Maybe (b)
{- ^ /@adjustment@/: an adjustment which should be adjusted when the cursor
is moved, or 'Nothing' -}
-> m ()
entrySetCursorHadjustment entry adjustment = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeAdjustment <- case adjustment of
Nothing -> return nullPtr
Just jAdjustment -> do
jAdjustment' <- unsafeManagedPtrCastPtr jAdjustment
return jAdjustment'
gtk_entry_set_cursor_hadjustment entry' maybeAdjustment
touchManagedPtr entry
whenJust adjustment touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetCursorHadjustmentMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsEntry a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo EntrySetCursorHadjustmentMethodInfo a signature where
overloadedMethod _ = entrySetCursorHadjustment
#endif
-- method Entry::set_has_frame
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "setting", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "new value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_has_frame" gtk_entry_set_has_frame ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CInt -> -- setting : TBasicType TBoolean
IO ()
{- |
Sets whether the entry has a beveled frame around it.
-}
entrySetHasFrame ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Bool
{- ^ /@setting@/: new value -}
-> m ()
entrySetHasFrame entry setting = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let setting' = (fromIntegral . fromEnum) setting
gtk_entry_set_has_frame entry' setting'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetHasFrameMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetHasFrameMethodInfo a signature where
overloadedMethod _ = entrySetHasFrame
#endif
-- method Entry::set_icon_activatable
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "activatable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE if the icon should be activatable", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_activatable" gtk_entry_set_icon_activatable ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CInt -> -- activatable : TBasicType TBoolean
IO ()
{- |
Sets whether the icon is activatable.
/Since: 2.16/
-}
entrySetIconActivatable ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> Bool
{- ^ /@activatable@/: 'True' if the icon should be activatable -}
-> m ()
entrySetIconActivatable entry iconPos activatable = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
let activatable' = (fromIntegral . fromEnum) activatable
gtk_entry_set_icon_activatable entry' iconPos' activatable'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetIconActivatableMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconActivatableMethodInfo a signature where
overloadedMethod _ = entrySetIconActivatable
#endif
-- method Entry::set_icon_drag_source
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "target_list", argType = TInterface (Name {namespace = "Gtk", name = "TargetList"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the targets (data formats) in which the data can be provided", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "actions", argType = TInterface (Name {namespace = "Gdk", name = "DragAction"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a bitmask of the allowed drag actions", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_drag_source" gtk_entry_set_icon_drag_source ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
Ptr Gtk.TargetList.TargetList -> -- target_list : TInterface (Name {namespace = "Gtk", name = "TargetList"})
CUInt -> -- actions : TInterface (Name {namespace = "Gdk", name = "DragAction"})
IO ()
{- |
Sets up the icon at the given position so that GTK+ will start a drag
operation when the user clicks and drags the icon.
To handle the drag operation, you need to connect to the usual
'GI.Gtk.Objects.Widget.Widget'::@/drag-data-get/@ (or possibly 'GI.Gtk.Objects.Widget.Widget'::@/drag-data-delete/@)
signal, and use 'GI.Gtk.Objects.Entry.entryGetCurrentIconDragSource' in
your signal handler to find out if the drag was started from
an icon.
By default, GTK+ uses the icon as the drag icon. You can use the
'GI.Gtk.Objects.Widget.Widget'::@/drag-begin/@ signal to set a different icon. Note that you
have to use @/g_signal_connect_after()/@ to ensure that your signal handler
gets executed after the default handler.
/Since: 2.16/
-}
entrySetIconDragSource ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: icon position -}
-> Gtk.TargetList.TargetList
{- ^ /@targetList@/: the targets (data formats) in which the data can be provided -}
-> [Gdk.Flags.DragAction]
{- ^ /@actions@/: a bitmask of the allowed drag actions -}
-> m ()
entrySetIconDragSource entry iconPos targetList actions = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
targetList' <- unsafeManagedPtrGetPtr targetList
let actions' = gflagsToWord actions
gtk_entry_set_icon_drag_source entry' iconPos' targetList' actions'
touchManagedPtr entry
touchManagedPtr targetList
return ()
#if ENABLE_OVERLOADING
data EntrySetIconDragSourceMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Gtk.TargetList.TargetList -> [Gdk.Flags.DragAction] -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconDragSourceMethodInfo a signature where
overloadedMethod _ = entrySetIconDragSource
#endif
-- method Entry::set_icon_from_gicon
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "The position at which to set the icon", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TInterface (Name {namespace = "Gio", name = "Icon"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The icon to set, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_from_gicon" gtk_entry_set_icon_from_gicon ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
Ptr Gio.Icon.Icon -> -- icon : TInterface (Name {namespace = "Gio", name = "Icon"})
IO ()
{- |
Sets the icon shown in the entry at the specified position
from the current icon theme.
If the icon isn’t known, a “broken image” icon will be displayed
instead.
If /@icon@/ is 'Nothing', no icon will be shown in the specified position.
/Since: 2.16/
-}
entrySetIconFromGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gio.Icon.IsIcon b) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: The position at which to set the icon -}
-> Maybe (b)
{- ^ /@icon@/: The icon to set, or 'Nothing' -}
-> m ()
entrySetIconFromGicon entry iconPos icon = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeIcon <- case icon of
Nothing -> return nullPtr
Just jIcon -> do
jIcon' <- unsafeManagedPtrCastPtr jIcon
return jIcon'
gtk_entry_set_icon_from_gicon entry' iconPos' maybeIcon
touchManagedPtr entry
whenJust icon touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromGiconMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (b) -> m ()), MonadIO m, IsEntry a, Gio.Icon.IsIcon b) => O.MethodInfo EntrySetIconFromGiconMethodInfo a signature where
overloadedMethod _ = entrySetIconFromGicon
#endif
-- method Entry::set_icon_from_icon_name
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "The position at which to set the icon", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "An icon name, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_from_icon_name" gtk_entry_set_icon_from_icon_name ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CString -> -- icon_name : TBasicType TUTF8
IO ()
{- |
Sets the icon shown in the entry at the specified position
from the current icon theme.
If the icon name isn’t known, a “broken image” icon will be displayed
instead.
If /@iconName@/ is 'Nothing', no icon will be shown in the specified position.
/Since: 2.16/
-}
entrySetIconFromIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: The position at which to set the icon -}
-> Maybe (T.Text)
{- ^ /@iconName@/: An icon name, or 'Nothing' -}
-> m ()
entrySetIconFromIconName entry iconPos iconName = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeIconName <- case iconName of
Nothing -> return nullPtr
Just jIconName -> do
jIconName' <- textToCString jIconName
return jIconName'
gtk_entry_set_icon_from_icon_name entry' iconPos' maybeIconName
touchManagedPtr entry
freeMem maybeIconName
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromIconNameMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconFromIconNameMethodInfo a signature where
overloadedMethod _ = entrySetIconFromIconName
#endif
-- method Entry::set_icon_from_pixbuf
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pixbuf", argType = TInterface (Name {namespace = "GdkPixbuf", name = "Pixbuf"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "A #GdkPixbuf, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_from_pixbuf" gtk_entry_set_icon_from_pixbuf ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
Ptr GdkPixbuf.Pixbuf.Pixbuf -> -- pixbuf : TInterface (Name {namespace = "GdkPixbuf", name = "Pixbuf"})
IO ()
{- |
Sets the icon shown in the specified position using a pixbuf.
If /@pixbuf@/ is 'Nothing', no icon will be shown in the specified position.
/Since: 2.16/
-}
entrySetIconFromPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, GdkPixbuf.Pixbuf.IsPixbuf b) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> Maybe (b)
{- ^ /@pixbuf@/: A 'GI.GdkPixbuf.Objects.Pixbuf.Pixbuf', or 'Nothing' -}
-> m ()
entrySetIconFromPixbuf entry iconPos pixbuf = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybePixbuf <- case pixbuf of
Nothing -> return nullPtr
Just jPixbuf -> do
jPixbuf' <- unsafeManagedPtrCastPtr jPixbuf
return jPixbuf'
gtk_entry_set_icon_from_pixbuf entry' iconPos' maybePixbuf
touchManagedPtr entry
whenJust pixbuf touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromPixbufMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (b) -> m ()), MonadIO m, IsEntry a, GdkPixbuf.Pixbuf.IsPixbuf b) => O.MethodInfo EntrySetIconFromPixbufMethodInfo a signature where
overloadedMethod _ = entrySetIconFromPixbuf
#endif
-- method Entry::set_icon_from_stock
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "stock_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The name of the stock item, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_from_stock" gtk_entry_set_icon_from_stock ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CString -> -- stock_id : TBasicType TUTF8
IO ()
{-# DEPRECATED entrySetIconFromStock ["(Since version 3.10)","Use 'GI.Gtk.Objects.Entry.entrySetIconFromIconName' instead."] #-}
{- |
Sets the icon shown in the entry at the specified position from
a stock image.
If /@stockId@/ is 'Nothing', no icon will be shown in the specified position.
/Since: 2.16/
-}
entrySetIconFromStock ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> Maybe (T.Text)
{- ^ /@stockId@/: The name of the stock item, or 'Nothing' -}
-> m ()
entrySetIconFromStock entry iconPos stockId = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeStockId <- case stockId of
Nothing -> return nullPtr
Just jStockId -> do
jStockId' <- textToCString jStockId
return jStockId'
gtk_entry_set_icon_from_stock entry' iconPos' maybeStockId
touchManagedPtr entry
freeMem maybeStockId
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromStockMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconFromStockMethodInfo a signature where
overloadedMethod _ = entrySetIconFromStock
#endif
-- method Entry::set_icon_sensitive
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "A #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Specifies whether the icon should appear\n sensitive or insensitive", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_sensitive" gtk_entry_set_icon_sensitive ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CInt -> -- sensitive : TBasicType TBoolean
IO ()
{- |
Sets the sensitivity for the specified icon.
/Since: 2.16/
-}
entrySetIconSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: A 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: Icon position -}
-> Bool
{- ^ /@sensitive@/: Specifies whether the icon should appear
sensitive or insensitive -}
-> m ()
entrySetIconSensitive entry iconPos sensitive = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
let sensitive' = (fromIntegral . fromEnum) sensitive
gtk_entry_set_icon_sensitive entry' iconPos' sensitive'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetIconSensitiveMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconSensitiveMethodInfo a signature where
overloadedMethod _ = entrySetIconSensitive
#endif
-- method Entry::set_icon_tooltip_markup
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tooltip", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the contents of the tooltip for the icon, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_tooltip_markup" gtk_entry_set_icon_tooltip_markup ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CString -> -- tooltip : TBasicType TUTF8
IO ()
{- |
Sets /@tooltip@/ as the contents of the tooltip for the icon at
the specified position. /@tooltip@/ is assumed to be marked up with
the [Pango text markup language][PangoMarkupFormat].
Use 'Nothing' for /@tooltip@/ to remove an existing tooltip.
See also 'GI.Gtk.Objects.Widget.widgetSetTooltipMarkup' and
'GI.Gtk.Objects.Entry.entrySetIconTooltipText'.
/Since: 2.16/
-}
entrySetIconTooltipMarkup ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: the icon position -}
-> Maybe (T.Text)
{- ^ /@tooltip@/: the contents of the tooltip for the icon, or 'Nothing' -}
-> m ()
entrySetIconTooltipMarkup entry iconPos tooltip = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeTooltip <- case tooltip of
Nothing -> return nullPtr
Just jTooltip -> do
jTooltip' <- textToCString jTooltip
return jTooltip'
gtk_entry_set_icon_tooltip_markup entry' iconPos' maybeTooltip
touchManagedPtr entry
freeMem maybeTooltip
return ()
#if ENABLE_OVERLOADING
data EntrySetIconTooltipMarkupMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconTooltipMarkupMethodInfo a signature where
overloadedMethod _ = entrySetIconTooltipMarkup
#endif
-- method Entry::set_icon_tooltip_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_pos", argType = TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the icon position", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tooltip", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the contents of the tooltip for the icon, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_icon_tooltip_text" gtk_entry_set_icon_tooltip_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- icon_pos : TInterface (Name {namespace = "Gtk", name = "EntryIconPosition"})
CString -> -- tooltip : TBasicType TUTF8
IO ()
{- |
Sets /@tooltip@/ as the contents of the tooltip for the icon
at the specified position.
Use 'Nothing' for /@tooltip@/ to remove an existing tooltip.
See also 'GI.Gtk.Objects.Widget.widgetSetTooltipText' and
'GI.Gtk.Objects.Entry.entrySetIconTooltipMarkup'.
If you unset the widget tooltip via 'GI.Gtk.Objects.Widget.widgetSetTooltipText' or
'GI.Gtk.Objects.Widget.widgetSetTooltipMarkup', this sets GtkWidget:has-tooltip to 'False',
which suppresses icon tooltips too. You can resolve this by then calling
'GI.Gtk.Objects.Widget.widgetSetHasTooltip' to set GtkWidget:has-tooltip back to 'True', or
setting at least one non-empty tooltip on any icon achieves the same result.
/Since: 2.16/
-}
entrySetIconTooltipText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.EntryIconPosition
{- ^ /@iconPos@/: the icon position -}
-> Maybe (T.Text)
{- ^ /@tooltip@/: the contents of the tooltip for the icon, or 'Nothing' -}
-> m ()
entrySetIconTooltipText entry iconPos tooltip = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeTooltip <- case tooltip of
Nothing -> return nullPtr
Just jTooltip -> do
jTooltip' <- textToCString jTooltip
return jTooltip'
gtk_entry_set_icon_tooltip_text entry' iconPos' maybeTooltip
touchManagedPtr entry
freeMem maybeTooltip
return ()
#if ENABLE_OVERLOADING
data EntrySetIconTooltipTextMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconTooltipTextMethodInfo a signature where
overloadedMethod _ = entrySetIconTooltipText
#endif
-- method Entry::set_inner_border
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "border", argType = TInterface (Name {namespace = "Gtk", name = "Border"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "a #GtkBorder, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_inner_border" gtk_entry_set_inner_border ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Gtk.Border.Border -> -- border : TInterface (Name {namespace = "Gtk", name = "Border"})
IO ()
{-# DEPRECATED entrySetInnerBorder ["(Since version 3.4)","Use the standard border and padding CSS properties (through"," objects like 'GI.Gtk.Objects.StyleContext.StyleContext' and 'GI.Gtk.Objects.CssProvider.CssProvider'); the value set with"," this function is ignored by 'GI.Gtk.Objects.Entry.Entry'."] #-}
{- |
Sets @/entry/@’s inner-border property to /@border@/, or clears it if 'Nothing'
is passed. The inner-border is the area around the entry’s text, but
inside its frame.
If set, this property overrides the inner-border style property.
Overriding the style-provided border is useful when you want to do
in-place editing of some text in a canvas or list widget, where
pixel-exact positioning of the entry is important.
/Since: 2.10/
-}
entrySetInnerBorder ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Maybe (Gtk.Border.Border)
{- ^ /@border@/: a 'GI.Gtk.Structs.Border.Border', or 'Nothing' -}
-> m ()
entrySetInnerBorder entry border = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeBorder <- case border of
Nothing -> return nullPtr
Just jBorder -> do
jBorder' <- unsafeManagedPtrGetPtr jBorder
return jBorder'
gtk_entry_set_inner_border entry' maybeBorder
touchManagedPtr entry
whenJust border touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetInnerBorderMethodInfo
instance (signature ~ (Maybe (Gtk.Border.Border) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInnerBorderMethodInfo a signature where
overloadedMethod _ = entrySetInnerBorder
#endif
-- method Entry::set_input_hints
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "hints", argType = TInterface (Name {namespace = "Gtk", name = "InputHints"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the hints", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_input_hints" gtk_entry_set_input_hints ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- hints : TInterface (Name {namespace = "Gtk", name = "InputHints"})
IO ()
{- |
Sets the 'GI.Gtk.Objects.Entry.Entry':@/input-hints/@ property, which
allows input methods to fine-tune their behaviour.
/Since: 3.6/
-}
entrySetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> [Gtk.Flags.InputHints]
{- ^ /@hints@/: the hints -}
-> m ()
entrySetInputHints entry hints = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let hints' = gflagsToWord hints
gtk_entry_set_input_hints entry' hints'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInputHintsMethodInfo
instance (signature ~ ([Gtk.Flags.InputHints] -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInputHintsMethodInfo a signature where
overloadedMethod _ = entrySetInputHints
#endif
-- method Entry::set_input_purpose
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "purpose", argType = TInterface (Name {namespace = "Gtk", name = "InputPurpose"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the purpose", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_input_purpose" gtk_entry_set_input_purpose ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CUInt -> -- purpose : TInterface (Name {namespace = "Gtk", name = "InputPurpose"})
IO ()
{- |
Sets the 'GI.Gtk.Objects.Entry.Entry':@/input-purpose/@ property which
can be used by on-screen keyboards and other input
methods to adjust their behaviour.
/Since: 3.6/
-}
entrySetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Gtk.Enums.InputPurpose
{- ^ /@purpose@/: the purpose -}
-> m ()
entrySetInputPurpose entry purpose = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let purpose' = (fromIntegral . fromEnum) purpose
gtk_entry_set_input_purpose entry' purpose'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInputPurposeMethodInfo
instance (signature ~ (Gtk.Enums.InputPurpose -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInputPurposeMethodInfo a signature where
overloadedMethod _ = entrySetInputPurpose
#endif
-- method Entry::set_invisible_char
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ch", argType = TBasicType TUniChar, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a Unicode character", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_invisible_char" gtk_entry_set_invisible_char ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CInt -> -- ch : TBasicType TUniChar
IO ()
{- |
Sets the character to use in place of the actual text when
'GI.Gtk.Objects.Entry.entrySetVisibility' has been called to set text visibility
to 'False'. i.e. this is the character used in “password mode” to
show the user how many characters have been typed. By default, GTK+
picks the best invisible char available in the current font. If you
set the invisible char to 0, then the user will get no feedback
at all; there will be no text on the screen as they type.
-}
entrySetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Char
{- ^ /@ch@/: a Unicode character -}
-> m ()
entrySetInvisibleChar entry ch = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let ch' = (fromIntegral . ord) ch
gtk_entry_set_invisible_char entry' ch'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInvisibleCharMethodInfo
instance (signature ~ (Char -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entrySetInvisibleChar
#endif
-- method Entry::set_max_length
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "max", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the maximum length of the entry, or 0 for no maximum.\n (other than the maximum length of entries.) The value passed in will\n be clamped to the range 0-65536.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_max_length" gtk_entry_set_max_length ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- max : TBasicType TInt
IO ()
{- |
Sets the maximum allowed length of the contents of the widget. If
the current contents are longer than the given length, then they
will be truncated to fit.
This is equivalent to getting /@entry@/\'s 'GI.Gtk.Objects.EntryBuffer.EntryBuffer' and
calling 'GI.Gtk.Objects.EntryBuffer.entryBufferSetMaxLength' on it.
]|
-}
entrySetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@max@/: the maximum length of the entry, or 0 for no maximum.
(other than the maximum length of entries.) The value passed in will
be clamped to the range 0-65536. -}
-> m ()
entrySetMaxLength entry max = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_max_length entry' max
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetMaxLengthMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetMaxLengthMethodInfo a signature where
overloadedMethod _ = entrySetMaxLength
#endif
-- method Entry::set_max_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "n_chars", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new desired maximum width, in characters", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_max_width_chars" gtk_entry_set_max_width_chars ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- n_chars : TBasicType TInt
IO ()
{- |
Sets the desired maximum width in characters of /@entry@/.
/Since: 3.12/
-}
entrySetMaxWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@nChars@/: the new desired maximum width, in characters -}
-> m ()
entrySetMaxWidthChars entry nChars = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_max_width_chars entry' nChars
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetMaxWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetMaxWidthCharsMethodInfo a signature where
overloadedMethod _ = entrySetMaxWidthChars
#endif
-- method Entry::set_overwrite_mode
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "overwrite", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "new value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_overwrite_mode" gtk_entry_set_overwrite_mode ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CInt -> -- overwrite : TBasicType TBoolean
IO ()
{- |
Sets whether the text is overwritten when typing in the 'GI.Gtk.Objects.Entry.Entry'.
/Since: 2.14/
-}
entrySetOverwriteMode ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Bool
{- ^ /@overwrite@/: new value -}
-> m ()
entrySetOverwriteMode entry overwrite = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let overwrite' = (fromIntegral . fromEnum) overwrite
gtk_entry_set_overwrite_mode entry' overwrite'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetOverwriteModeMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetOverwriteModeMethodInfo a signature where
overloadedMethod _ = entrySetOverwriteMode
#endif
-- method Entry::set_placeholder_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "a string to be displayed when @entry is empty and unfocused, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_placeholder_text" gtk_entry_set_placeholder_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CString -> -- text : TBasicType TUTF8
IO ()
{- |
Sets text to be displayed in /@entry@/ when it is empty and unfocused.
This can be used to give a visual hint of the expected contents of
the 'GI.Gtk.Objects.Entry.Entry'.
Note that since the placeholder text gets removed when the entry
received focus, using this feature is a bit problematic if the entry
is given the initial focus in a window. Sometimes this can be
worked around by delaying the initial focus setting until the
first key event arrives.
/Since: 3.2/
-}
entrySetPlaceholderText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Maybe (T.Text)
{- ^ /@text@/: a string to be displayed when /@entry@/ is empty and unfocused, or 'Nothing' -}
-> m ()
entrySetPlaceholderText entry text = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeText <- case text of
Nothing -> return nullPtr
Just jText -> do
jText' <- textToCString jText
return jText'
gtk_entry_set_placeholder_text entry' maybeText
touchManagedPtr entry
freeMem maybeText
return ()
#if ENABLE_OVERLOADING
data EntrySetPlaceholderTextMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetPlaceholderTextMethodInfo a signature where
overloadedMethod _ = entrySetPlaceholderText
#endif
-- method Entry::set_progress_fraction
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "fraction", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "fraction of the task that\8217s been completed", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_progress_fraction" gtk_entry_set_progress_fraction ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CDouble -> -- fraction : TBasicType TDouble
IO ()
{- |
Causes the entry’s progress indicator to “fill in” the given
fraction of the bar. The fraction should be between 0.0 and 1.0,
inclusive.
/Since: 2.16/
-}
entrySetProgressFraction ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Double
{- ^ /@fraction@/: fraction of the task that’s been completed -}
-> m ()
entrySetProgressFraction entry fraction = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let fraction' = realToFrac fraction
gtk_entry_set_progress_fraction entry' fraction'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetProgressFractionMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetProgressFractionMethodInfo a signature where
overloadedMethod _ = entrySetProgressFraction
#endif
-- method Entry::set_progress_pulse_step
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "fraction", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "fraction between 0.0 and 1.0", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_progress_pulse_step" gtk_entry_set_progress_pulse_step ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CDouble -> -- fraction : TBasicType TDouble
IO ()
{- |
Sets the fraction of total entry width to move the progress
bouncing block for each call to 'GI.Gtk.Objects.Entry.entryProgressPulse'.
/Since: 2.16/
-}
entrySetProgressPulseStep ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Double
{- ^ /@fraction@/: fraction between 0.0 and 1.0 -}
-> m ()
entrySetProgressPulseStep entry fraction = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let fraction' = realToFrac fraction
gtk_entry_set_progress_pulse_step entry' fraction'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetProgressPulseStepMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetProgressPulseStepMethodInfo a signature where
overloadedMethod _ = entrySetProgressPulseStep
#endif
-- method Entry::set_tabs
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tabs", argType = TInterface (Name {namespace = "Pango", name = "TabArray"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #PangoTabArray", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_tabs" gtk_entry_set_tabs ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Ptr Pango.TabArray.TabArray -> -- tabs : TInterface (Name {namespace = "Pango", name = "TabArray"})
IO ()
{- |
Sets a 'GI.Pango.Structs.TabArray.TabArray'; the tabstops in the array are applied to the entry
text.
/Since: 3.10/
-}
entrySetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Pango.TabArray.TabArray
{- ^ /@tabs@/: a 'GI.Pango.Structs.TabArray.TabArray' -}
-> m ()
entrySetTabs entry tabs = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
tabs' <- unsafeManagedPtrGetPtr tabs
gtk_entry_set_tabs entry' tabs'
touchManagedPtr entry
touchManagedPtr tabs
return ()
#if ENABLE_OVERLOADING
data EntrySetTabsMethodInfo
instance (signature ~ (Pango.TabArray.TabArray -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetTabsMethodInfo a signature where
overloadedMethod _ = entrySetTabs
#endif
-- method Entry::set_text
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new text", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_text" gtk_entry_set_text ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CString -> -- text : TBasicType TUTF8
IO ()
{- |
Sets the text in the widget to the given
value, replacing the current contents.
See 'GI.Gtk.Objects.EntryBuffer.entryBufferSetText'.
-}
entrySetText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> T.Text
{- ^ /@text@/: the new text -}
-> m ()
entrySetText entry text = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
text' <- textToCString text
gtk_entry_set_text entry' text'
touchManagedPtr entry
freeMem text'
return ()
#if ENABLE_OVERLOADING
data EntrySetTextMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetTextMethodInfo a signature where
overloadedMethod _ = entrySetText
#endif
-- method Entry::set_visibility
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "visible", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE if the contents of the entry are displayed\n as plaintext", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_visibility" gtk_entry_set_visibility ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
CInt -> -- visible : TBasicType TBoolean
IO ()
{- |
Sets whether the contents of the entry are visible or not.
When visibility is set to 'False', characters are displayed
as the invisible char, and will also appear that way when
the text in the entry widget is copied elsewhere.
By default, GTK+ picks the best invisible character available
in the current font, but it can be changed with
'GI.Gtk.Objects.Entry.entrySetInvisibleChar'.
Note that you probably want to set 'GI.Gtk.Objects.Entry.Entry':@/input-purpose/@
to 'GI.Gtk.Enums.InputPurposePassword' or 'GI.Gtk.Enums.InputPurposePin' to
inform input methods about the purpose of this entry,
in addition to setting visibility to 'False'.
-}
entrySetVisibility ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Bool
{- ^ /@visible@/: 'True' if the contents of the entry are displayed
as plaintext -}
-> m ()
entrySetVisibility entry visible = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let visible' = (fromIntegral . fromEnum) visible
gtk_entry_set_visibility entry' visible'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetVisibilityMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetVisibilityMethodInfo a signature where
overloadedMethod _ = entrySetVisibility
#endif
-- method Entry::set_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "n_chars", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "width in chars", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_set_width_chars" gtk_entry_set_width_chars ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- n_chars : TBasicType TInt
IO ()
{- |
Changes the size request of the entry to be about the right size
for /@nChars@/ characters. Note that it changes the size
request, the size can still be affected by
how you pack the widget into containers. If /@nChars@/ is -1, the
size reverts to the default entry size.
-}
entrySetWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@nChars@/: width in chars -}
-> m ()
entrySetWidthChars entry nChars = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_width_chars entry' nChars
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetWidthCharsMethodInfo a signature where
overloadedMethod _ = entrySetWidthChars
#endif
-- method Entry::text_index_to_layout_index
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text_index", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "byte index into the entry contents", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_text_index_to_layout_index" gtk_entry_text_index_to_layout_index ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
Int32 -> -- text_index : TBasicType TInt
IO Int32
{- |
Converts from a position in the entry contents (returned
by 'GI.Gtk.Objects.Entry.entryGetText') to a position in the
entry’s 'GI.Pango.Objects.Layout.Layout' (returned by 'GI.Gtk.Objects.Entry.entryGetLayout',
with text retrieved via 'GI.Pango.Objects.Layout.layoutGetText').
-}
entryTextIndexToLayoutIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> Int32
{- ^ /@textIndex@/: byte index into the entry contents -}
-> m Int32
{- ^ __Returns:__ byte index into the entry layout text -}
entryTextIndexToLayoutIndex entry textIndex = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_text_index_to_layout_index entry' textIndex
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryTextIndexToLayoutIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryTextIndexToLayoutIndexMethodInfo a signature where
overloadedMethod _ = entryTextIndexToLayoutIndex
#endif
-- method Entry::unset_invisible_char
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "entry", argType = TInterface (Name {namespace = "Gtk", name = "Entry"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkEntry", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_entry_unset_invisible_char" gtk_entry_unset_invisible_char ::
Ptr Entry -> -- entry : TInterface (Name {namespace = "Gtk", name = "Entry"})
IO ()
{- |
Unsets the invisible char previously set with
'GI.Gtk.Objects.Entry.entrySetInvisibleChar'. So that the
default invisible char is used again.
/Since: 2.16/
-}
entryUnsetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
{- ^ /@entry@/: a 'GI.Gtk.Objects.Entry.Entry' -}
-> m ()
entryUnsetInvisibleChar entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_unset_invisible_char entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryUnsetInvisibleCharMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryUnsetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entryUnsetInvisibleChar
#endif