#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.Settings
(
Settings(..) ,
IsSettings ,
toSettings ,
noSettings ,
settingsGetDefault ,
settingsGetForScreen ,
settingsInstallProperty ,
settingsInstallPropertyParser ,
#if ENABLE_OVERLOADING
SettingsResetPropertyMethodInfo ,
#endif
settingsResetProperty ,
#if ENABLE_OVERLOADING
SettingsSetDoublePropertyMethodInfo ,
#endif
settingsSetDoubleProperty ,
#if ENABLE_OVERLOADING
SettingsSetLongPropertyMethodInfo ,
#endif
settingsSetLongProperty ,
#if ENABLE_OVERLOADING
SettingsSetPropertyValueMethodInfo ,
#endif
settingsSetPropertyValue ,
#if ENABLE_OVERLOADING
SettingsSetStringPropertyMethodInfo ,
#endif
settingsSetStringProperty ,
#if ENABLE_OVERLOADING
SettingsColorHashPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
settingsColorHash ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkAlternativeButtonOrderPropertyInfo,
#endif
constructSettingsGtkAlternativeButtonOrder,
getSettingsGtkAlternativeButtonOrder ,
setSettingsGtkAlternativeButtonOrder ,
#if ENABLE_OVERLOADING
settingsGtkAlternativeButtonOrder ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkAlternativeSortArrowsPropertyInfo,
#endif
constructSettingsGtkAlternativeSortArrows,
getSettingsGtkAlternativeSortArrows ,
setSettingsGtkAlternativeSortArrows ,
#if ENABLE_OVERLOADING
settingsGtkAlternativeSortArrows ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkApplicationPreferDarkThemePropertyInfo,
#endif
constructSettingsGtkApplicationPreferDarkTheme,
getSettingsGtkApplicationPreferDarkTheme,
setSettingsGtkApplicationPreferDarkTheme,
#if ENABLE_OVERLOADING
settingsGtkApplicationPreferDarkTheme ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkAutoMnemonicsPropertyInfo ,
#endif
constructSettingsGtkAutoMnemonics ,
getSettingsGtkAutoMnemonics ,
setSettingsGtkAutoMnemonics ,
#if ENABLE_OVERLOADING
settingsGtkAutoMnemonics ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkButtonImagesPropertyInfo ,
#endif
constructSettingsGtkButtonImages ,
getSettingsGtkButtonImages ,
setSettingsGtkButtonImages ,
#if ENABLE_OVERLOADING
settingsGtkButtonImages ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCanChangeAccelsPropertyInfo ,
#endif
constructSettingsGtkCanChangeAccels ,
getSettingsGtkCanChangeAccels ,
setSettingsGtkCanChangeAccels ,
#if ENABLE_OVERLOADING
settingsGtkCanChangeAccels ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkColorPalettePropertyInfo ,
#endif
clearSettingsGtkColorPalette ,
constructSettingsGtkColorPalette ,
getSettingsGtkColorPalette ,
setSettingsGtkColorPalette ,
#if ENABLE_OVERLOADING
settingsGtkColorPalette ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkColorSchemePropertyInfo ,
#endif
clearSettingsGtkColorScheme ,
constructSettingsGtkColorScheme ,
getSettingsGtkColorScheme ,
setSettingsGtkColorScheme ,
#if ENABLE_OVERLOADING
settingsGtkColorScheme ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCursorBlinkPropertyInfo ,
#endif
constructSettingsGtkCursorBlink ,
getSettingsGtkCursorBlink ,
setSettingsGtkCursorBlink ,
#if ENABLE_OVERLOADING
settingsGtkCursorBlink ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCursorBlinkTimePropertyInfo ,
#endif
constructSettingsGtkCursorBlinkTime ,
getSettingsGtkCursorBlinkTime ,
setSettingsGtkCursorBlinkTime ,
#if ENABLE_OVERLOADING
settingsGtkCursorBlinkTime ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCursorBlinkTimeoutPropertyInfo,
#endif
constructSettingsGtkCursorBlinkTimeout ,
getSettingsGtkCursorBlinkTimeout ,
setSettingsGtkCursorBlinkTimeout ,
#if ENABLE_OVERLOADING
settingsGtkCursorBlinkTimeout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCursorThemeNamePropertyInfo ,
#endif
clearSettingsGtkCursorThemeName ,
constructSettingsGtkCursorThemeName ,
getSettingsGtkCursorThemeName ,
setSettingsGtkCursorThemeName ,
#if ENABLE_OVERLOADING
settingsGtkCursorThemeName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkCursorThemeSizePropertyInfo ,
#endif
constructSettingsGtkCursorThemeSize ,
getSettingsGtkCursorThemeSize ,
setSettingsGtkCursorThemeSize ,
#if ENABLE_OVERLOADING
settingsGtkCursorThemeSize ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkDecorationLayoutPropertyInfo ,
#endif
clearSettingsGtkDecorationLayout ,
constructSettingsGtkDecorationLayout ,
getSettingsGtkDecorationLayout ,
setSettingsGtkDecorationLayout ,
#if ENABLE_OVERLOADING
settingsGtkDecorationLayout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkDialogsUseHeaderPropertyInfo ,
#endif
constructSettingsGtkDialogsUseHeader ,
getSettingsGtkDialogsUseHeader ,
setSettingsGtkDialogsUseHeader ,
#if ENABLE_OVERLOADING
settingsGtkDialogsUseHeader ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkDndDragThresholdPropertyInfo ,
#endif
constructSettingsGtkDndDragThreshold ,
getSettingsGtkDndDragThreshold ,
setSettingsGtkDndDragThreshold ,
#if ENABLE_OVERLOADING
settingsGtkDndDragThreshold ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkDoubleClickDistancePropertyInfo,
#endif
constructSettingsGtkDoubleClickDistance ,
getSettingsGtkDoubleClickDistance ,
setSettingsGtkDoubleClickDistance ,
#if ENABLE_OVERLOADING
settingsGtkDoubleClickDistance ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkDoubleClickTimePropertyInfo ,
#endif
constructSettingsGtkDoubleClickTime ,
getSettingsGtkDoubleClickTime ,
setSettingsGtkDoubleClickTime ,
#if ENABLE_OVERLOADING
settingsGtkDoubleClickTime ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableAccelsPropertyInfo ,
#endif
constructSettingsGtkEnableAccels ,
getSettingsGtkEnableAccels ,
setSettingsGtkEnableAccels ,
#if ENABLE_OVERLOADING
settingsGtkEnableAccels ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableAnimationsPropertyInfo ,
#endif
constructSettingsGtkEnableAnimations ,
getSettingsGtkEnableAnimations ,
setSettingsGtkEnableAnimations ,
#if ENABLE_OVERLOADING
settingsGtkEnableAnimations ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableEventSoundsPropertyInfo,
#endif
constructSettingsGtkEnableEventSounds ,
getSettingsGtkEnableEventSounds ,
setSettingsGtkEnableEventSounds ,
#if ENABLE_OVERLOADING
settingsGtkEnableEventSounds ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableInputFeedbackSoundsPropertyInfo,
#endif
constructSettingsGtkEnableInputFeedbackSounds,
getSettingsGtkEnableInputFeedbackSounds ,
setSettingsGtkEnableInputFeedbackSounds ,
#if ENABLE_OVERLOADING
settingsGtkEnableInputFeedbackSounds ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableMnemonicsPropertyInfo ,
#endif
constructSettingsGtkEnableMnemonics ,
getSettingsGtkEnableMnemonics ,
setSettingsGtkEnableMnemonics ,
#if ENABLE_OVERLOADING
settingsGtkEnableMnemonics ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnablePrimaryPastePropertyInfo,
#endif
constructSettingsGtkEnablePrimaryPaste ,
getSettingsGtkEnablePrimaryPaste ,
setSettingsGtkEnablePrimaryPaste ,
#if ENABLE_OVERLOADING
settingsGtkEnablePrimaryPaste ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEnableTooltipsPropertyInfo ,
#endif
constructSettingsGtkEnableTooltips ,
getSettingsGtkEnableTooltips ,
setSettingsGtkEnableTooltips ,
#if ENABLE_OVERLOADING
settingsGtkEnableTooltips ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEntryPasswordHintTimeoutPropertyInfo,
#endif
constructSettingsGtkEntryPasswordHintTimeout,
getSettingsGtkEntryPasswordHintTimeout ,
setSettingsGtkEntryPasswordHintTimeout ,
#if ENABLE_OVERLOADING
settingsGtkEntryPasswordHintTimeout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkEntrySelectOnFocusPropertyInfo,
#endif
constructSettingsGtkEntrySelectOnFocus ,
getSettingsGtkEntrySelectOnFocus ,
setSettingsGtkEntrySelectOnFocus ,
#if ENABLE_OVERLOADING
settingsGtkEntrySelectOnFocus ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkErrorBellPropertyInfo ,
#endif
constructSettingsGtkErrorBell ,
getSettingsGtkErrorBell ,
setSettingsGtkErrorBell ,
#if ENABLE_OVERLOADING
settingsGtkErrorBell ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkFallbackIconThemePropertyInfo,
#endif
clearSettingsGtkFallbackIconTheme ,
constructSettingsGtkFallbackIconTheme ,
getSettingsGtkFallbackIconTheme ,
setSettingsGtkFallbackIconTheme ,
#if ENABLE_OVERLOADING
settingsGtkFallbackIconTheme ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkFileChooserBackendPropertyInfo,
#endif
clearSettingsGtkFileChooserBackend ,
constructSettingsGtkFileChooserBackend ,
getSettingsGtkFileChooserBackend ,
setSettingsGtkFileChooserBackend ,
#if ENABLE_OVERLOADING
settingsGtkFileChooserBackend ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkFontNamePropertyInfo ,
#endif
clearSettingsGtkFontName ,
constructSettingsGtkFontName ,
getSettingsGtkFontName ,
setSettingsGtkFontName ,
#if ENABLE_OVERLOADING
settingsGtkFontName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkFontconfigTimestampPropertyInfo,
#endif
constructSettingsGtkFontconfigTimestamp ,
getSettingsGtkFontconfigTimestamp ,
setSettingsGtkFontconfigTimestamp ,
#if ENABLE_OVERLOADING
settingsGtkFontconfigTimestamp ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkIconSizesPropertyInfo ,
#endif
clearSettingsGtkIconSizes ,
constructSettingsGtkIconSizes ,
getSettingsGtkIconSizes ,
setSettingsGtkIconSizes ,
#if ENABLE_OVERLOADING
settingsGtkIconSizes ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkIconThemeNamePropertyInfo ,
#endif
clearSettingsGtkIconThemeName ,
constructSettingsGtkIconThemeName ,
getSettingsGtkIconThemeName ,
setSettingsGtkIconThemeName ,
#if ENABLE_OVERLOADING
settingsGtkIconThemeName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkImModulePropertyInfo ,
#endif
clearSettingsGtkImModule ,
constructSettingsGtkImModule ,
getSettingsGtkImModule ,
setSettingsGtkImModule ,
#if ENABLE_OVERLOADING
settingsGtkImModule ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkImPreeditStylePropertyInfo ,
#endif
constructSettingsGtkImPreeditStyle ,
getSettingsGtkImPreeditStyle ,
setSettingsGtkImPreeditStyle ,
#if ENABLE_OVERLOADING
settingsGtkImPreeditStyle ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkImStatusStylePropertyInfo ,
#endif
constructSettingsGtkImStatusStyle ,
getSettingsGtkImStatusStyle ,
setSettingsGtkImStatusStyle ,
#if ENABLE_OVERLOADING
settingsGtkImStatusStyle ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkKeyThemeNamePropertyInfo ,
#endif
clearSettingsGtkKeyThemeName ,
constructSettingsGtkKeyThemeName ,
getSettingsGtkKeyThemeName ,
setSettingsGtkKeyThemeName ,
#if ENABLE_OVERLOADING
settingsGtkKeyThemeName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkKeynavCursorOnlyPropertyInfo ,
#endif
constructSettingsGtkKeynavCursorOnly ,
getSettingsGtkKeynavCursorOnly ,
setSettingsGtkKeynavCursorOnly ,
#if ENABLE_OVERLOADING
settingsGtkKeynavCursorOnly ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkKeynavUseCaretPropertyInfo ,
#endif
constructSettingsGtkKeynavUseCaret ,
getSettingsGtkKeynavUseCaret ,
setSettingsGtkKeynavUseCaret ,
#if ENABLE_OVERLOADING
settingsGtkKeynavUseCaret ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkKeynavWrapAroundPropertyInfo ,
#endif
constructSettingsGtkKeynavWrapAround ,
getSettingsGtkKeynavWrapAround ,
setSettingsGtkKeynavWrapAround ,
#if ENABLE_OVERLOADING
settingsGtkKeynavWrapAround ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkLabelSelectOnFocusPropertyInfo,
#endif
constructSettingsGtkLabelSelectOnFocus ,
getSettingsGtkLabelSelectOnFocus ,
setSettingsGtkLabelSelectOnFocus ,
#if ENABLE_OVERLOADING
settingsGtkLabelSelectOnFocus ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkLongPressTimePropertyInfo ,
#endif
constructSettingsGtkLongPressTime ,
getSettingsGtkLongPressTime ,
setSettingsGtkLongPressTime ,
#if ENABLE_OVERLOADING
settingsGtkLongPressTime ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkMenuBarAccelPropertyInfo ,
#endif
clearSettingsGtkMenuBarAccel ,
constructSettingsGtkMenuBarAccel ,
getSettingsGtkMenuBarAccel ,
setSettingsGtkMenuBarAccel ,
#if ENABLE_OVERLOADING
settingsGtkMenuBarAccel ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkMenuBarPopupDelayPropertyInfo,
#endif
constructSettingsGtkMenuBarPopupDelay ,
getSettingsGtkMenuBarPopupDelay ,
setSettingsGtkMenuBarPopupDelay ,
#if ENABLE_OVERLOADING
settingsGtkMenuBarPopupDelay ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkMenuImagesPropertyInfo ,
#endif
constructSettingsGtkMenuImages ,
getSettingsGtkMenuImages ,
setSettingsGtkMenuImages ,
#if ENABLE_OVERLOADING
settingsGtkMenuImages ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkMenuPopdownDelayPropertyInfo ,
#endif
constructSettingsGtkMenuPopdownDelay ,
getSettingsGtkMenuPopdownDelay ,
setSettingsGtkMenuPopdownDelay ,
#if ENABLE_OVERLOADING
settingsGtkMenuPopdownDelay ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkMenuPopupDelayPropertyInfo ,
#endif
constructSettingsGtkMenuPopupDelay ,
getSettingsGtkMenuPopupDelay ,
setSettingsGtkMenuPopupDelay ,
#if ENABLE_OVERLOADING
settingsGtkMenuPopupDelay ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkModulesPropertyInfo ,
#endif
clearSettingsGtkModules ,
constructSettingsGtkModules ,
getSettingsGtkModules ,
setSettingsGtkModules ,
#if ENABLE_OVERLOADING
settingsGtkModules ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkPrimaryButtonWarpsSliderPropertyInfo,
#endif
constructSettingsGtkPrimaryButtonWarpsSlider,
getSettingsGtkPrimaryButtonWarpsSlider ,
setSettingsGtkPrimaryButtonWarpsSlider ,
#if ENABLE_OVERLOADING
settingsGtkPrimaryButtonWarpsSlider ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkPrintBackendsPropertyInfo ,
#endif
clearSettingsGtkPrintBackends ,
constructSettingsGtkPrintBackends ,
getSettingsGtkPrintBackends ,
setSettingsGtkPrintBackends ,
#if ENABLE_OVERLOADING
settingsGtkPrintBackends ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkPrintPreviewCommandPropertyInfo,
#endif
clearSettingsGtkPrintPreviewCommand ,
constructSettingsGtkPrintPreviewCommand ,
getSettingsGtkPrintPreviewCommand ,
setSettingsGtkPrintPreviewCommand ,
#if ENABLE_OVERLOADING
settingsGtkPrintPreviewCommand ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkRecentFilesEnabledPropertyInfo,
#endif
constructSettingsGtkRecentFilesEnabled ,
getSettingsGtkRecentFilesEnabled ,
setSettingsGtkRecentFilesEnabled ,
#if ENABLE_OVERLOADING
settingsGtkRecentFilesEnabled ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkRecentFilesLimitPropertyInfo ,
#endif
constructSettingsGtkRecentFilesLimit ,
getSettingsGtkRecentFilesLimit ,
setSettingsGtkRecentFilesLimit ,
#if ENABLE_OVERLOADING
settingsGtkRecentFilesLimit ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkRecentFilesMaxAgePropertyInfo,
#endif
constructSettingsGtkRecentFilesMaxAge ,
getSettingsGtkRecentFilesMaxAge ,
setSettingsGtkRecentFilesMaxAge ,
#if ENABLE_OVERLOADING
settingsGtkRecentFilesMaxAge ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkScrolledWindowPlacementPropertyInfo,
#endif
constructSettingsGtkScrolledWindowPlacement,
getSettingsGtkScrolledWindowPlacement ,
setSettingsGtkScrolledWindowPlacement ,
#if ENABLE_OVERLOADING
settingsGtkScrolledWindowPlacement ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkShellShowsAppMenuPropertyInfo,
#endif
constructSettingsGtkShellShowsAppMenu ,
getSettingsGtkShellShowsAppMenu ,
setSettingsGtkShellShowsAppMenu ,
#if ENABLE_OVERLOADING
settingsGtkShellShowsAppMenu ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkShellShowsDesktopPropertyInfo,
#endif
constructSettingsGtkShellShowsDesktop ,
getSettingsGtkShellShowsDesktop ,
setSettingsGtkShellShowsDesktop ,
#if ENABLE_OVERLOADING
settingsGtkShellShowsDesktop ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkShellShowsMenubarPropertyInfo,
#endif
constructSettingsGtkShellShowsMenubar ,
getSettingsGtkShellShowsMenubar ,
setSettingsGtkShellShowsMenubar ,
#if ENABLE_OVERLOADING
settingsGtkShellShowsMenubar ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkShowInputMethodMenuPropertyInfo,
#endif
constructSettingsGtkShowInputMethodMenu ,
getSettingsGtkShowInputMethodMenu ,
setSettingsGtkShowInputMethodMenu ,
#if ENABLE_OVERLOADING
settingsGtkShowInputMethodMenu ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkShowUnicodeMenuPropertyInfo ,
#endif
constructSettingsGtkShowUnicodeMenu ,
getSettingsGtkShowUnicodeMenu ,
setSettingsGtkShowUnicodeMenu ,
#if ENABLE_OVERLOADING
settingsGtkShowUnicodeMenu ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkSoundThemeNamePropertyInfo ,
#endif
clearSettingsGtkSoundThemeName ,
constructSettingsGtkSoundThemeName ,
getSettingsGtkSoundThemeName ,
setSettingsGtkSoundThemeName ,
#if ENABLE_OVERLOADING
settingsGtkSoundThemeName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkSplitCursorPropertyInfo ,
#endif
constructSettingsGtkSplitCursor ,
getSettingsGtkSplitCursor ,
setSettingsGtkSplitCursor ,
#if ENABLE_OVERLOADING
settingsGtkSplitCursor ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkThemeNamePropertyInfo ,
#endif
clearSettingsGtkThemeName ,
constructSettingsGtkThemeName ,
getSettingsGtkThemeName ,
setSettingsGtkThemeName ,
#if ENABLE_OVERLOADING
settingsGtkThemeName ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTimeoutExpandPropertyInfo ,
#endif
constructSettingsGtkTimeoutExpand ,
getSettingsGtkTimeoutExpand ,
setSettingsGtkTimeoutExpand ,
#if ENABLE_OVERLOADING
settingsGtkTimeoutExpand ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTimeoutInitialPropertyInfo ,
#endif
constructSettingsGtkTimeoutInitial ,
getSettingsGtkTimeoutInitial ,
setSettingsGtkTimeoutInitial ,
#if ENABLE_OVERLOADING
settingsGtkTimeoutInitial ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTimeoutRepeatPropertyInfo ,
#endif
constructSettingsGtkTimeoutRepeat ,
getSettingsGtkTimeoutRepeat ,
setSettingsGtkTimeoutRepeat ,
#if ENABLE_OVERLOADING
settingsGtkTimeoutRepeat ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTitlebarDoubleClickPropertyInfo,
#endif
clearSettingsGtkTitlebarDoubleClick ,
constructSettingsGtkTitlebarDoubleClick ,
getSettingsGtkTitlebarDoubleClick ,
setSettingsGtkTitlebarDoubleClick ,
#if ENABLE_OVERLOADING
settingsGtkTitlebarDoubleClick ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTitlebarMiddleClickPropertyInfo,
#endif
clearSettingsGtkTitlebarMiddleClick ,
constructSettingsGtkTitlebarMiddleClick ,
getSettingsGtkTitlebarMiddleClick ,
setSettingsGtkTitlebarMiddleClick ,
#if ENABLE_OVERLOADING
settingsGtkTitlebarMiddleClick ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTitlebarRightClickPropertyInfo,
#endif
clearSettingsGtkTitlebarRightClick ,
constructSettingsGtkTitlebarRightClick ,
getSettingsGtkTitlebarRightClick ,
setSettingsGtkTitlebarRightClick ,
#if ENABLE_OVERLOADING
settingsGtkTitlebarRightClick ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkToolbarIconSizePropertyInfo ,
#endif
constructSettingsGtkToolbarIconSize ,
getSettingsGtkToolbarIconSize ,
setSettingsGtkToolbarIconSize ,
#if ENABLE_OVERLOADING
settingsGtkToolbarIconSize ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkToolbarStylePropertyInfo ,
#endif
constructSettingsGtkToolbarStyle ,
getSettingsGtkToolbarStyle ,
setSettingsGtkToolbarStyle ,
#if ENABLE_OVERLOADING
settingsGtkToolbarStyle ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTooltipBrowseModeTimeoutPropertyInfo,
#endif
constructSettingsGtkTooltipBrowseModeTimeout,
getSettingsGtkTooltipBrowseModeTimeout ,
setSettingsGtkTooltipBrowseModeTimeout ,
#if ENABLE_OVERLOADING
settingsGtkTooltipBrowseModeTimeout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTooltipBrowseTimeoutPropertyInfo,
#endif
constructSettingsGtkTooltipBrowseTimeout,
getSettingsGtkTooltipBrowseTimeout ,
setSettingsGtkTooltipBrowseTimeout ,
#if ENABLE_OVERLOADING
settingsGtkTooltipBrowseTimeout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTooltipTimeoutPropertyInfo ,
#endif
constructSettingsGtkTooltipTimeout ,
getSettingsGtkTooltipTimeout ,
setSettingsGtkTooltipTimeout ,
#if ENABLE_OVERLOADING
settingsGtkTooltipTimeout ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkTouchscreenModePropertyInfo ,
#endif
constructSettingsGtkTouchscreenMode ,
getSettingsGtkTouchscreenMode ,
setSettingsGtkTouchscreenMode ,
#if ENABLE_OVERLOADING
settingsGtkTouchscreenMode ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkVisibleFocusPropertyInfo ,
#endif
constructSettingsGtkVisibleFocus ,
getSettingsGtkVisibleFocus ,
setSettingsGtkVisibleFocus ,
#if ENABLE_OVERLOADING
settingsGtkVisibleFocus ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkXftAntialiasPropertyInfo ,
#endif
constructSettingsGtkXftAntialias ,
getSettingsGtkXftAntialias ,
setSettingsGtkXftAntialias ,
#if ENABLE_OVERLOADING
settingsGtkXftAntialias ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkXftDpiPropertyInfo ,
#endif
constructSettingsGtkXftDpi ,
getSettingsGtkXftDpi ,
setSettingsGtkXftDpi ,
#if ENABLE_OVERLOADING
settingsGtkXftDpi ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkXftHintingPropertyInfo ,
#endif
constructSettingsGtkXftHinting ,
getSettingsGtkXftHinting ,
setSettingsGtkXftHinting ,
#if ENABLE_OVERLOADING
settingsGtkXftHinting ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkXftHintstylePropertyInfo ,
#endif
clearSettingsGtkXftHintstyle ,
constructSettingsGtkXftHintstyle ,
getSettingsGtkXftHintstyle ,
setSettingsGtkXftHintstyle ,
#if ENABLE_OVERLOADING
settingsGtkXftHintstyle ,
#endif
#if ENABLE_OVERLOADING
SettingsGtkXftRgbaPropertyInfo ,
#endif
clearSettingsGtkXftRgba ,
constructSettingsGtkXftRgba ,
getSettingsGtkXftRgba ,
setSettingsGtkXftRgba ,
#if ENABLE_OVERLOADING
settingsGtkXftRgba ,
#endif
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
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.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Objects.Screen as Gdk.Screen
import qualified GI.Gtk.Callbacks as Gtk.Callbacks
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.StyleProvider as Gtk.StyleProvider
import {-# SOURCE #-} qualified GI.Gtk.Structs.SettingsValue as Gtk.SettingsValue
newtype Settings = Settings (ManagedPtr Settings)
foreign import ccall "gtk_settings_get_type"
c_gtk_settings_get_type :: IO GType
instance GObject Settings where
gobjectType _ = c_gtk_settings_get_type
class GObject o => IsSettings o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError Settings a) =>
IsSettings a
#endif
instance IsSettings Settings
instance GObject.Object.IsObject Settings
instance Gtk.StyleProvider.IsStyleProvider Settings
toSettings :: (MonadIO m, IsSettings o) => o -> m Settings
toSettings = liftIO . unsafeCastTo Settings
noSettings :: Maybe Settings
noSettings = Nothing
#if ENABLE_OVERLOADING
type family ResolveSettingsMethod (t :: Symbol) (o :: *) :: * where
ResolveSettingsMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveSettingsMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveSettingsMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveSettingsMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveSettingsMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveSettingsMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveSettingsMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveSettingsMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveSettingsMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveSettingsMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveSettingsMethod "resetProperty" o = SettingsResetPropertyMethodInfo
ResolveSettingsMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveSettingsMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveSettingsMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveSettingsMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveSettingsMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveSettingsMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveSettingsMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveSettingsMethod "getIconFactory" o = Gtk.StyleProvider.StyleProviderGetIconFactoryMethodInfo
ResolveSettingsMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveSettingsMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveSettingsMethod "getStyle" o = Gtk.StyleProvider.StyleProviderGetStyleMethodInfo
ResolveSettingsMethod "getStyleProperty" o = Gtk.StyleProvider.StyleProviderGetStylePropertyMethodInfo
ResolveSettingsMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveSettingsMethod "setDoubleProperty" o = SettingsSetDoublePropertyMethodInfo
ResolveSettingsMethod "setLongProperty" o = SettingsSetLongPropertyMethodInfo
ResolveSettingsMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveSettingsMethod "setPropertyValue" o = SettingsSetPropertyValueMethodInfo
ResolveSettingsMethod "setStringProperty" o = SettingsSetStringPropertyMethodInfo
ResolveSettingsMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveSettingsMethod t Settings, O.MethodInfo info Settings p) => O.IsLabelProxy t (Settings -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveSettingsMethod t Settings, O.MethodInfo info Settings p) => O.IsLabel t (Settings -> 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
#endif
#if ENABLE_OVERLOADING
data SettingsColorHashPropertyInfo
instance AttrInfo SettingsColorHashPropertyInfo where
type AttrAllowedOps SettingsColorHashPropertyInfo = '[]
type AttrSetTypeConstraint SettingsColorHashPropertyInfo = (~) ()
type AttrBaseTypeConstraint SettingsColorHashPropertyInfo = (~) ()
type AttrGetType SettingsColorHashPropertyInfo = ()
type AttrLabel SettingsColorHashPropertyInfo = ""
type AttrOrigin SettingsColorHashPropertyInfo = Settings
attrGet = undefined
attrSet = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getSettingsGtkAlternativeButtonOrder :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAlternativeButtonOrder obj = liftIO $ getObjectPropertyBool obj "gtk-alternative-button-order"
setSettingsGtkAlternativeButtonOrder :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAlternativeButtonOrder obj val = liftIO $ setObjectPropertyBool obj "gtk-alternative-button-order" val
constructSettingsGtkAlternativeButtonOrder :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeButtonOrder val = constructObjectPropertyBool "gtk-alternative-button-order" val
#if ENABLE_OVERLOADING
data SettingsGtkAlternativeButtonOrderPropertyInfo
instance AttrInfo SettingsGtkAlternativeButtonOrderPropertyInfo where
type AttrAllowedOps SettingsGtkAlternativeButtonOrderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkAlternativeButtonOrderPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkAlternativeButtonOrderPropertyInfo = IsSettings
type AttrGetType SettingsGtkAlternativeButtonOrderPropertyInfo = Bool
type AttrLabel SettingsGtkAlternativeButtonOrderPropertyInfo = "gtk-alternative-button-order"
type AttrOrigin SettingsGtkAlternativeButtonOrderPropertyInfo = Settings
attrGet _ = getSettingsGtkAlternativeButtonOrder
attrSet _ = setSettingsGtkAlternativeButtonOrder
attrConstruct _ = constructSettingsGtkAlternativeButtonOrder
attrClear _ = undefined
#endif
getSettingsGtkAlternativeSortArrows :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAlternativeSortArrows obj = liftIO $ getObjectPropertyBool obj "gtk-alternative-sort-arrows"
setSettingsGtkAlternativeSortArrows :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAlternativeSortArrows obj val = liftIO $ setObjectPropertyBool obj "gtk-alternative-sort-arrows" val
constructSettingsGtkAlternativeSortArrows :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeSortArrows val = constructObjectPropertyBool "gtk-alternative-sort-arrows" val
#if ENABLE_OVERLOADING
data SettingsGtkAlternativeSortArrowsPropertyInfo
instance AttrInfo SettingsGtkAlternativeSortArrowsPropertyInfo where
type AttrAllowedOps SettingsGtkAlternativeSortArrowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkAlternativeSortArrowsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkAlternativeSortArrowsPropertyInfo = IsSettings
type AttrGetType SettingsGtkAlternativeSortArrowsPropertyInfo = Bool
type AttrLabel SettingsGtkAlternativeSortArrowsPropertyInfo = "gtk-alternative-sort-arrows"
type AttrOrigin SettingsGtkAlternativeSortArrowsPropertyInfo = Settings
attrGet _ = getSettingsGtkAlternativeSortArrows
attrSet _ = setSettingsGtkAlternativeSortArrows
attrConstruct _ = constructSettingsGtkAlternativeSortArrows
attrClear _ = undefined
#endif
getSettingsGtkApplicationPreferDarkTheme :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkApplicationPreferDarkTheme obj = liftIO $ getObjectPropertyBool obj "gtk-application-prefer-dark-theme"
setSettingsGtkApplicationPreferDarkTheme :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkApplicationPreferDarkTheme obj val = liftIO $ setObjectPropertyBool obj "gtk-application-prefer-dark-theme" val
constructSettingsGtkApplicationPreferDarkTheme :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkApplicationPreferDarkTheme val = constructObjectPropertyBool "gtk-application-prefer-dark-theme" val
#if ENABLE_OVERLOADING
data SettingsGtkApplicationPreferDarkThemePropertyInfo
instance AttrInfo SettingsGtkApplicationPreferDarkThemePropertyInfo where
type AttrAllowedOps SettingsGtkApplicationPreferDarkThemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkApplicationPreferDarkThemePropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkApplicationPreferDarkThemePropertyInfo = IsSettings
type AttrGetType SettingsGtkApplicationPreferDarkThemePropertyInfo = Bool
type AttrLabel SettingsGtkApplicationPreferDarkThemePropertyInfo = "gtk-application-prefer-dark-theme"
type AttrOrigin SettingsGtkApplicationPreferDarkThemePropertyInfo = Settings
attrGet _ = getSettingsGtkApplicationPreferDarkTheme
attrSet _ = setSettingsGtkApplicationPreferDarkTheme
attrConstruct _ = constructSettingsGtkApplicationPreferDarkTheme
attrClear _ = undefined
#endif
getSettingsGtkAutoMnemonics :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAutoMnemonics obj = liftIO $ getObjectPropertyBool obj "gtk-auto-mnemonics"
setSettingsGtkAutoMnemonics :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAutoMnemonics obj val = liftIO $ setObjectPropertyBool obj "gtk-auto-mnemonics" val
constructSettingsGtkAutoMnemonics :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAutoMnemonics val = constructObjectPropertyBool "gtk-auto-mnemonics" val
#if ENABLE_OVERLOADING
data SettingsGtkAutoMnemonicsPropertyInfo
instance AttrInfo SettingsGtkAutoMnemonicsPropertyInfo where
type AttrAllowedOps SettingsGtkAutoMnemonicsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkAutoMnemonicsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkAutoMnemonicsPropertyInfo = IsSettings
type AttrGetType SettingsGtkAutoMnemonicsPropertyInfo = Bool
type AttrLabel SettingsGtkAutoMnemonicsPropertyInfo = "gtk-auto-mnemonics"
type AttrOrigin SettingsGtkAutoMnemonicsPropertyInfo = Settings
attrGet _ = getSettingsGtkAutoMnemonics
attrSet _ = setSettingsGtkAutoMnemonics
attrConstruct _ = constructSettingsGtkAutoMnemonics
attrClear _ = undefined
#endif
getSettingsGtkButtonImages :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkButtonImages obj = liftIO $ getObjectPropertyBool obj "gtk-button-images"
setSettingsGtkButtonImages :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkButtonImages obj val = liftIO $ setObjectPropertyBool obj "gtk-button-images" val
constructSettingsGtkButtonImages :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkButtonImages val = constructObjectPropertyBool "gtk-button-images" val
#if ENABLE_OVERLOADING
data SettingsGtkButtonImagesPropertyInfo
instance AttrInfo SettingsGtkButtonImagesPropertyInfo where
type AttrAllowedOps SettingsGtkButtonImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkButtonImagesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkButtonImagesPropertyInfo = IsSettings
type AttrGetType SettingsGtkButtonImagesPropertyInfo = Bool
type AttrLabel SettingsGtkButtonImagesPropertyInfo = "gtk-button-images"
type AttrOrigin SettingsGtkButtonImagesPropertyInfo = Settings
attrGet _ = getSettingsGtkButtonImages
attrSet _ = setSettingsGtkButtonImages
attrConstruct _ = constructSettingsGtkButtonImages
attrClear _ = undefined
#endif
getSettingsGtkCanChangeAccels :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkCanChangeAccels obj = liftIO $ getObjectPropertyBool obj "gtk-can-change-accels"
setSettingsGtkCanChangeAccels :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkCanChangeAccels obj val = liftIO $ setObjectPropertyBool obj "gtk-can-change-accels" val
constructSettingsGtkCanChangeAccels :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkCanChangeAccels val = constructObjectPropertyBool "gtk-can-change-accels" val
#if ENABLE_OVERLOADING
data SettingsGtkCanChangeAccelsPropertyInfo
instance AttrInfo SettingsGtkCanChangeAccelsPropertyInfo where
type AttrAllowedOps SettingsGtkCanChangeAccelsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkCanChangeAccelsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkCanChangeAccelsPropertyInfo = IsSettings
type AttrGetType SettingsGtkCanChangeAccelsPropertyInfo = Bool
type AttrLabel SettingsGtkCanChangeAccelsPropertyInfo = "gtk-can-change-accels"
type AttrOrigin SettingsGtkCanChangeAccelsPropertyInfo = Settings
attrGet _ = getSettingsGtkCanChangeAccels
attrSet _ = setSettingsGtkCanChangeAccels
attrConstruct _ = constructSettingsGtkCanChangeAccels
attrClear _ = undefined
#endif
getSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkColorPalette obj = liftIO $ getObjectPropertyString obj "gtk-color-palette"
setSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkColorPalette obj val = liftIO $ setObjectPropertyString obj "gtk-color-palette" (Just val)
constructSettingsGtkColorPalette :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkColorPalette val = constructObjectPropertyString "gtk-color-palette" (Just val)
clearSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkColorPalette obj = liftIO $ setObjectPropertyString obj "gtk-color-palette" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkColorPalettePropertyInfo
instance AttrInfo SettingsGtkColorPalettePropertyInfo where
type AttrAllowedOps SettingsGtkColorPalettePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkColorPalettePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkColorPalettePropertyInfo = IsSettings
type AttrGetType SettingsGtkColorPalettePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkColorPalettePropertyInfo = "gtk-color-palette"
type AttrOrigin SettingsGtkColorPalettePropertyInfo = Settings
attrGet _ = getSettingsGtkColorPalette
attrSet _ = setSettingsGtkColorPalette
attrConstruct _ = constructSettingsGtkColorPalette
attrClear _ = clearSettingsGtkColorPalette
#endif
getSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkColorScheme obj = liftIO $ getObjectPropertyString obj "gtk-color-scheme"
setSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkColorScheme obj val = liftIO $ setObjectPropertyString obj "gtk-color-scheme" (Just val)
constructSettingsGtkColorScheme :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkColorScheme val = constructObjectPropertyString "gtk-color-scheme" (Just val)
clearSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkColorScheme obj = liftIO $ setObjectPropertyString obj "gtk-color-scheme" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkColorSchemePropertyInfo
instance AttrInfo SettingsGtkColorSchemePropertyInfo where
type AttrAllowedOps SettingsGtkColorSchemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkColorSchemePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkColorSchemePropertyInfo = IsSettings
type AttrGetType SettingsGtkColorSchemePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkColorSchemePropertyInfo = "gtk-color-scheme"
type AttrOrigin SettingsGtkColorSchemePropertyInfo = Settings
attrGet _ = getSettingsGtkColorScheme
attrSet _ = setSettingsGtkColorScheme
attrConstruct _ = constructSettingsGtkColorScheme
attrClear _ = clearSettingsGtkColorScheme
#endif
getSettingsGtkCursorBlink :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkCursorBlink obj = liftIO $ getObjectPropertyBool obj "gtk-cursor-blink"
setSettingsGtkCursorBlink :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkCursorBlink obj val = liftIO $ setObjectPropertyBool obj "gtk-cursor-blink" val
constructSettingsGtkCursorBlink :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkCursorBlink val = constructObjectPropertyBool "gtk-cursor-blink" val
#if ENABLE_OVERLOADING
data SettingsGtkCursorBlinkPropertyInfo
instance AttrInfo SettingsGtkCursorBlinkPropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkCursorBlinkPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkCursorBlinkPropertyInfo = IsSettings
type AttrGetType SettingsGtkCursorBlinkPropertyInfo = Bool
type AttrLabel SettingsGtkCursorBlinkPropertyInfo = "gtk-cursor-blink"
type AttrOrigin SettingsGtkCursorBlinkPropertyInfo = Settings
attrGet _ = getSettingsGtkCursorBlink
attrSet _ = setSettingsGtkCursorBlink
attrConstruct _ = constructSettingsGtkCursorBlink
attrClear _ = undefined
#endif
getSettingsGtkCursorBlinkTime :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorBlinkTime obj = liftIO $ getObjectPropertyInt32 obj "gtk-cursor-blink-time"
setSettingsGtkCursorBlinkTime :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorBlinkTime obj val = liftIO $ setObjectPropertyInt32 obj "gtk-cursor-blink-time" val
constructSettingsGtkCursorBlinkTime :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTime val = constructObjectPropertyInt32 "gtk-cursor-blink-time" val
#if ENABLE_OVERLOADING
data SettingsGtkCursorBlinkTimePropertyInfo
instance AttrInfo SettingsGtkCursorBlinkTimePropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkCursorBlinkTimePropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkCursorBlinkTimePropertyInfo = IsSettings
type AttrGetType SettingsGtkCursorBlinkTimePropertyInfo = Int32
type AttrLabel SettingsGtkCursorBlinkTimePropertyInfo = "gtk-cursor-blink-time"
type AttrOrigin SettingsGtkCursorBlinkTimePropertyInfo = Settings
attrGet _ = getSettingsGtkCursorBlinkTime
attrSet _ = setSettingsGtkCursorBlinkTime
attrConstruct _ = constructSettingsGtkCursorBlinkTime
attrClear _ = undefined
#endif
getSettingsGtkCursorBlinkTimeout :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorBlinkTimeout obj = liftIO $ getObjectPropertyInt32 obj "gtk-cursor-blink-timeout"
setSettingsGtkCursorBlinkTimeout :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorBlinkTimeout obj val = liftIO $ setObjectPropertyInt32 obj "gtk-cursor-blink-timeout" val
constructSettingsGtkCursorBlinkTimeout :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTimeout val = constructObjectPropertyInt32 "gtk-cursor-blink-timeout" val
#if ENABLE_OVERLOADING
data SettingsGtkCursorBlinkTimeoutPropertyInfo
instance AttrInfo SettingsGtkCursorBlinkTimeoutPropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkTimeoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkCursorBlinkTimeoutPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkCursorBlinkTimeoutPropertyInfo = IsSettings
type AttrGetType SettingsGtkCursorBlinkTimeoutPropertyInfo = Int32
type AttrLabel SettingsGtkCursorBlinkTimeoutPropertyInfo = "gtk-cursor-blink-timeout"
type AttrOrigin SettingsGtkCursorBlinkTimeoutPropertyInfo = Settings
attrGet _ = getSettingsGtkCursorBlinkTimeout
attrSet _ = setSettingsGtkCursorBlinkTimeout
attrConstruct _ = constructSettingsGtkCursorBlinkTimeout
attrClear _ = undefined
#endif
getSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkCursorThemeName obj = liftIO $ getObjectPropertyString obj "gtk-cursor-theme-name"
setSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkCursorThemeName obj val = liftIO $ setObjectPropertyString obj "gtk-cursor-theme-name" (Just val)
constructSettingsGtkCursorThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeName val = constructObjectPropertyString "gtk-cursor-theme-name" (Just val)
clearSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkCursorThemeName obj = liftIO $ setObjectPropertyString obj "gtk-cursor-theme-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkCursorThemeNamePropertyInfo
instance AttrInfo SettingsGtkCursorThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkCursorThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkCursorThemeNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkCursorThemeNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkCursorThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkCursorThemeNamePropertyInfo = "gtk-cursor-theme-name"
type AttrOrigin SettingsGtkCursorThemeNamePropertyInfo = Settings
attrGet _ = getSettingsGtkCursorThemeName
attrSet _ = setSettingsGtkCursorThemeName
attrConstruct _ = constructSettingsGtkCursorThemeName
attrClear _ = clearSettingsGtkCursorThemeName
#endif
getSettingsGtkCursorThemeSize :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorThemeSize obj = liftIO $ getObjectPropertyInt32 obj "gtk-cursor-theme-size"
setSettingsGtkCursorThemeSize :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorThemeSize obj val = liftIO $ setObjectPropertyInt32 obj "gtk-cursor-theme-size" val
constructSettingsGtkCursorThemeSize :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeSize val = constructObjectPropertyInt32 "gtk-cursor-theme-size" val
#if ENABLE_OVERLOADING
data SettingsGtkCursorThemeSizePropertyInfo
instance AttrInfo SettingsGtkCursorThemeSizePropertyInfo where
type AttrAllowedOps SettingsGtkCursorThemeSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkCursorThemeSizePropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkCursorThemeSizePropertyInfo = IsSettings
type AttrGetType SettingsGtkCursorThemeSizePropertyInfo = Int32
type AttrLabel SettingsGtkCursorThemeSizePropertyInfo = "gtk-cursor-theme-size"
type AttrOrigin SettingsGtkCursorThemeSizePropertyInfo = Settings
attrGet _ = getSettingsGtkCursorThemeSize
attrSet _ = setSettingsGtkCursorThemeSize
attrConstruct _ = constructSettingsGtkCursorThemeSize
attrClear _ = undefined
#endif
getSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkDecorationLayout obj = liftIO $ getObjectPropertyString obj "gtk-decoration-layout"
setSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkDecorationLayout obj val = liftIO $ setObjectPropertyString obj "gtk-decoration-layout" (Just val)
constructSettingsGtkDecorationLayout :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkDecorationLayout val = constructObjectPropertyString "gtk-decoration-layout" (Just val)
clearSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkDecorationLayout obj = liftIO $ setObjectPropertyString obj "gtk-decoration-layout" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkDecorationLayoutPropertyInfo
instance AttrInfo SettingsGtkDecorationLayoutPropertyInfo where
type AttrAllowedOps SettingsGtkDecorationLayoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkDecorationLayoutPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkDecorationLayoutPropertyInfo = IsSettings
type AttrGetType SettingsGtkDecorationLayoutPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkDecorationLayoutPropertyInfo = "gtk-decoration-layout"
type AttrOrigin SettingsGtkDecorationLayoutPropertyInfo = Settings
attrGet _ = getSettingsGtkDecorationLayout
attrSet _ = setSettingsGtkDecorationLayout
attrConstruct _ = constructSettingsGtkDecorationLayout
attrClear _ = clearSettingsGtkDecorationLayout
#endif
getSettingsGtkDialogsUseHeader :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkDialogsUseHeader obj = liftIO $ getObjectPropertyBool obj "gtk-dialogs-use-header"
setSettingsGtkDialogsUseHeader :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkDialogsUseHeader obj val = liftIO $ setObjectPropertyBool obj "gtk-dialogs-use-header" val
constructSettingsGtkDialogsUseHeader :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkDialogsUseHeader val = constructObjectPropertyBool "gtk-dialogs-use-header" val
#if ENABLE_OVERLOADING
data SettingsGtkDialogsUseHeaderPropertyInfo
instance AttrInfo SettingsGtkDialogsUseHeaderPropertyInfo where
type AttrAllowedOps SettingsGtkDialogsUseHeaderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkDialogsUseHeaderPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkDialogsUseHeaderPropertyInfo = IsSettings
type AttrGetType SettingsGtkDialogsUseHeaderPropertyInfo = Bool
type AttrLabel SettingsGtkDialogsUseHeaderPropertyInfo = "gtk-dialogs-use-header"
type AttrOrigin SettingsGtkDialogsUseHeaderPropertyInfo = Settings
attrGet _ = getSettingsGtkDialogsUseHeader
attrSet _ = setSettingsGtkDialogsUseHeader
attrConstruct _ = constructSettingsGtkDialogsUseHeader
attrClear _ = undefined
#endif
getSettingsGtkDndDragThreshold :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDndDragThreshold obj = liftIO $ getObjectPropertyInt32 obj "gtk-dnd-drag-threshold"
setSettingsGtkDndDragThreshold :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDndDragThreshold obj val = liftIO $ setObjectPropertyInt32 obj "gtk-dnd-drag-threshold" val
constructSettingsGtkDndDragThreshold :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDndDragThreshold val = constructObjectPropertyInt32 "gtk-dnd-drag-threshold" val
#if ENABLE_OVERLOADING
data SettingsGtkDndDragThresholdPropertyInfo
instance AttrInfo SettingsGtkDndDragThresholdPropertyInfo where
type AttrAllowedOps SettingsGtkDndDragThresholdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkDndDragThresholdPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkDndDragThresholdPropertyInfo = IsSettings
type AttrGetType SettingsGtkDndDragThresholdPropertyInfo = Int32
type AttrLabel SettingsGtkDndDragThresholdPropertyInfo = "gtk-dnd-drag-threshold"
type AttrOrigin SettingsGtkDndDragThresholdPropertyInfo = Settings
attrGet _ = getSettingsGtkDndDragThreshold
attrSet _ = setSettingsGtkDndDragThreshold
attrConstruct _ = constructSettingsGtkDndDragThreshold
attrClear _ = undefined
#endif
getSettingsGtkDoubleClickDistance :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDoubleClickDistance obj = liftIO $ getObjectPropertyInt32 obj "gtk-double-click-distance"
setSettingsGtkDoubleClickDistance :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDoubleClickDistance obj val = liftIO $ setObjectPropertyInt32 obj "gtk-double-click-distance" val
constructSettingsGtkDoubleClickDistance :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickDistance val = constructObjectPropertyInt32 "gtk-double-click-distance" val
#if ENABLE_OVERLOADING
data SettingsGtkDoubleClickDistancePropertyInfo
instance AttrInfo SettingsGtkDoubleClickDistancePropertyInfo where
type AttrAllowedOps SettingsGtkDoubleClickDistancePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkDoubleClickDistancePropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkDoubleClickDistancePropertyInfo = IsSettings
type AttrGetType SettingsGtkDoubleClickDistancePropertyInfo = Int32
type AttrLabel SettingsGtkDoubleClickDistancePropertyInfo = "gtk-double-click-distance"
type AttrOrigin SettingsGtkDoubleClickDistancePropertyInfo = Settings
attrGet _ = getSettingsGtkDoubleClickDistance
attrSet _ = setSettingsGtkDoubleClickDistance
attrConstruct _ = constructSettingsGtkDoubleClickDistance
attrClear _ = undefined
#endif
getSettingsGtkDoubleClickTime :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDoubleClickTime obj = liftIO $ getObjectPropertyInt32 obj "gtk-double-click-time"
setSettingsGtkDoubleClickTime :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDoubleClickTime obj val = liftIO $ setObjectPropertyInt32 obj "gtk-double-click-time" val
constructSettingsGtkDoubleClickTime :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickTime val = constructObjectPropertyInt32 "gtk-double-click-time" val
#if ENABLE_OVERLOADING
data SettingsGtkDoubleClickTimePropertyInfo
instance AttrInfo SettingsGtkDoubleClickTimePropertyInfo where
type AttrAllowedOps SettingsGtkDoubleClickTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkDoubleClickTimePropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkDoubleClickTimePropertyInfo = IsSettings
type AttrGetType SettingsGtkDoubleClickTimePropertyInfo = Int32
type AttrLabel SettingsGtkDoubleClickTimePropertyInfo = "gtk-double-click-time"
type AttrOrigin SettingsGtkDoubleClickTimePropertyInfo = Settings
attrGet _ = getSettingsGtkDoubleClickTime
attrSet _ = setSettingsGtkDoubleClickTime
attrConstruct _ = constructSettingsGtkDoubleClickTime
attrClear _ = undefined
#endif
getSettingsGtkEnableAccels :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableAccels obj = liftIO $ getObjectPropertyBool obj "gtk-enable-accels"
setSettingsGtkEnableAccels :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableAccels obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-accels" val
constructSettingsGtkEnableAccels :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAccels val = constructObjectPropertyBool "gtk-enable-accels" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableAccelsPropertyInfo
instance AttrInfo SettingsGtkEnableAccelsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableAccelsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableAccelsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableAccelsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableAccelsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableAccelsPropertyInfo = "gtk-enable-accels"
type AttrOrigin SettingsGtkEnableAccelsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableAccels
attrSet _ = setSettingsGtkEnableAccels
attrConstruct _ = constructSettingsGtkEnableAccels
attrClear _ = undefined
#endif
getSettingsGtkEnableAnimations :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableAnimations obj = liftIO $ getObjectPropertyBool obj "gtk-enable-animations"
setSettingsGtkEnableAnimations :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableAnimations obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-animations" val
constructSettingsGtkEnableAnimations :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAnimations val = constructObjectPropertyBool "gtk-enable-animations" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableAnimationsPropertyInfo
instance AttrInfo SettingsGtkEnableAnimationsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableAnimationsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableAnimationsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableAnimationsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableAnimationsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableAnimationsPropertyInfo = "gtk-enable-animations"
type AttrOrigin SettingsGtkEnableAnimationsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableAnimations
attrSet _ = setSettingsGtkEnableAnimations
attrConstruct _ = constructSettingsGtkEnableAnimations
attrClear _ = undefined
#endif
getSettingsGtkEnableEventSounds :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableEventSounds obj = liftIO $ getObjectPropertyBool obj "gtk-enable-event-sounds"
setSettingsGtkEnableEventSounds :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableEventSounds obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-event-sounds" val
constructSettingsGtkEnableEventSounds :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableEventSounds val = constructObjectPropertyBool "gtk-enable-event-sounds" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableEventSoundsPropertyInfo
instance AttrInfo SettingsGtkEnableEventSoundsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableEventSoundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableEventSoundsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableEventSoundsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableEventSoundsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableEventSoundsPropertyInfo = "gtk-enable-event-sounds"
type AttrOrigin SettingsGtkEnableEventSoundsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableEventSounds
attrSet _ = setSettingsGtkEnableEventSounds
attrConstruct _ = constructSettingsGtkEnableEventSounds
attrClear _ = undefined
#endif
getSettingsGtkEnableInputFeedbackSounds :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableInputFeedbackSounds obj = liftIO $ getObjectPropertyBool obj "gtk-enable-input-feedback-sounds"
setSettingsGtkEnableInputFeedbackSounds :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableInputFeedbackSounds obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-input-feedback-sounds" val
constructSettingsGtkEnableInputFeedbackSounds :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableInputFeedbackSounds val = constructObjectPropertyBool "gtk-enable-input-feedback-sounds" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableInputFeedbackSoundsPropertyInfo
instance AttrInfo SettingsGtkEnableInputFeedbackSoundsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableInputFeedbackSoundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableInputFeedbackSoundsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableInputFeedbackSoundsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableInputFeedbackSoundsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableInputFeedbackSoundsPropertyInfo = "gtk-enable-input-feedback-sounds"
type AttrOrigin SettingsGtkEnableInputFeedbackSoundsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableInputFeedbackSounds
attrSet _ = setSettingsGtkEnableInputFeedbackSounds
attrConstruct _ = constructSettingsGtkEnableInputFeedbackSounds
attrClear _ = undefined
#endif
getSettingsGtkEnableMnemonics :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableMnemonics obj = liftIO $ getObjectPropertyBool obj "gtk-enable-mnemonics"
setSettingsGtkEnableMnemonics :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableMnemonics obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-mnemonics" val
constructSettingsGtkEnableMnemonics :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableMnemonics val = constructObjectPropertyBool "gtk-enable-mnemonics" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableMnemonicsPropertyInfo
instance AttrInfo SettingsGtkEnableMnemonicsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableMnemonicsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableMnemonicsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableMnemonicsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableMnemonicsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableMnemonicsPropertyInfo = "gtk-enable-mnemonics"
type AttrOrigin SettingsGtkEnableMnemonicsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableMnemonics
attrSet _ = setSettingsGtkEnableMnemonics
attrConstruct _ = constructSettingsGtkEnableMnemonics
attrClear _ = undefined
#endif
getSettingsGtkEnablePrimaryPaste :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnablePrimaryPaste obj = liftIO $ getObjectPropertyBool obj "gtk-enable-primary-paste"
setSettingsGtkEnablePrimaryPaste :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnablePrimaryPaste obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-primary-paste" val
constructSettingsGtkEnablePrimaryPaste :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnablePrimaryPaste val = constructObjectPropertyBool "gtk-enable-primary-paste" val
#if ENABLE_OVERLOADING
data SettingsGtkEnablePrimaryPastePropertyInfo
instance AttrInfo SettingsGtkEnablePrimaryPastePropertyInfo where
type AttrAllowedOps SettingsGtkEnablePrimaryPastePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnablePrimaryPastePropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnablePrimaryPastePropertyInfo = IsSettings
type AttrGetType SettingsGtkEnablePrimaryPastePropertyInfo = Bool
type AttrLabel SettingsGtkEnablePrimaryPastePropertyInfo = "gtk-enable-primary-paste"
type AttrOrigin SettingsGtkEnablePrimaryPastePropertyInfo = Settings
attrGet _ = getSettingsGtkEnablePrimaryPaste
attrSet _ = setSettingsGtkEnablePrimaryPaste
attrConstruct _ = constructSettingsGtkEnablePrimaryPaste
attrClear _ = undefined
#endif
getSettingsGtkEnableTooltips :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableTooltips obj = liftIO $ getObjectPropertyBool obj "gtk-enable-tooltips"
setSettingsGtkEnableTooltips :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableTooltips obj val = liftIO $ setObjectPropertyBool obj "gtk-enable-tooltips" val
constructSettingsGtkEnableTooltips :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableTooltips val = constructObjectPropertyBool "gtk-enable-tooltips" val
#if ENABLE_OVERLOADING
data SettingsGtkEnableTooltipsPropertyInfo
instance AttrInfo SettingsGtkEnableTooltipsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableTooltipsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEnableTooltipsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEnableTooltipsPropertyInfo = IsSettings
type AttrGetType SettingsGtkEnableTooltipsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableTooltipsPropertyInfo = "gtk-enable-tooltips"
type AttrOrigin SettingsGtkEnableTooltipsPropertyInfo = Settings
attrGet _ = getSettingsGtkEnableTooltips
attrSet _ = setSettingsGtkEnableTooltips
attrConstruct _ = constructSettingsGtkEnableTooltips
attrClear _ = undefined
#endif
getSettingsGtkEntryPasswordHintTimeout :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkEntryPasswordHintTimeout obj = liftIO $ getObjectPropertyUInt32 obj "gtk-entry-password-hint-timeout"
setSettingsGtkEntryPasswordHintTimeout :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkEntryPasswordHintTimeout obj val = liftIO $ setObjectPropertyUInt32 obj "gtk-entry-password-hint-timeout" val
constructSettingsGtkEntryPasswordHintTimeout :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkEntryPasswordHintTimeout val = constructObjectPropertyUInt32 "gtk-entry-password-hint-timeout" val
#if ENABLE_OVERLOADING
data SettingsGtkEntryPasswordHintTimeoutPropertyInfo
instance AttrInfo SettingsGtkEntryPasswordHintTimeoutPropertyInfo where
type AttrAllowedOps SettingsGtkEntryPasswordHintTimeoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEntryPasswordHintTimeoutPropertyInfo = (~) Word32
type AttrBaseTypeConstraint SettingsGtkEntryPasswordHintTimeoutPropertyInfo = IsSettings
type AttrGetType SettingsGtkEntryPasswordHintTimeoutPropertyInfo = Word32
type AttrLabel SettingsGtkEntryPasswordHintTimeoutPropertyInfo = "gtk-entry-password-hint-timeout"
type AttrOrigin SettingsGtkEntryPasswordHintTimeoutPropertyInfo = Settings
attrGet _ = getSettingsGtkEntryPasswordHintTimeout
attrSet _ = setSettingsGtkEntryPasswordHintTimeout
attrConstruct _ = constructSettingsGtkEntryPasswordHintTimeout
attrClear _ = undefined
#endif
getSettingsGtkEntrySelectOnFocus :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEntrySelectOnFocus obj = liftIO $ getObjectPropertyBool obj "gtk-entry-select-on-focus"
setSettingsGtkEntrySelectOnFocus :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEntrySelectOnFocus obj val = liftIO $ setObjectPropertyBool obj "gtk-entry-select-on-focus" val
constructSettingsGtkEntrySelectOnFocus :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEntrySelectOnFocus val = constructObjectPropertyBool "gtk-entry-select-on-focus" val
#if ENABLE_OVERLOADING
data SettingsGtkEntrySelectOnFocusPropertyInfo
instance AttrInfo SettingsGtkEntrySelectOnFocusPropertyInfo where
type AttrAllowedOps SettingsGtkEntrySelectOnFocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkEntrySelectOnFocusPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkEntrySelectOnFocusPropertyInfo = IsSettings
type AttrGetType SettingsGtkEntrySelectOnFocusPropertyInfo = Bool
type AttrLabel SettingsGtkEntrySelectOnFocusPropertyInfo = "gtk-entry-select-on-focus"
type AttrOrigin SettingsGtkEntrySelectOnFocusPropertyInfo = Settings
attrGet _ = getSettingsGtkEntrySelectOnFocus
attrSet _ = setSettingsGtkEntrySelectOnFocus
attrConstruct _ = constructSettingsGtkEntrySelectOnFocus
attrClear _ = undefined
#endif
getSettingsGtkErrorBell :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkErrorBell obj = liftIO $ getObjectPropertyBool obj "gtk-error-bell"
setSettingsGtkErrorBell :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkErrorBell obj val = liftIO $ setObjectPropertyBool obj "gtk-error-bell" val
constructSettingsGtkErrorBell :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkErrorBell val = constructObjectPropertyBool "gtk-error-bell" val
#if ENABLE_OVERLOADING
data SettingsGtkErrorBellPropertyInfo
instance AttrInfo SettingsGtkErrorBellPropertyInfo where
type AttrAllowedOps SettingsGtkErrorBellPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkErrorBellPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkErrorBellPropertyInfo = IsSettings
type AttrGetType SettingsGtkErrorBellPropertyInfo = Bool
type AttrLabel SettingsGtkErrorBellPropertyInfo = "gtk-error-bell"
type AttrOrigin SettingsGtkErrorBellPropertyInfo = Settings
attrGet _ = getSettingsGtkErrorBell
attrSet _ = setSettingsGtkErrorBell
attrConstruct _ = constructSettingsGtkErrorBell
attrClear _ = undefined
#endif
getSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFallbackIconTheme obj = liftIO $ getObjectPropertyString obj "gtk-fallback-icon-theme"
setSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFallbackIconTheme obj val = liftIO $ setObjectPropertyString obj "gtk-fallback-icon-theme" (Just val)
constructSettingsGtkFallbackIconTheme :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFallbackIconTheme val = constructObjectPropertyString "gtk-fallback-icon-theme" (Just val)
clearSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFallbackIconTheme obj = liftIO $ setObjectPropertyString obj "gtk-fallback-icon-theme" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkFallbackIconThemePropertyInfo
instance AttrInfo SettingsGtkFallbackIconThemePropertyInfo where
type AttrAllowedOps SettingsGtkFallbackIconThemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkFallbackIconThemePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkFallbackIconThemePropertyInfo = IsSettings
type AttrGetType SettingsGtkFallbackIconThemePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFallbackIconThemePropertyInfo = "gtk-fallback-icon-theme"
type AttrOrigin SettingsGtkFallbackIconThemePropertyInfo = Settings
attrGet _ = getSettingsGtkFallbackIconTheme
attrSet _ = setSettingsGtkFallbackIconTheme
attrConstruct _ = constructSettingsGtkFallbackIconTheme
attrClear _ = clearSettingsGtkFallbackIconTheme
#endif
getSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFileChooserBackend obj = liftIO $ getObjectPropertyString obj "gtk-file-chooser-backend"
setSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFileChooserBackend obj val = liftIO $ setObjectPropertyString obj "gtk-file-chooser-backend" (Just val)
constructSettingsGtkFileChooserBackend :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFileChooserBackend val = constructObjectPropertyString "gtk-file-chooser-backend" (Just val)
clearSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFileChooserBackend obj = liftIO $ setObjectPropertyString obj "gtk-file-chooser-backend" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkFileChooserBackendPropertyInfo
instance AttrInfo SettingsGtkFileChooserBackendPropertyInfo where
type AttrAllowedOps SettingsGtkFileChooserBackendPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkFileChooserBackendPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkFileChooserBackendPropertyInfo = IsSettings
type AttrGetType SettingsGtkFileChooserBackendPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFileChooserBackendPropertyInfo = "gtk-file-chooser-backend"
type AttrOrigin SettingsGtkFileChooserBackendPropertyInfo = Settings
attrGet _ = getSettingsGtkFileChooserBackend
attrSet _ = setSettingsGtkFileChooserBackend
attrConstruct _ = constructSettingsGtkFileChooserBackend
attrClear _ = clearSettingsGtkFileChooserBackend
#endif
getSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFontName obj = liftIO $ getObjectPropertyString obj "gtk-font-name"
setSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFontName obj val = liftIO $ setObjectPropertyString obj "gtk-font-name" (Just val)
constructSettingsGtkFontName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFontName val = constructObjectPropertyString "gtk-font-name" (Just val)
clearSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFontName obj = liftIO $ setObjectPropertyString obj "gtk-font-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkFontNamePropertyInfo
instance AttrInfo SettingsGtkFontNamePropertyInfo where
type AttrAllowedOps SettingsGtkFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkFontNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkFontNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkFontNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFontNamePropertyInfo = "gtk-font-name"
type AttrOrigin SettingsGtkFontNamePropertyInfo = Settings
attrGet _ = getSettingsGtkFontName
attrSet _ = setSettingsGtkFontName
attrConstruct _ = constructSettingsGtkFontName
attrClear _ = clearSettingsGtkFontName
#endif
getSettingsGtkFontconfigTimestamp :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkFontconfigTimestamp obj = liftIO $ getObjectPropertyUInt32 obj "gtk-fontconfig-timestamp"
setSettingsGtkFontconfigTimestamp :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkFontconfigTimestamp obj val = liftIO $ setObjectPropertyUInt32 obj "gtk-fontconfig-timestamp" val
constructSettingsGtkFontconfigTimestamp :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkFontconfigTimestamp val = constructObjectPropertyUInt32 "gtk-fontconfig-timestamp" val
#if ENABLE_OVERLOADING
data SettingsGtkFontconfigTimestampPropertyInfo
instance AttrInfo SettingsGtkFontconfigTimestampPropertyInfo where
type AttrAllowedOps SettingsGtkFontconfigTimestampPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkFontconfigTimestampPropertyInfo = (~) Word32
type AttrBaseTypeConstraint SettingsGtkFontconfigTimestampPropertyInfo = IsSettings
type AttrGetType SettingsGtkFontconfigTimestampPropertyInfo = Word32
type AttrLabel SettingsGtkFontconfigTimestampPropertyInfo = "gtk-fontconfig-timestamp"
type AttrOrigin SettingsGtkFontconfigTimestampPropertyInfo = Settings
attrGet _ = getSettingsGtkFontconfigTimestamp
attrSet _ = setSettingsGtkFontconfigTimestamp
attrConstruct _ = constructSettingsGtkFontconfigTimestamp
attrClear _ = undefined
#endif
getSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkIconSizes obj = liftIO $ getObjectPropertyString obj "gtk-icon-sizes"
setSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkIconSizes obj val = liftIO $ setObjectPropertyString obj "gtk-icon-sizes" (Just val)
constructSettingsGtkIconSizes :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkIconSizes val = constructObjectPropertyString "gtk-icon-sizes" (Just val)
clearSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkIconSizes obj = liftIO $ setObjectPropertyString obj "gtk-icon-sizes" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkIconSizesPropertyInfo
instance AttrInfo SettingsGtkIconSizesPropertyInfo where
type AttrAllowedOps SettingsGtkIconSizesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkIconSizesPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkIconSizesPropertyInfo = IsSettings
type AttrGetType SettingsGtkIconSizesPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkIconSizesPropertyInfo = "gtk-icon-sizes"
type AttrOrigin SettingsGtkIconSizesPropertyInfo = Settings
attrGet _ = getSettingsGtkIconSizes
attrSet _ = setSettingsGtkIconSizes
attrConstruct _ = constructSettingsGtkIconSizes
attrClear _ = clearSettingsGtkIconSizes
#endif
getSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkIconThemeName obj = liftIO $ getObjectPropertyString obj "gtk-icon-theme-name"
setSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkIconThemeName obj val = liftIO $ setObjectPropertyString obj "gtk-icon-theme-name" (Just val)
constructSettingsGtkIconThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkIconThemeName val = constructObjectPropertyString "gtk-icon-theme-name" (Just val)
clearSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkIconThemeName obj = liftIO $ setObjectPropertyString obj "gtk-icon-theme-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkIconThemeNamePropertyInfo
instance AttrInfo SettingsGtkIconThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkIconThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkIconThemeNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkIconThemeNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkIconThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkIconThemeNamePropertyInfo = "gtk-icon-theme-name"
type AttrOrigin SettingsGtkIconThemeNamePropertyInfo = Settings
attrGet _ = getSettingsGtkIconThemeName
attrSet _ = setSettingsGtkIconThemeName
attrConstruct _ = constructSettingsGtkIconThemeName
attrClear _ = clearSettingsGtkIconThemeName
#endif
getSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkImModule obj = liftIO $ getObjectPropertyString obj "gtk-im-module"
setSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkImModule obj val = liftIO $ setObjectPropertyString obj "gtk-im-module" (Just val)
constructSettingsGtkImModule :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkImModule val = constructObjectPropertyString "gtk-im-module" (Just val)
clearSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkImModule obj = liftIO $ setObjectPropertyString obj "gtk-im-module" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkImModulePropertyInfo
instance AttrInfo SettingsGtkImModulePropertyInfo where
type AttrAllowedOps SettingsGtkImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkImModulePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkImModulePropertyInfo = IsSettings
type AttrGetType SettingsGtkImModulePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkImModulePropertyInfo = "gtk-im-module"
type AttrOrigin SettingsGtkImModulePropertyInfo = Settings
attrGet _ = getSettingsGtkImModule
attrSet _ = setSettingsGtkImModule
attrConstruct _ = constructSettingsGtkImModule
attrClear _ = clearSettingsGtkImModule
#endif
getSettingsGtkImPreeditStyle :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.IMPreeditStyle
getSettingsGtkImPreeditStyle obj = liftIO $ getObjectPropertyEnum obj "gtk-im-preedit-style"
setSettingsGtkImPreeditStyle :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.IMPreeditStyle -> m ()
setSettingsGtkImPreeditStyle obj val = liftIO $ setObjectPropertyEnum obj "gtk-im-preedit-style" val
constructSettingsGtkImPreeditStyle :: (IsSettings o) => Gtk.Enums.IMPreeditStyle -> IO (GValueConstruct o)
constructSettingsGtkImPreeditStyle val = constructObjectPropertyEnum "gtk-im-preedit-style" val
#if ENABLE_OVERLOADING
data SettingsGtkImPreeditStylePropertyInfo
instance AttrInfo SettingsGtkImPreeditStylePropertyInfo where
type AttrAllowedOps SettingsGtkImPreeditStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkImPreeditStylePropertyInfo = (~) Gtk.Enums.IMPreeditStyle
type AttrBaseTypeConstraint SettingsGtkImPreeditStylePropertyInfo = IsSettings
type AttrGetType SettingsGtkImPreeditStylePropertyInfo = Gtk.Enums.IMPreeditStyle
type AttrLabel SettingsGtkImPreeditStylePropertyInfo = "gtk-im-preedit-style"
type AttrOrigin SettingsGtkImPreeditStylePropertyInfo = Settings
attrGet _ = getSettingsGtkImPreeditStyle
attrSet _ = setSettingsGtkImPreeditStyle
attrConstruct _ = constructSettingsGtkImPreeditStyle
attrClear _ = undefined
#endif
getSettingsGtkImStatusStyle :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.IMStatusStyle
getSettingsGtkImStatusStyle obj = liftIO $ getObjectPropertyEnum obj "gtk-im-status-style"
setSettingsGtkImStatusStyle :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.IMStatusStyle -> m ()
setSettingsGtkImStatusStyle obj val = liftIO $ setObjectPropertyEnum obj "gtk-im-status-style" val
constructSettingsGtkImStatusStyle :: (IsSettings o) => Gtk.Enums.IMStatusStyle -> IO (GValueConstruct o)
constructSettingsGtkImStatusStyle val = constructObjectPropertyEnum "gtk-im-status-style" val
#if ENABLE_OVERLOADING
data SettingsGtkImStatusStylePropertyInfo
instance AttrInfo SettingsGtkImStatusStylePropertyInfo where
type AttrAllowedOps SettingsGtkImStatusStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkImStatusStylePropertyInfo = (~) Gtk.Enums.IMStatusStyle
type AttrBaseTypeConstraint SettingsGtkImStatusStylePropertyInfo = IsSettings
type AttrGetType SettingsGtkImStatusStylePropertyInfo = Gtk.Enums.IMStatusStyle
type AttrLabel SettingsGtkImStatusStylePropertyInfo = "gtk-im-status-style"
type AttrOrigin SettingsGtkImStatusStylePropertyInfo = Settings
attrGet _ = getSettingsGtkImStatusStyle
attrSet _ = setSettingsGtkImStatusStyle
attrConstruct _ = constructSettingsGtkImStatusStyle
attrClear _ = undefined
#endif
getSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkKeyThemeName obj = liftIO $ getObjectPropertyString obj "gtk-key-theme-name"
setSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkKeyThemeName obj val = liftIO $ setObjectPropertyString obj "gtk-key-theme-name" (Just val)
constructSettingsGtkKeyThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkKeyThemeName val = constructObjectPropertyString "gtk-key-theme-name" (Just val)
clearSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkKeyThemeName obj = liftIO $ setObjectPropertyString obj "gtk-key-theme-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkKeyThemeNamePropertyInfo
instance AttrInfo SettingsGtkKeyThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkKeyThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkKeyThemeNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkKeyThemeNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkKeyThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkKeyThemeNamePropertyInfo = "gtk-key-theme-name"
type AttrOrigin SettingsGtkKeyThemeNamePropertyInfo = Settings
attrGet _ = getSettingsGtkKeyThemeName
attrSet _ = setSettingsGtkKeyThemeName
attrConstruct _ = constructSettingsGtkKeyThemeName
attrClear _ = clearSettingsGtkKeyThemeName
#endif
getSettingsGtkKeynavCursorOnly :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavCursorOnly obj = liftIO $ getObjectPropertyBool obj "gtk-keynav-cursor-only"
setSettingsGtkKeynavCursorOnly :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavCursorOnly obj val = liftIO $ setObjectPropertyBool obj "gtk-keynav-cursor-only" val
constructSettingsGtkKeynavCursorOnly :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavCursorOnly val = constructObjectPropertyBool "gtk-keynav-cursor-only" val
#if ENABLE_OVERLOADING
data SettingsGtkKeynavCursorOnlyPropertyInfo
instance AttrInfo SettingsGtkKeynavCursorOnlyPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavCursorOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkKeynavCursorOnlyPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkKeynavCursorOnlyPropertyInfo = IsSettings
type AttrGetType SettingsGtkKeynavCursorOnlyPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavCursorOnlyPropertyInfo = "gtk-keynav-cursor-only"
type AttrOrigin SettingsGtkKeynavCursorOnlyPropertyInfo = Settings
attrGet _ = getSettingsGtkKeynavCursorOnly
attrSet _ = setSettingsGtkKeynavCursorOnly
attrConstruct _ = constructSettingsGtkKeynavCursorOnly
attrClear _ = undefined
#endif
getSettingsGtkKeynavUseCaret :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavUseCaret obj = liftIO $ getObjectPropertyBool obj "gtk-keynav-use-caret"
setSettingsGtkKeynavUseCaret :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavUseCaret obj val = liftIO $ setObjectPropertyBool obj "gtk-keynav-use-caret" val
constructSettingsGtkKeynavUseCaret :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavUseCaret val = constructObjectPropertyBool "gtk-keynav-use-caret" val
#if ENABLE_OVERLOADING
data SettingsGtkKeynavUseCaretPropertyInfo
instance AttrInfo SettingsGtkKeynavUseCaretPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavUseCaretPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkKeynavUseCaretPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkKeynavUseCaretPropertyInfo = IsSettings
type AttrGetType SettingsGtkKeynavUseCaretPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavUseCaretPropertyInfo = "gtk-keynav-use-caret"
type AttrOrigin SettingsGtkKeynavUseCaretPropertyInfo = Settings
attrGet _ = getSettingsGtkKeynavUseCaret
attrSet _ = setSettingsGtkKeynavUseCaret
attrConstruct _ = constructSettingsGtkKeynavUseCaret
attrClear _ = undefined
#endif
getSettingsGtkKeynavWrapAround :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavWrapAround obj = liftIO $ getObjectPropertyBool obj "gtk-keynav-wrap-around"
setSettingsGtkKeynavWrapAround :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavWrapAround obj val = liftIO $ setObjectPropertyBool obj "gtk-keynav-wrap-around" val
constructSettingsGtkKeynavWrapAround :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavWrapAround val = constructObjectPropertyBool "gtk-keynav-wrap-around" val
#if ENABLE_OVERLOADING
data SettingsGtkKeynavWrapAroundPropertyInfo
instance AttrInfo SettingsGtkKeynavWrapAroundPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavWrapAroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkKeynavWrapAroundPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkKeynavWrapAroundPropertyInfo = IsSettings
type AttrGetType SettingsGtkKeynavWrapAroundPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavWrapAroundPropertyInfo = "gtk-keynav-wrap-around"
type AttrOrigin SettingsGtkKeynavWrapAroundPropertyInfo = Settings
attrGet _ = getSettingsGtkKeynavWrapAround
attrSet _ = setSettingsGtkKeynavWrapAround
attrConstruct _ = constructSettingsGtkKeynavWrapAround
attrClear _ = undefined
#endif
getSettingsGtkLabelSelectOnFocus :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkLabelSelectOnFocus obj = liftIO $ getObjectPropertyBool obj "gtk-label-select-on-focus"
setSettingsGtkLabelSelectOnFocus :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkLabelSelectOnFocus obj val = liftIO $ setObjectPropertyBool obj "gtk-label-select-on-focus" val
constructSettingsGtkLabelSelectOnFocus :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkLabelSelectOnFocus val = constructObjectPropertyBool "gtk-label-select-on-focus" val
#if ENABLE_OVERLOADING
data SettingsGtkLabelSelectOnFocusPropertyInfo
instance AttrInfo SettingsGtkLabelSelectOnFocusPropertyInfo where
type AttrAllowedOps SettingsGtkLabelSelectOnFocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkLabelSelectOnFocusPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkLabelSelectOnFocusPropertyInfo = IsSettings
type AttrGetType SettingsGtkLabelSelectOnFocusPropertyInfo = Bool
type AttrLabel SettingsGtkLabelSelectOnFocusPropertyInfo = "gtk-label-select-on-focus"
type AttrOrigin SettingsGtkLabelSelectOnFocusPropertyInfo = Settings
attrGet _ = getSettingsGtkLabelSelectOnFocus
attrSet _ = setSettingsGtkLabelSelectOnFocus
attrConstruct _ = constructSettingsGtkLabelSelectOnFocus
attrClear _ = undefined
#endif
getSettingsGtkLongPressTime :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkLongPressTime obj = liftIO $ getObjectPropertyUInt32 obj "gtk-long-press-time"
setSettingsGtkLongPressTime :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkLongPressTime obj val = liftIO $ setObjectPropertyUInt32 obj "gtk-long-press-time" val
constructSettingsGtkLongPressTime :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkLongPressTime val = constructObjectPropertyUInt32 "gtk-long-press-time" val
#if ENABLE_OVERLOADING
data SettingsGtkLongPressTimePropertyInfo
instance AttrInfo SettingsGtkLongPressTimePropertyInfo where
type AttrAllowedOps SettingsGtkLongPressTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkLongPressTimePropertyInfo = (~) Word32
type AttrBaseTypeConstraint SettingsGtkLongPressTimePropertyInfo = IsSettings
type AttrGetType SettingsGtkLongPressTimePropertyInfo = Word32
type AttrLabel SettingsGtkLongPressTimePropertyInfo = "gtk-long-press-time"
type AttrOrigin SettingsGtkLongPressTimePropertyInfo = Settings
attrGet _ = getSettingsGtkLongPressTime
attrSet _ = setSettingsGtkLongPressTime
attrConstruct _ = constructSettingsGtkLongPressTime
attrClear _ = undefined
#endif
getSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkMenuBarAccel obj = liftIO $ getObjectPropertyString obj "gtk-menu-bar-accel"
setSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkMenuBarAccel obj val = liftIO $ setObjectPropertyString obj "gtk-menu-bar-accel" (Just val)
constructSettingsGtkMenuBarAccel :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkMenuBarAccel val = constructObjectPropertyString "gtk-menu-bar-accel" (Just val)
clearSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkMenuBarAccel obj = liftIO $ setObjectPropertyString obj "gtk-menu-bar-accel" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkMenuBarAccelPropertyInfo
instance AttrInfo SettingsGtkMenuBarAccelPropertyInfo where
type AttrAllowedOps SettingsGtkMenuBarAccelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkMenuBarAccelPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkMenuBarAccelPropertyInfo = IsSettings
type AttrGetType SettingsGtkMenuBarAccelPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkMenuBarAccelPropertyInfo = "gtk-menu-bar-accel"
type AttrOrigin SettingsGtkMenuBarAccelPropertyInfo = Settings
attrGet _ = getSettingsGtkMenuBarAccel
attrSet _ = setSettingsGtkMenuBarAccel
attrConstruct _ = constructSettingsGtkMenuBarAccel
attrClear _ = clearSettingsGtkMenuBarAccel
#endif
getSettingsGtkMenuBarPopupDelay :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkMenuBarPopupDelay obj = liftIO $ getObjectPropertyInt32 obj "gtk-menu-bar-popup-delay"
setSettingsGtkMenuBarPopupDelay :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkMenuBarPopupDelay obj val = liftIO $ setObjectPropertyInt32 obj "gtk-menu-bar-popup-delay" val
constructSettingsGtkMenuBarPopupDelay :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkMenuBarPopupDelay val = constructObjectPropertyInt32 "gtk-menu-bar-popup-delay" val
#if ENABLE_OVERLOADING
data SettingsGtkMenuBarPopupDelayPropertyInfo
instance AttrInfo SettingsGtkMenuBarPopupDelayPropertyInfo where
type AttrAllowedOps SettingsGtkMenuBarPopupDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkMenuBarPopupDelayPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkMenuBarPopupDelayPropertyInfo = IsSettings
type AttrGetType SettingsGtkMenuBarPopupDelayPropertyInfo = Int32
type AttrLabel SettingsGtkMenuBarPopupDelayPropertyInfo = "gtk-menu-bar-popup-delay"
type AttrOrigin SettingsGtkMenuBarPopupDelayPropertyInfo = Settings
attrGet _ = getSettingsGtkMenuBarPopupDelay
attrSet _ = setSettingsGtkMenuBarPopupDelay
attrConstruct _ = constructSettingsGtkMenuBarPopupDelay
attrClear _ = undefined
#endif
getSettingsGtkMenuImages :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkMenuImages obj = liftIO $ getObjectPropertyBool obj "gtk-menu-images"
setSettingsGtkMenuImages :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkMenuImages obj val = liftIO $ setObjectPropertyBool obj "gtk-menu-images" val
constructSettingsGtkMenuImages :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkMenuImages val = constructObjectPropertyBool "gtk-menu-images" val
#if ENABLE_OVERLOADING
data SettingsGtkMenuImagesPropertyInfo
instance AttrInfo SettingsGtkMenuImagesPropertyInfo where
type AttrAllowedOps SettingsGtkMenuImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkMenuImagesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkMenuImagesPropertyInfo = IsSettings
type AttrGetType SettingsGtkMenuImagesPropertyInfo = Bool
type AttrLabel SettingsGtkMenuImagesPropertyInfo = "gtk-menu-images"
type AttrOrigin SettingsGtkMenuImagesPropertyInfo = Settings
attrGet _ = getSettingsGtkMenuImages
attrSet _ = setSettingsGtkMenuImages
attrConstruct _ = constructSettingsGtkMenuImages
attrClear _ = undefined
#endif
getSettingsGtkMenuPopdownDelay :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkMenuPopdownDelay obj = liftIO $ getObjectPropertyInt32 obj "gtk-menu-popdown-delay"
setSettingsGtkMenuPopdownDelay :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkMenuPopdownDelay obj val = liftIO $ setObjectPropertyInt32 obj "gtk-menu-popdown-delay" val
constructSettingsGtkMenuPopdownDelay :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkMenuPopdownDelay val = constructObjectPropertyInt32 "gtk-menu-popdown-delay" val
#if ENABLE_OVERLOADING
data SettingsGtkMenuPopdownDelayPropertyInfo
instance AttrInfo SettingsGtkMenuPopdownDelayPropertyInfo where
type AttrAllowedOps SettingsGtkMenuPopdownDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkMenuPopdownDelayPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkMenuPopdownDelayPropertyInfo = IsSettings
type AttrGetType SettingsGtkMenuPopdownDelayPropertyInfo = Int32
type AttrLabel SettingsGtkMenuPopdownDelayPropertyInfo = "gtk-menu-popdown-delay"
type AttrOrigin SettingsGtkMenuPopdownDelayPropertyInfo = Settings
attrGet _ = getSettingsGtkMenuPopdownDelay
attrSet _ = setSettingsGtkMenuPopdownDelay
attrConstruct _ = constructSettingsGtkMenuPopdownDelay
attrClear _ = undefined
#endif
getSettingsGtkMenuPopupDelay :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkMenuPopupDelay obj = liftIO $ getObjectPropertyInt32 obj "gtk-menu-popup-delay"
setSettingsGtkMenuPopupDelay :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkMenuPopupDelay obj val = liftIO $ setObjectPropertyInt32 obj "gtk-menu-popup-delay" val
constructSettingsGtkMenuPopupDelay :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkMenuPopupDelay val = constructObjectPropertyInt32 "gtk-menu-popup-delay" val
#if ENABLE_OVERLOADING
data SettingsGtkMenuPopupDelayPropertyInfo
instance AttrInfo SettingsGtkMenuPopupDelayPropertyInfo where
type AttrAllowedOps SettingsGtkMenuPopupDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkMenuPopupDelayPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkMenuPopupDelayPropertyInfo = IsSettings
type AttrGetType SettingsGtkMenuPopupDelayPropertyInfo = Int32
type AttrLabel SettingsGtkMenuPopupDelayPropertyInfo = "gtk-menu-popup-delay"
type AttrOrigin SettingsGtkMenuPopupDelayPropertyInfo = Settings
attrGet _ = getSettingsGtkMenuPopupDelay
attrSet _ = setSettingsGtkMenuPopupDelay
attrConstruct _ = constructSettingsGtkMenuPopupDelay
attrClear _ = undefined
#endif
getSettingsGtkModules :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkModules obj = liftIO $ getObjectPropertyString obj "gtk-modules"
setSettingsGtkModules :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkModules obj val = liftIO $ setObjectPropertyString obj "gtk-modules" (Just val)
constructSettingsGtkModules :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkModules val = constructObjectPropertyString "gtk-modules" (Just val)
clearSettingsGtkModules :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkModules obj = liftIO $ setObjectPropertyString obj "gtk-modules" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkModulesPropertyInfo
instance AttrInfo SettingsGtkModulesPropertyInfo where
type AttrAllowedOps SettingsGtkModulesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkModulesPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkModulesPropertyInfo = IsSettings
type AttrGetType SettingsGtkModulesPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkModulesPropertyInfo = "gtk-modules"
type AttrOrigin SettingsGtkModulesPropertyInfo = Settings
attrGet _ = getSettingsGtkModules
attrSet _ = setSettingsGtkModules
attrConstruct _ = constructSettingsGtkModules
attrClear _ = clearSettingsGtkModules
#endif
getSettingsGtkPrimaryButtonWarpsSlider :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkPrimaryButtonWarpsSlider obj = liftIO $ getObjectPropertyBool obj "gtk-primary-button-warps-slider"
setSettingsGtkPrimaryButtonWarpsSlider :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkPrimaryButtonWarpsSlider obj val = liftIO $ setObjectPropertyBool obj "gtk-primary-button-warps-slider" val
constructSettingsGtkPrimaryButtonWarpsSlider :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkPrimaryButtonWarpsSlider val = constructObjectPropertyBool "gtk-primary-button-warps-slider" val
#if ENABLE_OVERLOADING
data SettingsGtkPrimaryButtonWarpsSliderPropertyInfo
instance AttrInfo SettingsGtkPrimaryButtonWarpsSliderPropertyInfo where
type AttrAllowedOps SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = IsSettings
type AttrGetType SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = Bool
type AttrLabel SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = "gtk-primary-button-warps-slider"
type AttrOrigin SettingsGtkPrimaryButtonWarpsSliderPropertyInfo = Settings
attrGet _ = getSettingsGtkPrimaryButtonWarpsSlider
attrSet _ = setSettingsGtkPrimaryButtonWarpsSlider
attrConstruct _ = constructSettingsGtkPrimaryButtonWarpsSlider
attrClear _ = undefined
#endif
getSettingsGtkPrintBackends :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkPrintBackends obj = liftIO $ getObjectPropertyString obj "gtk-print-backends"
setSettingsGtkPrintBackends :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkPrintBackends obj val = liftIO $ setObjectPropertyString obj "gtk-print-backends" (Just val)
constructSettingsGtkPrintBackends :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkPrintBackends val = constructObjectPropertyString "gtk-print-backends" (Just val)
clearSettingsGtkPrintBackends :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkPrintBackends obj = liftIO $ setObjectPropertyString obj "gtk-print-backends" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkPrintBackendsPropertyInfo
instance AttrInfo SettingsGtkPrintBackendsPropertyInfo where
type AttrAllowedOps SettingsGtkPrintBackendsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkPrintBackendsPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkPrintBackendsPropertyInfo = IsSettings
type AttrGetType SettingsGtkPrintBackendsPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkPrintBackendsPropertyInfo = "gtk-print-backends"
type AttrOrigin SettingsGtkPrintBackendsPropertyInfo = Settings
attrGet _ = getSettingsGtkPrintBackends
attrSet _ = setSettingsGtkPrintBackends
attrConstruct _ = constructSettingsGtkPrintBackends
attrClear _ = clearSettingsGtkPrintBackends
#endif
getSettingsGtkPrintPreviewCommand :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkPrintPreviewCommand obj = liftIO $ getObjectPropertyString obj "gtk-print-preview-command"
setSettingsGtkPrintPreviewCommand :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkPrintPreviewCommand obj val = liftIO $ setObjectPropertyString obj "gtk-print-preview-command" (Just val)
constructSettingsGtkPrintPreviewCommand :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkPrintPreviewCommand val = constructObjectPropertyString "gtk-print-preview-command" (Just val)
clearSettingsGtkPrintPreviewCommand :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkPrintPreviewCommand obj = liftIO $ setObjectPropertyString obj "gtk-print-preview-command" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkPrintPreviewCommandPropertyInfo
instance AttrInfo SettingsGtkPrintPreviewCommandPropertyInfo where
type AttrAllowedOps SettingsGtkPrintPreviewCommandPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkPrintPreviewCommandPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkPrintPreviewCommandPropertyInfo = IsSettings
type AttrGetType SettingsGtkPrintPreviewCommandPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkPrintPreviewCommandPropertyInfo = "gtk-print-preview-command"
type AttrOrigin SettingsGtkPrintPreviewCommandPropertyInfo = Settings
attrGet _ = getSettingsGtkPrintPreviewCommand
attrSet _ = setSettingsGtkPrintPreviewCommand
attrConstruct _ = constructSettingsGtkPrintPreviewCommand
attrClear _ = clearSettingsGtkPrintPreviewCommand
#endif
getSettingsGtkRecentFilesEnabled :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkRecentFilesEnabled obj = liftIO $ getObjectPropertyBool obj "gtk-recent-files-enabled"
setSettingsGtkRecentFilesEnabled :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkRecentFilesEnabled obj val = liftIO $ setObjectPropertyBool obj "gtk-recent-files-enabled" val
constructSettingsGtkRecentFilesEnabled :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkRecentFilesEnabled val = constructObjectPropertyBool "gtk-recent-files-enabled" val
#if ENABLE_OVERLOADING
data SettingsGtkRecentFilesEnabledPropertyInfo
instance AttrInfo SettingsGtkRecentFilesEnabledPropertyInfo where
type AttrAllowedOps SettingsGtkRecentFilesEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkRecentFilesEnabledPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkRecentFilesEnabledPropertyInfo = IsSettings
type AttrGetType SettingsGtkRecentFilesEnabledPropertyInfo = Bool
type AttrLabel SettingsGtkRecentFilesEnabledPropertyInfo = "gtk-recent-files-enabled"
type AttrOrigin SettingsGtkRecentFilesEnabledPropertyInfo = Settings
attrGet _ = getSettingsGtkRecentFilesEnabled
attrSet _ = setSettingsGtkRecentFilesEnabled
attrConstruct _ = constructSettingsGtkRecentFilesEnabled
attrClear _ = undefined
#endif
getSettingsGtkRecentFilesLimit :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkRecentFilesLimit obj = liftIO $ getObjectPropertyInt32 obj "gtk-recent-files-limit"
setSettingsGtkRecentFilesLimit :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkRecentFilesLimit obj val = liftIO $ setObjectPropertyInt32 obj "gtk-recent-files-limit" val
constructSettingsGtkRecentFilesLimit :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkRecentFilesLimit val = constructObjectPropertyInt32 "gtk-recent-files-limit" val
#if ENABLE_OVERLOADING
data SettingsGtkRecentFilesLimitPropertyInfo
instance AttrInfo SettingsGtkRecentFilesLimitPropertyInfo where
type AttrAllowedOps SettingsGtkRecentFilesLimitPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkRecentFilesLimitPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkRecentFilesLimitPropertyInfo = IsSettings
type AttrGetType SettingsGtkRecentFilesLimitPropertyInfo = Int32
type AttrLabel SettingsGtkRecentFilesLimitPropertyInfo = "gtk-recent-files-limit"
type AttrOrigin SettingsGtkRecentFilesLimitPropertyInfo = Settings
attrGet _ = getSettingsGtkRecentFilesLimit
attrSet _ = setSettingsGtkRecentFilesLimit
attrConstruct _ = constructSettingsGtkRecentFilesLimit
attrClear _ = undefined
#endif
getSettingsGtkRecentFilesMaxAge :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkRecentFilesMaxAge obj = liftIO $ getObjectPropertyInt32 obj "gtk-recent-files-max-age"
setSettingsGtkRecentFilesMaxAge :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkRecentFilesMaxAge obj val = liftIO $ setObjectPropertyInt32 obj "gtk-recent-files-max-age" val
constructSettingsGtkRecentFilesMaxAge :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkRecentFilesMaxAge val = constructObjectPropertyInt32 "gtk-recent-files-max-age" val
#if ENABLE_OVERLOADING
data SettingsGtkRecentFilesMaxAgePropertyInfo
instance AttrInfo SettingsGtkRecentFilesMaxAgePropertyInfo where
type AttrAllowedOps SettingsGtkRecentFilesMaxAgePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkRecentFilesMaxAgePropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkRecentFilesMaxAgePropertyInfo = IsSettings
type AttrGetType SettingsGtkRecentFilesMaxAgePropertyInfo = Int32
type AttrLabel SettingsGtkRecentFilesMaxAgePropertyInfo = "gtk-recent-files-max-age"
type AttrOrigin SettingsGtkRecentFilesMaxAgePropertyInfo = Settings
attrGet _ = getSettingsGtkRecentFilesMaxAge
attrSet _ = setSettingsGtkRecentFilesMaxAge
attrConstruct _ = constructSettingsGtkRecentFilesMaxAge
attrClear _ = undefined
#endif
getSettingsGtkScrolledWindowPlacement :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.CornerType
getSettingsGtkScrolledWindowPlacement obj = liftIO $ getObjectPropertyEnum obj "gtk-scrolled-window-placement"
setSettingsGtkScrolledWindowPlacement :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.CornerType -> m ()
setSettingsGtkScrolledWindowPlacement obj val = liftIO $ setObjectPropertyEnum obj "gtk-scrolled-window-placement" val
constructSettingsGtkScrolledWindowPlacement :: (IsSettings o) => Gtk.Enums.CornerType -> IO (GValueConstruct o)
constructSettingsGtkScrolledWindowPlacement val = constructObjectPropertyEnum "gtk-scrolled-window-placement" val
#if ENABLE_OVERLOADING
data SettingsGtkScrolledWindowPlacementPropertyInfo
instance AttrInfo SettingsGtkScrolledWindowPlacementPropertyInfo where
type AttrAllowedOps SettingsGtkScrolledWindowPlacementPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkScrolledWindowPlacementPropertyInfo = (~) Gtk.Enums.CornerType
type AttrBaseTypeConstraint SettingsGtkScrolledWindowPlacementPropertyInfo = IsSettings
type AttrGetType SettingsGtkScrolledWindowPlacementPropertyInfo = Gtk.Enums.CornerType
type AttrLabel SettingsGtkScrolledWindowPlacementPropertyInfo = "gtk-scrolled-window-placement"
type AttrOrigin SettingsGtkScrolledWindowPlacementPropertyInfo = Settings
attrGet _ = getSettingsGtkScrolledWindowPlacement
attrSet _ = setSettingsGtkScrolledWindowPlacement
attrConstruct _ = constructSettingsGtkScrolledWindowPlacement
attrClear _ = undefined
#endif
getSettingsGtkShellShowsAppMenu :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkShellShowsAppMenu obj = liftIO $ getObjectPropertyBool obj "gtk-shell-shows-app-menu"
setSettingsGtkShellShowsAppMenu :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkShellShowsAppMenu obj val = liftIO $ setObjectPropertyBool obj "gtk-shell-shows-app-menu" val
constructSettingsGtkShellShowsAppMenu :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkShellShowsAppMenu val = constructObjectPropertyBool "gtk-shell-shows-app-menu" val
#if ENABLE_OVERLOADING
data SettingsGtkShellShowsAppMenuPropertyInfo
instance AttrInfo SettingsGtkShellShowsAppMenuPropertyInfo where
type AttrAllowedOps SettingsGtkShellShowsAppMenuPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkShellShowsAppMenuPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkShellShowsAppMenuPropertyInfo = IsSettings
type AttrGetType SettingsGtkShellShowsAppMenuPropertyInfo = Bool
type AttrLabel SettingsGtkShellShowsAppMenuPropertyInfo = "gtk-shell-shows-app-menu"
type AttrOrigin SettingsGtkShellShowsAppMenuPropertyInfo = Settings
attrGet _ = getSettingsGtkShellShowsAppMenu
attrSet _ = setSettingsGtkShellShowsAppMenu
attrConstruct _ = constructSettingsGtkShellShowsAppMenu
attrClear _ = undefined
#endif
getSettingsGtkShellShowsDesktop :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkShellShowsDesktop obj = liftIO $ getObjectPropertyBool obj "gtk-shell-shows-desktop"
setSettingsGtkShellShowsDesktop :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkShellShowsDesktop obj val = liftIO $ setObjectPropertyBool obj "gtk-shell-shows-desktop" val
constructSettingsGtkShellShowsDesktop :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkShellShowsDesktop val = constructObjectPropertyBool "gtk-shell-shows-desktop" val
#if ENABLE_OVERLOADING
data SettingsGtkShellShowsDesktopPropertyInfo
instance AttrInfo SettingsGtkShellShowsDesktopPropertyInfo where
type AttrAllowedOps SettingsGtkShellShowsDesktopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkShellShowsDesktopPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkShellShowsDesktopPropertyInfo = IsSettings
type AttrGetType SettingsGtkShellShowsDesktopPropertyInfo = Bool
type AttrLabel SettingsGtkShellShowsDesktopPropertyInfo = "gtk-shell-shows-desktop"
type AttrOrigin SettingsGtkShellShowsDesktopPropertyInfo = Settings
attrGet _ = getSettingsGtkShellShowsDesktop
attrSet _ = setSettingsGtkShellShowsDesktop
attrConstruct _ = constructSettingsGtkShellShowsDesktop
attrClear _ = undefined
#endif
getSettingsGtkShellShowsMenubar :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkShellShowsMenubar obj = liftIO $ getObjectPropertyBool obj "gtk-shell-shows-menubar"
setSettingsGtkShellShowsMenubar :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkShellShowsMenubar obj val = liftIO $ setObjectPropertyBool obj "gtk-shell-shows-menubar" val
constructSettingsGtkShellShowsMenubar :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkShellShowsMenubar val = constructObjectPropertyBool "gtk-shell-shows-menubar" val
#if ENABLE_OVERLOADING
data SettingsGtkShellShowsMenubarPropertyInfo
instance AttrInfo SettingsGtkShellShowsMenubarPropertyInfo where
type AttrAllowedOps SettingsGtkShellShowsMenubarPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkShellShowsMenubarPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkShellShowsMenubarPropertyInfo = IsSettings
type AttrGetType SettingsGtkShellShowsMenubarPropertyInfo = Bool
type AttrLabel SettingsGtkShellShowsMenubarPropertyInfo = "gtk-shell-shows-menubar"
type AttrOrigin SettingsGtkShellShowsMenubarPropertyInfo = Settings
attrGet _ = getSettingsGtkShellShowsMenubar
attrSet _ = setSettingsGtkShellShowsMenubar
attrConstruct _ = constructSettingsGtkShellShowsMenubar
attrClear _ = undefined
#endif
getSettingsGtkShowInputMethodMenu :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkShowInputMethodMenu obj = liftIO $ getObjectPropertyBool obj "gtk-show-input-method-menu"
setSettingsGtkShowInputMethodMenu :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkShowInputMethodMenu obj val = liftIO $ setObjectPropertyBool obj "gtk-show-input-method-menu" val
constructSettingsGtkShowInputMethodMenu :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkShowInputMethodMenu val = constructObjectPropertyBool "gtk-show-input-method-menu" val
#if ENABLE_OVERLOADING
data SettingsGtkShowInputMethodMenuPropertyInfo
instance AttrInfo SettingsGtkShowInputMethodMenuPropertyInfo where
type AttrAllowedOps SettingsGtkShowInputMethodMenuPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkShowInputMethodMenuPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkShowInputMethodMenuPropertyInfo = IsSettings
type AttrGetType SettingsGtkShowInputMethodMenuPropertyInfo = Bool
type AttrLabel SettingsGtkShowInputMethodMenuPropertyInfo = "gtk-show-input-method-menu"
type AttrOrigin SettingsGtkShowInputMethodMenuPropertyInfo = Settings
attrGet _ = getSettingsGtkShowInputMethodMenu
attrSet _ = setSettingsGtkShowInputMethodMenu
attrConstruct _ = constructSettingsGtkShowInputMethodMenu
attrClear _ = undefined
#endif
getSettingsGtkShowUnicodeMenu :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkShowUnicodeMenu obj = liftIO $ getObjectPropertyBool obj "gtk-show-unicode-menu"
setSettingsGtkShowUnicodeMenu :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkShowUnicodeMenu obj val = liftIO $ setObjectPropertyBool obj "gtk-show-unicode-menu" val
constructSettingsGtkShowUnicodeMenu :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkShowUnicodeMenu val = constructObjectPropertyBool "gtk-show-unicode-menu" val
#if ENABLE_OVERLOADING
data SettingsGtkShowUnicodeMenuPropertyInfo
instance AttrInfo SettingsGtkShowUnicodeMenuPropertyInfo where
type AttrAllowedOps SettingsGtkShowUnicodeMenuPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkShowUnicodeMenuPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkShowUnicodeMenuPropertyInfo = IsSettings
type AttrGetType SettingsGtkShowUnicodeMenuPropertyInfo = Bool
type AttrLabel SettingsGtkShowUnicodeMenuPropertyInfo = "gtk-show-unicode-menu"
type AttrOrigin SettingsGtkShowUnicodeMenuPropertyInfo = Settings
attrGet _ = getSettingsGtkShowUnicodeMenu
attrSet _ = setSettingsGtkShowUnicodeMenu
attrConstruct _ = constructSettingsGtkShowUnicodeMenu
attrClear _ = undefined
#endif
getSettingsGtkSoundThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkSoundThemeName obj = liftIO $ getObjectPropertyString obj "gtk-sound-theme-name"
setSettingsGtkSoundThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkSoundThemeName obj val = liftIO $ setObjectPropertyString obj "gtk-sound-theme-name" (Just val)
constructSettingsGtkSoundThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkSoundThemeName val = constructObjectPropertyString "gtk-sound-theme-name" (Just val)
clearSettingsGtkSoundThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkSoundThemeName obj = liftIO $ setObjectPropertyString obj "gtk-sound-theme-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkSoundThemeNamePropertyInfo
instance AttrInfo SettingsGtkSoundThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkSoundThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkSoundThemeNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkSoundThemeNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkSoundThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkSoundThemeNamePropertyInfo = "gtk-sound-theme-name"
type AttrOrigin SettingsGtkSoundThemeNamePropertyInfo = Settings
attrGet _ = getSettingsGtkSoundThemeName
attrSet _ = setSettingsGtkSoundThemeName
attrConstruct _ = constructSettingsGtkSoundThemeName
attrClear _ = clearSettingsGtkSoundThemeName
#endif
getSettingsGtkSplitCursor :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkSplitCursor obj = liftIO $ getObjectPropertyBool obj "gtk-split-cursor"
setSettingsGtkSplitCursor :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkSplitCursor obj val = liftIO $ setObjectPropertyBool obj "gtk-split-cursor" val
constructSettingsGtkSplitCursor :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkSplitCursor val = constructObjectPropertyBool "gtk-split-cursor" val
#if ENABLE_OVERLOADING
data SettingsGtkSplitCursorPropertyInfo
instance AttrInfo SettingsGtkSplitCursorPropertyInfo where
type AttrAllowedOps SettingsGtkSplitCursorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkSplitCursorPropertyInfo = (~) Bool
type AttrBaseTypeConstraint SettingsGtkSplitCursorPropertyInfo = IsSettings
type AttrGetType SettingsGtkSplitCursorPropertyInfo = Bool
type AttrLabel SettingsGtkSplitCursorPropertyInfo = "gtk-split-cursor"
type AttrOrigin SettingsGtkSplitCursorPropertyInfo = Settings
attrGet _ = getSettingsGtkSplitCursor
attrSet _ = setSettingsGtkSplitCursor
attrConstruct _ = constructSettingsGtkSplitCursor
attrClear _ = undefined
#endif
getSettingsGtkThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkThemeName obj = liftIO $ getObjectPropertyString obj "gtk-theme-name"
setSettingsGtkThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkThemeName obj val = liftIO $ setObjectPropertyString obj "gtk-theme-name" (Just val)
constructSettingsGtkThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkThemeName val = constructObjectPropertyString "gtk-theme-name" (Just val)
clearSettingsGtkThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkThemeName obj = liftIO $ setObjectPropertyString obj "gtk-theme-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkThemeNamePropertyInfo
instance AttrInfo SettingsGtkThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkThemeNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkThemeNamePropertyInfo = IsSettings
type AttrGetType SettingsGtkThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkThemeNamePropertyInfo = "gtk-theme-name"
type AttrOrigin SettingsGtkThemeNamePropertyInfo = Settings
attrGet _ = getSettingsGtkThemeName
attrSet _ = setSettingsGtkThemeName
attrConstruct _ = constructSettingsGtkThemeName
attrClear _ = clearSettingsGtkThemeName
#endif
getSettingsGtkTimeoutExpand :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkTimeoutExpand obj = liftIO $ getObjectPropertyInt32 obj "gtk-timeout-expand"
setSettingsGtkTimeoutExpand :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkTimeoutExpand obj val = liftIO $ setObjectPropertyInt32 obj "gtk-timeout-expand" val
constructSettingsGtkTimeoutExpand :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkTimeoutExpand val = constructObjectPropertyInt32 "gtk-timeout-expand" val
#if ENABLE_OVERLOADING
data SettingsGtkTimeoutExpandPropertyInfo
instance AttrInfo SettingsGtkTimeoutExpandPropertyInfo where
type AttrAllowedOps SettingsGtkTimeoutExpandPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkTimeoutExpandPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkTimeoutExpandPropertyInfo = IsSettings
type AttrGetType SettingsGtkTimeoutExpandPropertyInfo = Int32
type AttrLabel SettingsGtkTimeoutExpandPropertyInfo = "gtk-timeout-expand"
type AttrOrigin SettingsGtkTimeoutExpandPropertyInfo = Settings
attrGet _ = getSettingsGtkTimeoutExpand
attrSet _ = setSettingsGtkTimeoutExpand
attrConstruct _ = constructSettingsGtkTimeoutExpand
attrClear _ = undefined
#endif
getSettingsGtkTimeoutInitial :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkTimeoutInitial obj = liftIO $ getObjectPropertyInt32 obj "gtk-timeout-initial"
setSettingsGtkTimeoutInitial :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkTimeoutInitial obj val = liftIO $ setObjectPropertyInt32 obj "gtk-timeout-initial" val
constructSettingsGtkTimeoutInitial :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkTimeoutInitial val = constructObjectPropertyInt32 "gtk-timeout-initial" val
#if ENABLE_OVERLOADING
data SettingsGtkTimeoutInitialPropertyInfo
instance AttrInfo SettingsGtkTimeoutInitialPropertyInfo where
type AttrAllowedOps SettingsGtkTimeoutInitialPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkTimeoutInitialPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkTimeoutInitialPropertyInfo = IsSettings
type AttrGetType SettingsGtkTimeoutInitialPropertyInfo = Int32
type AttrLabel SettingsGtkTimeoutInitialPropertyInfo = "gtk-timeout-initial"
type AttrOrigin SettingsGtkTimeoutInitialPropertyInfo = Settings
attrGet _ = getSettingsGtkTimeoutInitial
attrSet _ = setSettingsGtkTimeoutInitial
attrConstruct _ = constructSettingsGtkTimeoutInitial
attrClear _ = undefined
#endif
getSettingsGtkTimeoutRepeat :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkTimeoutRepeat obj = liftIO $ getObjectPropertyInt32 obj "gtk-timeout-repeat"
setSettingsGtkTimeoutRepeat :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkTimeoutRepeat obj val = liftIO $ setObjectPropertyInt32 obj "gtk-timeout-repeat" val
constructSettingsGtkTimeoutRepeat :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkTimeoutRepeat val = constructObjectPropertyInt32 "gtk-timeout-repeat" val
#if ENABLE_OVERLOADING
data SettingsGtkTimeoutRepeatPropertyInfo
instance AttrInfo SettingsGtkTimeoutRepeatPropertyInfo where
type AttrAllowedOps SettingsGtkTimeoutRepeatPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint SettingsGtkTimeoutRepeatPropertyInfo = (~) Int32
type AttrBaseTypeConstraint SettingsGtkTimeoutRepeatPropertyInfo = IsSettings
type AttrGetType SettingsGtkTimeoutRepeatPropertyInfo = Int32
type AttrLabel SettingsGtkTimeoutRepeatPropertyInfo = "gtk-timeout-repeat"
type AttrOrigin SettingsGtkTimeoutRepeatPropertyInfo = Settings
attrGet _ = getSettingsGtkTimeoutRepeat
attrSet _ = setSettingsGtkTimeoutRepeat
attrConstruct _ = constructSettingsGtkTimeoutRepeat
attrClear _ = undefined
#endif
getSettingsGtkTitlebarDoubleClick :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkTitlebarDoubleClick obj = liftIO $ getObjectPropertyString obj "gtk-titlebar-double-click"
setSettingsGtkTitlebarDoubleClick :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkTitlebarDoubleClick obj val = liftIO $ setObjectPropertyString obj "gtk-titlebar-double-click" (Just val)
constructSettingsGtkTitlebarDoubleClick :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkTitlebarDoubleClick val = constructObjectPropertyString "gtk-titlebar-double-click" (Just val)
clearSettingsGtkTitlebarDoubleClick :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkTitlebarDoubleClick obj = liftIO $ setObjectPropertyString obj "gtk-titlebar-double-click" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkTitlebarDoubleClickPropertyInfo
instance AttrInfo SettingsGtkTitlebarDoubleClickPropertyInfo where
type AttrAllowedOps SettingsGtkTitlebarDoubleClickPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkTitlebarDoubleClickPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkTitlebarDoubleClickPropertyInfo = IsSettings
type AttrGetType SettingsGtkTitlebarDoubleClickPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkTitlebarDoubleClickPropertyInfo = "gtk-titlebar-double-click"
type AttrOrigin SettingsGtkTitlebarDoubleClickPropertyInfo = Settings
attrGet _ = getSettingsGtkTitlebarDoubleClick
attrSet _ = setSettingsGtkTitlebarDoubleClick
attrConstruct _ = constructSettingsGtkTitlebarDoubleClick
attrClear _ = clearSettingsGtkTitlebarDoubleClick
#endif
getSettingsGtkTitlebarMiddleClick :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkTitlebarMiddleClick obj = liftIO $ getObjectPropertyString obj "gtk-titlebar-middle-click"
setSettingsGtkTitlebarMiddleClick :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkTitlebarMiddleClick obj val = liftIO $ setObjectPropertyString obj "gtk-titlebar-middle-click" (Just val)
constructSettingsGtkTitlebarMiddleClick :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkTitlebarMiddleClick val = constructObjectPropertyString "gtk-titlebar-middle-click" (Just val)
clearSettingsGtkTitlebarMiddleClick :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkTitlebarMiddleClick obj = liftIO $ setObjectPropertyString obj "gtk-titlebar-middle-click" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkTitlebarMiddleClickPropertyInfo
instance AttrInfo SettingsGtkTitlebarMiddleClickPropertyInfo where
type AttrAllowedOps SettingsGtkTitlebarMiddleClickPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkTitlebarMiddleClickPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkTitlebarMiddleClickPropertyInfo = IsSettings
type AttrGetType SettingsGtkTitlebarMiddleClickPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkTitlebarMiddleClickPropertyInfo = "gtk-titlebar-middle-click"
type AttrOrigin SettingsGtkTitlebarMiddleClickPropertyInfo = Settings
attrGet _ = getSettingsGtkTitlebarMiddleClick
attrSet _ = setSettingsGtkTitlebarMiddleClick
attrConstruct _ = constructSettingsGtkTitlebarMiddleClick
attrClear _ = clearSettingsGtkTitlebarMiddleClick
#endif
getSettingsGtkTitlebarRightClick :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkTitlebarRightClick obj = liftIO $ getObjectPropertyString obj "gtk-titlebar-right-click"
setSettingsGtkTitlebarRightClick :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkTitlebarRightClick obj val = liftIO $ setObjectPropertyString obj "gtk-titlebar-right-click" (Just val)
constructSettingsGtkTitlebarRightClick :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkTitlebarRightClick val = constructObjectPropertyString "gtk-titlebar-right-click" (Just val)
clearSettingsGtkTitlebarRightClick :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkTitlebarRightClick obj = liftIO $ setObjectPropertyString obj "gtk-titlebar-right-click" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data SettingsGtkTitlebarRightClickPropertyInfo
instance AttrInfo SettingsGtkTitlebarRightClickPropertyInfo where
type AttrAllowedOps SettingsGtkTitlebarRightClickPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint SettingsGtkTitlebarRightClickPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint SettingsGtkTitlebarRightClickPropertyInfo = IsSettings
type AttrGetType SettingsGtkTitlebarRightClickPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkTitlebarRightClickPropertyInfo = "gtk-titlebar-right-click"
type AttrOrigin SettingsGtkTitlebarRightClickPropertyInfo = Settings
attrGet _ = getSettingsGtkTitlebarRightClick
attrSet _ = setSettingsGtkTitlebarRightClick
attrConstruct _ = constructSettingsGtkTitlebarRightClick
attrClear _ = clearSettingsGtkTitlebarRightClick
#endif
getSettingsGtkToolbarIconSize :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.IconSize
getSettingsGtkToolbarIconSize obj = liftIO $ getObjectPropertyEnum obj "gtk-toolbar-icon-size"
setSettingsGtkToolbarIconSize :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.IconSize -> m ()
setSettingsGtkToolbarIconSize obj val = liftIO $ setObjectPropertyEnum obj "gtk-toolbar-icon-size" val
constructSettingsGtkToolbarIconSize :: (IsSettings o<