{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.Settings
(
Settings(..) ,
IsSettings ,
toSettings ,
noSettings ,
#if defined(ENABLE_OVERLOADING)
ResolveSettingsMethod ,
#endif
settingsGetDefault ,
settingsGetForScreen ,
settingsInstallProperty ,
settingsInstallPropertyParser ,
#if defined(ENABLE_OVERLOADING)
SettingsResetPropertyMethodInfo ,
#endif
settingsResetProperty ,
#if defined(ENABLE_OVERLOADING)
SettingsSetDoublePropertyMethodInfo ,
#endif
settingsSetDoubleProperty ,
#if defined(ENABLE_OVERLOADING)
SettingsSetLongPropertyMethodInfo ,
#endif
settingsSetLongProperty ,
#if defined(ENABLE_OVERLOADING)
SettingsSetPropertyValueMethodInfo ,
#endif
settingsSetPropertyValue ,
#if defined(ENABLE_OVERLOADING)
SettingsSetStringPropertyMethodInfo ,
#endif
settingsSetStringProperty ,
#if defined(ENABLE_OVERLOADING)
SettingsColorHashPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
settingsColorHash ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkAlternativeButtonOrderPropertyInfo,
#endif
constructSettingsGtkAlternativeButtonOrder,
getSettingsGtkAlternativeButtonOrder ,
setSettingsGtkAlternativeButtonOrder ,
#if defined(ENABLE_OVERLOADING)
settingsGtkAlternativeButtonOrder ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkAlternativeSortArrowsPropertyInfo,
#endif
constructSettingsGtkAlternativeSortArrows,
getSettingsGtkAlternativeSortArrows ,
setSettingsGtkAlternativeSortArrows ,
#if defined(ENABLE_OVERLOADING)
settingsGtkAlternativeSortArrows ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkApplicationPreferDarkThemePropertyInfo,
#endif
constructSettingsGtkApplicationPreferDarkTheme,
getSettingsGtkApplicationPreferDarkTheme,
setSettingsGtkApplicationPreferDarkTheme,
#if defined(ENABLE_OVERLOADING)
settingsGtkApplicationPreferDarkTheme ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkAutoMnemonicsPropertyInfo ,
#endif
constructSettingsGtkAutoMnemonics ,
getSettingsGtkAutoMnemonics ,
setSettingsGtkAutoMnemonics ,
#if defined(ENABLE_OVERLOADING)
settingsGtkAutoMnemonics ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkButtonImagesPropertyInfo ,
#endif
constructSettingsGtkButtonImages ,
getSettingsGtkButtonImages ,
setSettingsGtkButtonImages ,
#if defined(ENABLE_OVERLOADING)
settingsGtkButtonImages ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCanChangeAccelsPropertyInfo ,
#endif
constructSettingsGtkCanChangeAccels ,
getSettingsGtkCanChangeAccels ,
setSettingsGtkCanChangeAccels ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCanChangeAccels ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkColorPalettePropertyInfo ,
#endif
clearSettingsGtkColorPalette ,
constructSettingsGtkColorPalette ,
getSettingsGtkColorPalette ,
setSettingsGtkColorPalette ,
#if defined(ENABLE_OVERLOADING)
settingsGtkColorPalette ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkColorSchemePropertyInfo ,
#endif
clearSettingsGtkColorScheme ,
constructSettingsGtkColorScheme ,
getSettingsGtkColorScheme ,
setSettingsGtkColorScheme ,
#if defined(ENABLE_OVERLOADING)
settingsGtkColorScheme ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCursorBlinkPropertyInfo ,
#endif
constructSettingsGtkCursorBlink ,
getSettingsGtkCursorBlink ,
setSettingsGtkCursorBlink ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCursorBlink ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCursorBlinkTimePropertyInfo ,
#endif
constructSettingsGtkCursorBlinkTime ,
getSettingsGtkCursorBlinkTime ,
setSettingsGtkCursorBlinkTime ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCursorBlinkTime ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCursorBlinkTimeoutPropertyInfo,
#endif
constructSettingsGtkCursorBlinkTimeout ,
getSettingsGtkCursorBlinkTimeout ,
setSettingsGtkCursorBlinkTimeout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCursorBlinkTimeout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCursorThemeNamePropertyInfo ,
#endif
clearSettingsGtkCursorThemeName ,
constructSettingsGtkCursorThemeName ,
getSettingsGtkCursorThemeName ,
setSettingsGtkCursorThemeName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCursorThemeName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkCursorThemeSizePropertyInfo ,
#endif
constructSettingsGtkCursorThemeSize ,
getSettingsGtkCursorThemeSize ,
setSettingsGtkCursorThemeSize ,
#if defined(ENABLE_OVERLOADING)
settingsGtkCursorThemeSize ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkDecorationLayoutPropertyInfo ,
#endif
clearSettingsGtkDecorationLayout ,
constructSettingsGtkDecorationLayout ,
getSettingsGtkDecorationLayout ,
setSettingsGtkDecorationLayout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkDecorationLayout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkDialogsUseHeaderPropertyInfo ,
#endif
constructSettingsGtkDialogsUseHeader ,
getSettingsGtkDialogsUseHeader ,
setSettingsGtkDialogsUseHeader ,
#if defined(ENABLE_OVERLOADING)
settingsGtkDialogsUseHeader ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkDndDragThresholdPropertyInfo ,
#endif
constructSettingsGtkDndDragThreshold ,
getSettingsGtkDndDragThreshold ,
setSettingsGtkDndDragThreshold ,
#if defined(ENABLE_OVERLOADING)
settingsGtkDndDragThreshold ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkDoubleClickDistancePropertyInfo,
#endif
constructSettingsGtkDoubleClickDistance ,
getSettingsGtkDoubleClickDistance ,
setSettingsGtkDoubleClickDistance ,
#if defined(ENABLE_OVERLOADING)
settingsGtkDoubleClickDistance ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkDoubleClickTimePropertyInfo ,
#endif
constructSettingsGtkDoubleClickTime ,
getSettingsGtkDoubleClickTime ,
setSettingsGtkDoubleClickTime ,
#if defined(ENABLE_OVERLOADING)
settingsGtkDoubleClickTime ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableAccelsPropertyInfo ,
#endif
constructSettingsGtkEnableAccels ,
getSettingsGtkEnableAccels ,
setSettingsGtkEnableAccels ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableAccels ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableAnimationsPropertyInfo ,
#endif
constructSettingsGtkEnableAnimations ,
getSettingsGtkEnableAnimations ,
setSettingsGtkEnableAnimations ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableAnimations ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableEventSoundsPropertyInfo,
#endif
constructSettingsGtkEnableEventSounds ,
getSettingsGtkEnableEventSounds ,
setSettingsGtkEnableEventSounds ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableEventSounds ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableInputFeedbackSoundsPropertyInfo,
#endif
constructSettingsGtkEnableInputFeedbackSounds,
getSettingsGtkEnableInputFeedbackSounds ,
setSettingsGtkEnableInputFeedbackSounds ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableInputFeedbackSounds ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableMnemonicsPropertyInfo ,
#endif
constructSettingsGtkEnableMnemonics ,
getSettingsGtkEnableMnemonics ,
setSettingsGtkEnableMnemonics ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableMnemonics ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnablePrimaryPastePropertyInfo,
#endif
constructSettingsGtkEnablePrimaryPaste ,
getSettingsGtkEnablePrimaryPaste ,
setSettingsGtkEnablePrimaryPaste ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnablePrimaryPaste ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEnableTooltipsPropertyInfo ,
#endif
constructSettingsGtkEnableTooltips ,
getSettingsGtkEnableTooltips ,
setSettingsGtkEnableTooltips ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEnableTooltips ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEntryPasswordHintTimeoutPropertyInfo,
#endif
constructSettingsGtkEntryPasswordHintTimeout,
getSettingsGtkEntryPasswordHintTimeout ,
setSettingsGtkEntryPasswordHintTimeout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEntryPasswordHintTimeout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkEntrySelectOnFocusPropertyInfo,
#endif
constructSettingsGtkEntrySelectOnFocus ,
getSettingsGtkEntrySelectOnFocus ,
setSettingsGtkEntrySelectOnFocus ,
#if defined(ENABLE_OVERLOADING)
settingsGtkEntrySelectOnFocus ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkErrorBellPropertyInfo ,
#endif
constructSettingsGtkErrorBell ,
getSettingsGtkErrorBell ,
setSettingsGtkErrorBell ,
#if defined(ENABLE_OVERLOADING)
settingsGtkErrorBell ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkFallbackIconThemePropertyInfo,
#endif
clearSettingsGtkFallbackIconTheme ,
constructSettingsGtkFallbackIconTheme ,
getSettingsGtkFallbackIconTheme ,
setSettingsGtkFallbackIconTheme ,
#if defined(ENABLE_OVERLOADING)
settingsGtkFallbackIconTheme ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkFileChooserBackendPropertyInfo,
#endif
clearSettingsGtkFileChooserBackend ,
constructSettingsGtkFileChooserBackend ,
getSettingsGtkFileChooserBackend ,
setSettingsGtkFileChooserBackend ,
#if defined(ENABLE_OVERLOADING)
settingsGtkFileChooserBackend ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkFontNamePropertyInfo ,
#endif
clearSettingsGtkFontName ,
constructSettingsGtkFontName ,
getSettingsGtkFontName ,
setSettingsGtkFontName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkFontName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkFontconfigTimestampPropertyInfo,
#endif
constructSettingsGtkFontconfigTimestamp ,
getSettingsGtkFontconfigTimestamp ,
setSettingsGtkFontconfigTimestamp ,
#if defined(ENABLE_OVERLOADING)
settingsGtkFontconfigTimestamp ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkIconSizesPropertyInfo ,
#endif
clearSettingsGtkIconSizes ,
constructSettingsGtkIconSizes ,
getSettingsGtkIconSizes ,
setSettingsGtkIconSizes ,
#if defined(ENABLE_OVERLOADING)
settingsGtkIconSizes ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkIconThemeNamePropertyInfo ,
#endif
clearSettingsGtkIconThemeName ,
constructSettingsGtkIconThemeName ,
getSettingsGtkIconThemeName ,
setSettingsGtkIconThemeName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkIconThemeName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkImModulePropertyInfo ,
#endif
clearSettingsGtkImModule ,
constructSettingsGtkImModule ,
getSettingsGtkImModule ,
setSettingsGtkImModule ,
#if defined(ENABLE_OVERLOADING)
settingsGtkImModule ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkImPreeditStylePropertyInfo ,
#endif
constructSettingsGtkImPreeditStyle ,
getSettingsGtkImPreeditStyle ,
setSettingsGtkImPreeditStyle ,
#if defined(ENABLE_OVERLOADING)
settingsGtkImPreeditStyle ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkImStatusStylePropertyInfo ,
#endif
constructSettingsGtkImStatusStyle ,
getSettingsGtkImStatusStyle ,
setSettingsGtkImStatusStyle ,
#if defined(ENABLE_OVERLOADING)
settingsGtkImStatusStyle ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkKeyThemeNamePropertyInfo ,
#endif
clearSettingsGtkKeyThemeName ,
constructSettingsGtkKeyThemeName ,
getSettingsGtkKeyThemeName ,
setSettingsGtkKeyThemeName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkKeyThemeName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkKeynavCursorOnlyPropertyInfo ,
#endif
constructSettingsGtkKeynavCursorOnly ,
getSettingsGtkKeynavCursorOnly ,
setSettingsGtkKeynavCursorOnly ,
#if defined(ENABLE_OVERLOADING)
settingsGtkKeynavCursorOnly ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkKeynavUseCaretPropertyInfo ,
#endif
constructSettingsGtkKeynavUseCaret ,
getSettingsGtkKeynavUseCaret ,
setSettingsGtkKeynavUseCaret ,
#if defined(ENABLE_OVERLOADING)
settingsGtkKeynavUseCaret ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkKeynavWrapAroundPropertyInfo ,
#endif
constructSettingsGtkKeynavWrapAround ,
getSettingsGtkKeynavWrapAround ,
setSettingsGtkKeynavWrapAround ,
#if defined(ENABLE_OVERLOADING)
settingsGtkKeynavWrapAround ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkLabelSelectOnFocusPropertyInfo,
#endif
constructSettingsGtkLabelSelectOnFocus ,
getSettingsGtkLabelSelectOnFocus ,
setSettingsGtkLabelSelectOnFocus ,
#if defined(ENABLE_OVERLOADING)
settingsGtkLabelSelectOnFocus ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkLongPressTimePropertyInfo ,
#endif
constructSettingsGtkLongPressTime ,
getSettingsGtkLongPressTime ,
setSettingsGtkLongPressTime ,
#if defined(ENABLE_OVERLOADING)
settingsGtkLongPressTime ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkMenuBarAccelPropertyInfo ,
#endif
clearSettingsGtkMenuBarAccel ,
constructSettingsGtkMenuBarAccel ,
getSettingsGtkMenuBarAccel ,
setSettingsGtkMenuBarAccel ,
#if defined(ENABLE_OVERLOADING)
settingsGtkMenuBarAccel ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkMenuBarPopupDelayPropertyInfo,
#endif
constructSettingsGtkMenuBarPopupDelay ,
getSettingsGtkMenuBarPopupDelay ,
setSettingsGtkMenuBarPopupDelay ,
#if defined(ENABLE_OVERLOADING)
settingsGtkMenuBarPopupDelay ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkMenuImagesPropertyInfo ,
#endif
constructSettingsGtkMenuImages ,
getSettingsGtkMenuImages ,
setSettingsGtkMenuImages ,
#if defined(ENABLE_OVERLOADING)
settingsGtkMenuImages ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkMenuPopdownDelayPropertyInfo ,
#endif
constructSettingsGtkMenuPopdownDelay ,
getSettingsGtkMenuPopdownDelay ,
setSettingsGtkMenuPopdownDelay ,
#if defined(ENABLE_OVERLOADING)
settingsGtkMenuPopdownDelay ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkMenuPopupDelayPropertyInfo ,
#endif
constructSettingsGtkMenuPopupDelay ,
getSettingsGtkMenuPopupDelay ,
setSettingsGtkMenuPopupDelay ,
#if defined(ENABLE_OVERLOADING)
settingsGtkMenuPopupDelay ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkModulesPropertyInfo ,
#endif
clearSettingsGtkModules ,
constructSettingsGtkModules ,
getSettingsGtkModules ,
setSettingsGtkModules ,
#if defined(ENABLE_OVERLOADING)
settingsGtkModules ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkOverlayScrollingPropertyInfo ,
#endif
constructSettingsGtkOverlayScrolling ,
getSettingsGtkOverlayScrolling ,
setSettingsGtkOverlayScrolling ,
#if defined(ENABLE_OVERLOADING)
settingsGtkOverlayScrolling ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkPrimaryButtonWarpsSliderPropertyInfo,
#endif
constructSettingsGtkPrimaryButtonWarpsSlider,
getSettingsGtkPrimaryButtonWarpsSlider ,
setSettingsGtkPrimaryButtonWarpsSlider ,
#if defined(ENABLE_OVERLOADING)
settingsGtkPrimaryButtonWarpsSlider ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkPrintBackendsPropertyInfo ,
#endif
clearSettingsGtkPrintBackends ,
constructSettingsGtkPrintBackends ,
getSettingsGtkPrintBackends ,
setSettingsGtkPrintBackends ,
#if defined(ENABLE_OVERLOADING)
settingsGtkPrintBackends ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkPrintPreviewCommandPropertyInfo,
#endif
clearSettingsGtkPrintPreviewCommand ,
constructSettingsGtkPrintPreviewCommand ,
getSettingsGtkPrintPreviewCommand ,
setSettingsGtkPrintPreviewCommand ,
#if defined(ENABLE_OVERLOADING)
settingsGtkPrintPreviewCommand ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkRecentFilesEnabledPropertyInfo,
#endif
constructSettingsGtkRecentFilesEnabled ,
getSettingsGtkRecentFilesEnabled ,
setSettingsGtkRecentFilesEnabled ,
#if defined(ENABLE_OVERLOADING)
settingsGtkRecentFilesEnabled ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkRecentFilesLimitPropertyInfo ,
#endif
constructSettingsGtkRecentFilesLimit ,
getSettingsGtkRecentFilesLimit ,
setSettingsGtkRecentFilesLimit ,
#if defined(ENABLE_OVERLOADING)
settingsGtkRecentFilesLimit ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkRecentFilesMaxAgePropertyInfo,
#endif
constructSettingsGtkRecentFilesMaxAge ,
getSettingsGtkRecentFilesMaxAge ,
setSettingsGtkRecentFilesMaxAge ,
#if defined(ENABLE_OVERLOADING)
settingsGtkRecentFilesMaxAge ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkScrolledWindowPlacementPropertyInfo,
#endif
constructSettingsGtkScrolledWindowPlacement,
getSettingsGtkScrolledWindowPlacement ,
setSettingsGtkScrolledWindowPlacement ,
#if defined(ENABLE_OVERLOADING)
settingsGtkScrolledWindowPlacement ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkShellShowsAppMenuPropertyInfo,
#endif
constructSettingsGtkShellShowsAppMenu ,
getSettingsGtkShellShowsAppMenu ,
setSettingsGtkShellShowsAppMenu ,
#if defined(ENABLE_OVERLOADING)
settingsGtkShellShowsAppMenu ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkShellShowsDesktopPropertyInfo,
#endif
constructSettingsGtkShellShowsDesktop ,
getSettingsGtkShellShowsDesktop ,
setSettingsGtkShellShowsDesktop ,
#if defined(ENABLE_OVERLOADING)
settingsGtkShellShowsDesktop ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkShellShowsMenubarPropertyInfo,
#endif
constructSettingsGtkShellShowsMenubar ,
getSettingsGtkShellShowsMenubar ,
setSettingsGtkShellShowsMenubar ,
#if defined(ENABLE_OVERLOADING)
settingsGtkShellShowsMenubar ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkShowInputMethodMenuPropertyInfo,
#endif
constructSettingsGtkShowInputMethodMenu ,
getSettingsGtkShowInputMethodMenu ,
setSettingsGtkShowInputMethodMenu ,
#if defined(ENABLE_OVERLOADING)
settingsGtkShowInputMethodMenu ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkShowUnicodeMenuPropertyInfo ,
#endif
constructSettingsGtkShowUnicodeMenu ,
getSettingsGtkShowUnicodeMenu ,
setSettingsGtkShowUnicodeMenu ,
#if defined(ENABLE_OVERLOADING)
settingsGtkShowUnicodeMenu ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkSoundThemeNamePropertyInfo ,
#endif
clearSettingsGtkSoundThemeName ,
constructSettingsGtkSoundThemeName ,
getSettingsGtkSoundThemeName ,
setSettingsGtkSoundThemeName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkSoundThemeName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkSplitCursorPropertyInfo ,
#endif
constructSettingsGtkSplitCursor ,
getSettingsGtkSplitCursor ,
setSettingsGtkSplitCursor ,
#if defined(ENABLE_OVERLOADING)
settingsGtkSplitCursor ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkThemeNamePropertyInfo ,
#endif
clearSettingsGtkThemeName ,
constructSettingsGtkThemeName ,
getSettingsGtkThemeName ,
setSettingsGtkThemeName ,
#if defined(ENABLE_OVERLOADING)
settingsGtkThemeName ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTimeoutExpandPropertyInfo ,
#endif
constructSettingsGtkTimeoutExpand ,
getSettingsGtkTimeoutExpand ,
setSettingsGtkTimeoutExpand ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTimeoutExpand ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTimeoutInitialPropertyInfo ,
#endif
constructSettingsGtkTimeoutInitial ,
getSettingsGtkTimeoutInitial ,
setSettingsGtkTimeoutInitial ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTimeoutInitial ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTimeoutRepeatPropertyInfo ,
#endif
constructSettingsGtkTimeoutRepeat ,
getSettingsGtkTimeoutRepeat ,
setSettingsGtkTimeoutRepeat ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTimeoutRepeat ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTitlebarDoubleClickPropertyInfo,
#endif
clearSettingsGtkTitlebarDoubleClick ,
constructSettingsGtkTitlebarDoubleClick ,
getSettingsGtkTitlebarDoubleClick ,
setSettingsGtkTitlebarDoubleClick ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTitlebarDoubleClick ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTitlebarMiddleClickPropertyInfo,
#endif
clearSettingsGtkTitlebarMiddleClick ,
constructSettingsGtkTitlebarMiddleClick ,
getSettingsGtkTitlebarMiddleClick ,
setSettingsGtkTitlebarMiddleClick ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTitlebarMiddleClick ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTitlebarRightClickPropertyInfo,
#endif
clearSettingsGtkTitlebarRightClick ,
constructSettingsGtkTitlebarRightClick ,
getSettingsGtkTitlebarRightClick ,
setSettingsGtkTitlebarRightClick ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTitlebarRightClick ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkToolbarIconSizePropertyInfo ,
#endif
constructSettingsGtkToolbarIconSize ,
getSettingsGtkToolbarIconSize ,
setSettingsGtkToolbarIconSize ,
#if defined(ENABLE_OVERLOADING)
settingsGtkToolbarIconSize ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkToolbarStylePropertyInfo ,
#endif
constructSettingsGtkToolbarStyle ,
getSettingsGtkToolbarStyle ,
setSettingsGtkToolbarStyle ,
#if defined(ENABLE_OVERLOADING)
settingsGtkToolbarStyle ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTooltipBrowseModeTimeoutPropertyInfo,
#endif
constructSettingsGtkTooltipBrowseModeTimeout,
getSettingsGtkTooltipBrowseModeTimeout ,
setSettingsGtkTooltipBrowseModeTimeout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTooltipBrowseModeTimeout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTooltipBrowseTimeoutPropertyInfo,
#endif
constructSettingsGtkTooltipBrowseTimeout,
getSettingsGtkTooltipBrowseTimeout ,
setSettingsGtkTooltipBrowseTimeout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTooltipBrowseTimeout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTooltipTimeoutPropertyInfo ,
#endif
constructSettingsGtkTooltipTimeout ,
getSettingsGtkTooltipTimeout ,
setSettingsGtkTooltipTimeout ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTooltipTimeout ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkTouchscreenModePropertyInfo ,
#endif
constructSettingsGtkTouchscreenMode ,
getSettingsGtkTouchscreenMode ,
setSettingsGtkTouchscreenMode ,
#if defined(ENABLE_OVERLOADING)
settingsGtkTouchscreenMode ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkVisibleFocusPropertyInfo ,
#endif
constructSettingsGtkVisibleFocus ,
getSettingsGtkVisibleFocus ,
setSettingsGtkVisibleFocus ,
#if defined(ENABLE_OVERLOADING)
settingsGtkVisibleFocus ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkXftAntialiasPropertyInfo ,
#endif
constructSettingsGtkXftAntialias ,
getSettingsGtkXftAntialias ,
setSettingsGtkXftAntialias ,
#if defined(ENABLE_OVERLOADING)
settingsGtkXftAntialias ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkXftDpiPropertyInfo ,
#endif
constructSettingsGtkXftDpi ,
getSettingsGtkXftDpi ,
setSettingsGtkXftDpi ,
#if defined(ENABLE_OVERLOADING)
settingsGtkXftDpi ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkXftHintingPropertyInfo ,
#endif
constructSettingsGtkXftHinting ,
getSettingsGtkXftHinting ,
setSettingsGtkXftHinting ,
#if defined(ENABLE_OVERLOADING)
settingsGtkXftHinting ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkXftHintstylePropertyInfo ,
#endif
clearSettingsGtkXftHintstyle ,
constructSettingsGtkXftHintstyle ,
getSettingsGtkXftHintstyle ,
setSettingsGtkXftHintstyle ,
#if defined(ENABLE_OVERLOADING)
settingsGtkXftHintstyle ,
#endif
#if defined(ENABLE_OVERLOADING)
SettingsGtkXftRgbaPropertyInfo ,
#endif
clearSettingsGtkXftRgba ,
constructSettingsGtkXftRgba ,
getSettingsGtkXftRgba ,
setSettingsGtkXftRgba ,
#if defined(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.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.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)
deriving (Settings -> Settings -> Bool
(Settings -> Settings -> Bool)
-> (Settings -> Settings -> Bool) -> Eq Settings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Settings -> Settings -> Bool
$c/= :: Settings -> Settings -> Bool
== :: Settings -> Settings -> Bool
$c== :: Settings -> Settings -> Bool
Eq)
foreign import ccall "gtk_settings_get_type"
c_gtk_settings_get_type :: IO GType
instance GObject Settings where
gobjectType :: IO GType
gobjectType = IO GType
c_gtk_settings_get_type
instance B.GValue.IsGValue Settings where
toGValue :: Settings -> IO GValue
toGValue o :: Settings
o = do
GType
gtype <- IO GType
c_gtk_settings_get_type
Settings -> (Ptr Settings -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Settings
o (GType
-> (GValue -> Ptr Settings -> IO ()) -> Ptr Settings -> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr Settings -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO Settings
fromGValue gv :: GValue
gv = do
Ptr Settings
ptr <- GValue -> IO (Ptr Settings)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr Settings)
(ManagedPtr Settings -> Settings) -> Ptr Settings -> IO Settings
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Settings -> Settings
Settings Ptr Settings
ptr
class (GObject o, O.IsDescendantOf Settings o) => IsSettings o
instance (GObject o, O.IsDescendantOf Settings o) => IsSettings o
instance O.HasParentTypes Settings
type instance O.ParentTypes Settings = '[GObject.Object.Object, Gtk.StyleProvider.StyleProvider]
toSettings :: (MonadIO m, IsSettings o) => o -> m Settings
toSettings :: o -> m Settings
toSettings = IO Settings -> m Settings
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Settings -> m Settings)
-> (o -> IO Settings) -> o -> m Settings
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Settings -> Settings) -> o -> IO Settings
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr Settings -> Settings
Settings
noSettings :: Maybe Settings
noSettings :: Maybe Settings
noSettings = Maybe Settings
forall a. Maybe a
Nothing
#if defined(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 "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
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) => OL.IsLabel t (Settings -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
#if defined(ENABLE_OVERLOADING)
data SettingsColorHashPropertyInfo
instance AttrInfo SettingsColorHashPropertyInfo where
type AttrAllowedOps SettingsColorHashPropertyInfo = '[]
type AttrSetTypeConstraint SettingsColorHashPropertyInfo = (~) ()
type AttrTransferTypeConstraint SettingsColorHashPropertyInfo = (~) ()
type AttrTransferType SettingsColorHashPropertyInfo = ()
type AttrBaseTypeConstraint SettingsColorHashPropertyInfo = (~) ()
type AttrGetType SettingsColorHashPropertyInfo = ()
type AttrLabel SettingsColorHashPropertyInfo = ""
type AttrOrigin SettingsColorHashPropertyInfo = Settings
attrGet = undefined
attrSet = undefined
attrConstruct = undefined
attrClear = undefined
attrTransfer = undefined
#endif
getSettingsGtkAlternativeButtonOrder :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAlternativeButtonOrder :: o -> m Bool
getSettingsGtkAlternativeButtonOrder obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-alternative-button-order"
setSettingsGtkAlternativeButtonOrder :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAlternativeButtonOrder :: o -> Bool -> m ()
setSettingsGtkAlternativeButtonOrder obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-alternative-button-order" Bool
val
constructSettingsGtkAlternativeButtonOrder :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeButtonOrder :: Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeButtonOrder val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-alternative-button-order" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkAlternativeButtonOrderPropertyInfo
instance AttrInfo SettingsGtkAlternativeButtonOrderPropertyInfo where
type AttrAllowedOps SettingsGtkAlternativeButtonOrderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkAlternativeButtonOrderPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkAlternativeButtonOrderPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkAlternativeButtonOrderPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkAlternativeButtonOrderPropertyInfo = Bool
type AttrGetType SettingsGtkAlternativeButtonOrderPropertyInfo = Bool
type AttrLabel SettingsGtkAlternativeButtonOrderPropertyInfo = "gtk-alternative-button-order"
type AttrOrigin SettingsGtkAlternativeButtonOrderPropertyInfo = Settings
attrGet = getSettingsGtkAlternativeButtonOrder
attrSet = setSettingsGtkAlternativeButtonOrder
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkAlternativeButtonOrder
attrClear = undefined
#endif
getSettingsGtkAlternativeSortArrows :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAlternativeSortArrows :: o -> m Bool
getSettingsGtkAlternativeSortArrows obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-alternative-sort-arrows"
setSettingsGtkAlternativeSortArrows :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAlternativeSortArrows :: o -> Bool -> m ()
setSettingsGtkAlternativeSortArrows obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-alternative-sort-arrows" Bool
val
constructSettingsGtkAlternativeSortArrows :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeSortArrows :: Bool -> IO (GValueConstruct o)
constructSettingsGtkAlternativeSortArrows val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-alternative-sort-arrows" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkAlternativeSortArrowsPropertyInfo
instance AttrInfo SettingsGtkAlternativeSortArrowsPropertyInfo where
type AttrAllowedOps SettingsGtkAlternativeSortArrowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkAlternativeSortArrowsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkAlternativeSortArrowsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkAlternativeSortArrowsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkAlternativeSortArrowsPropertyInfo = Bool
type AttrGetType SettingsGtkAlternativeSortArrowsPropertyInfo = Bool
type AttrLabel SettingsGtkAlternativeSortArrowsPropertyInfo = "gtk-alternative-sort-arrows"
type AttrOrigin SettingsGtkAlternativeSortArrowsPropertyInfo = Settings
attrGet = getSettingsGtkAlternativeSortArrows
attrSet = setSettingsGtkAlternativeSortArrows
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkAlternativeSortArrows
attrClear = undefined
#endif
getSettingsGtkApplicationPreferDarkTheme :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkApplicationPreferDarkTheme :: o -> m Bool
getSettingsGtkApplicationPreferDarkTheme obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-application-prefer-dark-theme"
setSettingsGtkApplicationPreferDarkTheme :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkApplicationPreferDarkTheme :: o -> Bool -> m ()
setSettingsGtkApplicationPreferDarkTheme obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-application-prefer-dark-theme" Bool
val
constructSettingsGtkApplicationPreferDarkTheme :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkApplicationPreferDarkTheme :: Bool -> IO (GValueConstruct o)
constructSettingsGtkApplicationPreferDarkTheme val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-application-prefer-dark-theme" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkApplicationPreferDarkThemePropertyInfo
instance AttrInfo SettingsGtkApplicationPreferDarkThemePropertyInfo where
type AttrAllowedOps SettingsGtkApplicationPreferDarkThemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkApplicationPreferDarkThemePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkApplicationPreferDarkThemePropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkApplicationPreferDarkThemePropertyInfo = (~) Bool
type AttrTransferType SettingsGtkApplicationPreferDarkThemePropertyInfo = Bool
type AttrGetType SettingsGtkApplicationPreferDarkThemePropertyInfo = Bool
type AttrLabel SettingsGtkApplicationPreferDarkThemePropertyInfo = "gtk-application-prefer-dark-theme"
type AttrOrigin SettingsGtkApplicationPreferDarkThemePropertyInfo = Settings
attrGet = getSettingsGtkApplicationPreferDarkTheme
attrSet = setSettingsGtkApplicationPreferDarkTheme
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkApplicationPreferDarkTheme
attrClear = undefined
#endif
getSettingsGtkAutoMnemonics :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkAutoMnemonics :: o -> m Bool
getSettingsGtkAutoMnemonics obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-auto-mnemonics"
setSettingsGtkAutoMnemonics :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkAutoMnemonics :: o -> Bool -> m ()
setSettingsGtkAutoMnemonics obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-auto-mnemonics" Bool
val
constructSettingsGtkAutoMnemonics :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkAutoMnemonics :: Bool -> IO (GValueConstruct o)
constructSettingsGtkAutoMnemonics val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-auto-mnemonics" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkAutoMnemonicsPropertyInfo
instance AttrInfo SettingsGtkAutoMnemonicsPropertyInfo where
type AttrAllowedOps SettingsGtkAutoMnemonicsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkAutoMnemonicsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkAutoMnemonicsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkAutoMnemonicsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkAutoMnemonicsPropertyInfo = Bool
type AttrGetType SettingsGtkAutoMnemonicsPropertyInfo = Bool
type AttrLabel SettingsGtkAutoMnemonicsPropertyInfo = "gtk-auto-mnemonics"
type AttrOrigin SettingsGtkAutoMnemonicsPropertyInfo = Settings
attrGet = getSettingsGtkAutoMnemonics
attrSet = setSettingsGtkAutoMnemonics
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkAutoMnemonics
attrClear = undefined
#endif
getSettingsGtkButtonImages :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkButtonImages :: o -> m Bool
getSettingsGtkButtonImages obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-button-images"
setSettingsGtkButtonImages :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkButtonImages :: o -> Bool -> m ()
setSettingsGtkButtonImages obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-button-images" Bool
val
constructSettingsGtkButtonImages :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkButtonImages :: Bool -> IO (GValueConstruct o)
constructSettingsGtkButtonImages val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-button-images" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkButtonImagesPropertyInfo
instance AttrInfo SettingsGtkButtonImagesPropertyInfo where
type AttrAllowedOps SettingsGtkButtonImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkButtonImagesPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkButtonImagesPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkButtonImagesPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkButtonImagesPropertyInfo = Bool
type AttrGetType SettingsGtkButtonImagesPropertyInfo = Bool
type AttrLabel SettingsGtkButtonImagesPropertyInfo = "gtk-button-images"
type AttrOrigin SettingsGtkButtonImagesPropertyInfo = Settings
attrGet = getSettingsGtkButtonImages
attrSet = setSettingsGtkButtonImages
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkButtonImages
attrClear = undefined
#endif
getSettingsGtkCanChangeAccels :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkCanChangeAccels :: o -> m Bool
getSettingsGtkCanChangeAccels obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-can-change-accels"
setSettingsGtkCanChangeAccels :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkCanChangeAccels :: o -> Bool -> m ()
setSettingsGtkCanChangeAccels obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-can-change-accels" Bool
val
constructSettingsGtkCanChangeAccels :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkCanChangeAccels :: Bool -> IO (GValueConstruct o)
constructSettingsGtkCanChangeAccels val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-can-change-accels" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCanChangeAccelsPropertyInfo
instance AttrInfo SettingsGtkCanChangeAccelsPropertyInfo where
type AttrAllowedOps SettingsGtkCanChangeAccelsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkCanChangeAccelsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCanChangeAccelsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkCanChangeAccelsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkCanChangeAccelsPropertyInfo = Bool
type AttrGetType SettingsGtkCanChangeAccelsPropertyInfo = Bool
type AttrLabel SettingsGtkCanChangeAccelsPropertyInfo = "gtk-can-change-accels"
type AttrOrigin SettingsGtkCanChangeAccelsPropertyInfo = Settings
attrGet = getSettingsGtkCanChangeAccels
attrSet = setSettingsGtkCanChangeAccels
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCanChangeAccels
attrClear = undefined
#endif
getSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkColorPalette :: o -> m (Maybe Text)
getSettingsGtkColorPalette obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-color-palette"
setSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkColorPalette :: o -> Text -> m ()
setSettingsGtkColorPalette obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-color-palette" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkColorPalette :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkColorPalette :: Text -> IO (GValueConstruct o)
constructSettingsGtkColorPalette val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-color-palette" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkColorPalette :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkColorPalette :: o -> m ()
clearSettingsGtkColorPalette obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-color-palette" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkColorPalettePropertyInfo
instance AttrInfo SettingsGtkColorPalettePropertyInfo where
type AttrAllowedOps SettingsGtkColorPalettePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkColorPalettePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkColorPalettePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkColorPalettePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkColorPalettePropertyInfo = T.Text
type AttrGetType SettingsGtkColorPalettePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkColorPalettePropertyInfo = "gtk-color-palette"
type AttrOrigin SettingsGtkColorPalettePropertyInfo = Settings
attrGet = getSettingsGtkColorPalette
attrSet = setSettingsGtkColorPalette
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkColorPalette
attrClear = clearSettingsGtkColorPalette
#endif
getSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkColorScheme :: o -> m (Maybe Text)
getSettingsGtkColorScheme obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-color-scheme"
setSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkColorScheme :: o -> Text -> m ()
setSettingsGtkColorScheme obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-color-scheme" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkColorScheme :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkColorScheme :: Text -> IO (GValueConstruct o)
constructSettingsGtkColorScheme val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-color-scheme" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkColorScheme :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkColorScheme :: o -> m ()
clearSettingsGtkColorScheme obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-color-scheme" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkColorSchemePropertyInfo
instance AttrInfo SettingsGtkColorSchemePropertyInfo where
type AttrAllowedOps SettingsGtkColorSchemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkColorSchemePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkColorSchemePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkColorSchemePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkColorSchemePropertyInfo = T.Text
type AttrGetType SettingsGtkColorSchemePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkColorSchemePropertyInfo = "gtk-color-scheme"
type AttrOrigin SettingsGtkColorSchemePropertyInfo = Settings
attrGet = getSettingsGtkColorScheme
attrSet = setSettingsGtkColorScheme
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkColorScheme
attrClear = clearSettingsGtkColorScheme
#endif
getSettingsGtkCursorBlink :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkCursorBlink :: o -> m Bool
getSettingsGtkCursorBlink obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-cursor-blink"
setSettingsGtkCursorBlink :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkCursorBlink :: o -> Bool -> m ()
setSettingsGtkCursorBlink obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-cursor-blink" Bool
val
constructSettingsGtkCursorBlink :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkCursorBlink :: Bool -> IO (GValueConstruct o)
constructSettingsGtkCursorBlink val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-cursor-blink" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCursorBlinkPropertyInfo
instance AttrInfo SettingsGtkCursorBlinkPropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkCursorBlinkPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCursorBlinkPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkCursorBlinkPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkCursorBlinkPropertyInfo = Bool
type AttrGetType SettingsGtkCursorBlinkPropertyInfo = Bool
type AttrLabel SettingsGtkCursorBlinkPropertyInfo = "gtk-cursor-blink"
type AttrOrigin SettingsGtkCursorBlinkPropertyInfo = Settings
attrGet = getSettingsGtkCursorBlink
attrSet = setSettingsGtkCursorBlink
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCursorBlink
attrClear = undefined
#endif
getSettingsGtkCursorBlinkTime :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorBlinkTime :: o -> m Int32
getSettingsGtkCursorBlinkTime obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-cursor-blink-time"
setSettingsGtkCursorBlinkTime :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorBlinkTime :: o -> Int32 -> m ()
setSettingsGtkCursorBlinkTime obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-cursor-blink-time" Int32
val
constructSettingsGtkCursorBlinkTime :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTime :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTime val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-cursor-blink-time" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCursorBlinkTimePropertyInfo
instance AttrInfo SettingsGtkCursorBlinkTimePropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkCursorBlinkTimePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCursorBlinkTimePropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkCursorBlinkTimePropertyInfo = (~) Int32
type AttrTransferType SettingsGtkCursorBlinkTimePropertyInfo = Int32
type AttrGetType SettingsGtkCursorBlinkTimePropertyInfo = Int32
type AttrLabel SettingsGtkCursorBlinkTimePropertyInfo = "gtk-cursor-blink-time"
type AttrOrigin SettingsGtkCursorBlinkTimePropertyInfo = Settings
attrGet = getSettingsGtkCursorBlinkTime
attrSet = setSettingsGtkCursorBlinkTime
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCursorBlinkTime
attrClear = undefined
#endif
getSettingsGtkCursorBlinkTimeout :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorBlinkTimeout :: o -> m Int32
getSettingsGtkCursorBlinkTimeout obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-cursor-blink-timeout"
setSettingsGtkCursorBlinkTimeout :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorBlinkTimeout :: o -> Int32 -> m ()
setSettingsGtkCursorBlinkTimeout obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-cursor-blink-timeout" Int32
val
constructSettingsGtkCursorBlinkTimeout :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTimeout :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorBlinkTimeout val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-cursor-blink-timeout" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCursorBlinkTimeoutPropertyInfo
instance AttrInfo SettingsGtkCursorBlinkTimeoutPropertyInfo where
type AttrAllowedOps SettingsGtkCursorBlinkTimeoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkCursorBlinkTimeoutPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCursorBlinkTimeoutPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkCursorBlinkTimeoutPropertyInfo = (~) Int32
type AttrTransferType SettingsGtkCursorBlinkTimeoutPropertyInfo = Int32
type AttrGetType SettingsGtkCursorBlinkTimeoutPropertyInfo = Int32
type AttrLabel SettingsGtkCursorBlinkTimeoutPropertyInfo = "gtk-cursor-blink-timeout"
type AttrOrigin SettingsGtkCursorBlinkTimeoutPropertyInfo = Settings
attrGet = getSettingsGtkCursorBlinkTimeout
attrSet = setSettingsGtkCursorBlinkTimeout
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCursorBlinkTimeout
attrClear = undefined
#endif
getSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkCursorThemeName :: o -> m (Maybe Text)
getSettingsGtkCursorThemeName obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-cursor-theme-name"
setSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkCursorThemeName :: o -> Text -> m ()
setSettingsGtkCursorThemeName obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-cursor-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkCursorThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeName :: Text -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeName val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-cursor-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkCursorThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkCursorThemeName :: o -> m ()
clearSettingsGtkCursorThemeName obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-cursor-theme-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCursorThemeNamePropertyInfo
instance AttrInfo SettingsGtkCursorThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkCursorThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkCursorThemeNamePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCursorThemeNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkCursorThemeNamePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkCursorThemeNamePropertyInfo = T.Text
type AttrGetType SettingsGtkCursorThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkCursorThemeNamePropertyInfo = "gtk-cursor-theme-name"
type AttrOrigin SettingsGtkCursorThemeNamePropertyInfo = Settings
attrGet = getSettingsGtkCursorThemeName
attrSet = setSettingsGtkCursorThemeName
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCursorThemeName
attrClear = clearSettingsGtkCursorThemeName
#endif
getSettingsGtkCursorThemeSize :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkCursorThemeSize :: o -> m Int32
getSettingsGtkCursorThemeSize obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-cursor-theme-size"
setSettingsGtkCursorThemeSize :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkCursorThemeSize :: o -> Int32 -> m ()
setSettingsGtkCursorThemeSize obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-cursor-theme-size" Int32
val
constructSettingsGtkCursorThemeSize :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeSize :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkCursorThemeSize val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-cursor-theme-size" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkCursorThemeSizePropertyInfo
instance AttrInfo SettingsGtkCursorThemeSizePropertyInfo where
type AttrAllowedOps SettingsGtkCursorThemeSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkCursorThemeSizePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkCursorThemeSizePropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkCursorThemeSizePropertyInfo = (~) Int32
type AttrTransferType SettingsGtkCursorThemeSizePropertyInfo = Int32
type AttrGetType SettingsGtkCursorThemeSizePropertyInfo = Int32
type AttrLabel SettingsGtkCursorThemeSizePropertyInfo = "gtk-cursor-theme-size"
type AttrOrigin SettingsGtkCursorThemeSizePropertyInfo = Settings
attrGet = getSettingsGtkCursorThemeSize
attrSet = setSettingsGtkCursorThemeSize
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkCursorThemeSize
attrClear = undefined
#endif
getSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkDecorationLayout :: o -> m (Maybe Text)
getSettingsGtkDecorationLayout obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-decoration-layout"
setSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkDecorationLayout :: o -> Text -> m ()
setSettingsGtkDecorationLayout obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-decoration-layout" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkDecorationLayout :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkDecorationLayout :: Text -> IO (GValueConstruct o)
constructSettingsGtkDecorationLayout val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-decoration-layout" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkDecorationLayout :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkDecorationLayout :: o -> m ()
clearSettingsGtkDecorationLayout obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-decoration-layout" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkDecorationLayoutPropertyInfo
instance AttrInfo SettingsGtkDecorationLayoutPropertyInfo where
type AttrAllowedOps SettingsGtkDecorationLayoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkDecorationLayoutPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkDecorationLayoutPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkDecorationLayoutPropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkDecorationLayoutPropertyInfo = T.Text
type AttrGetType SettingsGtkDecorationLayoutPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkDecorationLayoutPropertyInfo = "gtk-decoration-layout"
type AttrOrigin SettingsGtkDecorationLayoutPropertyInfo = Settings
attrGet = getSettingsGtkDecorationLayout
attrSet = setSettingsGtkDecorationLayout
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkDecorationLayout
attrClear = clearSettingsGtkDecorationLayout
#endif
getSettingsGtkDialogsUseHeader :: (MonadIO m, IsSettings o) => o -> m Bool
obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-dialogs-use-header"
setSettingsGtkDialogsUseHeader :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-dialogs-use-header" Bool
val
constructSettingsGtkDialogsUseHeader :: (IsSettings o) => Bool -> IO (GValueConstruct o)
val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-dialogs-use-header" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkDialogsUseHeaderPropertyInfo
instance AttrInfo SettingsGtkDialogsUseHeaderPropertyInfo where
type AttrAllowedOps SettingsGtkDialogsUseHeaderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkDialogsUseHeaderPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkDialogsUseHeaderPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkDialogsUseHeaderPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkDialogsUseHeaderPropertyInfo = Bool
type AttrGetType SettingsGtkDialogsUseHeaderPropertyInfo = Bool
type AttrLabel SettingsGtkDialogsUseHeaderPropertyInfo = "gtk-dialogs-use-header"
type AttrOrigin SettingsGtkDialogsUseHeaderPropertyInfo = Settings
attrGet = getSettingsGtkDialogsUseHeader
attrSet = setSettingsGtkDialogsUseHeader
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkDialogsUseHeader
attrClear = undefined
#endif
getSettingsGtkDndDragThreshold :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDndDragThreshold :: o -> m Int32
getSettingsGtkDndDragThreshold obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-dnd-drag-threshold"
setSettingsGtkDndDragThreshold :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDndDragThreshold :: o -> Int32 -> m ()
setSettingsGtkDndDragThreshold obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-dnd-drag-threshold" Int32
val
constructSettingsGtkDndDragThreshold :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDndDragThreshold :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkDndDragThreshold val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-dnd-drag-threshold" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkDndDragThresholdPropertyInfo
instance AttrInfo SettingsGtkDndDragThresholdPropertyInfo where
type AttrAllowedOps SettingsGtkDndDragThresholdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkDndDragThresholdPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkDndDragThresholdPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkDndDragThresholdPropertyInfo = (~) Int32
type AttrTransferType SettingsGtkDndDragThresholdPropertyInfo = Int32
type AttrGetType SettingsGtkDndDragThresholdPropertyInfo = Int32
type AttrLabel SettingsGtkDndDragThresholdPropertyInfo = "gtk-dnd-drag-threshold"
type AttrOrigin SettingsGtkDndDragThresholdPropertyInfo = Settings
attrGet = getSettingsGtkDndDragThreshold
attrSet = setSettingsGtkDndDragThreshold
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkDndDragThreshold
attrClear = undefined
#endif
getSettingsGtkDoubleClickDistance :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDoubleClickDistance :: o -> m Int32
getSettingsGtkDoubleClickDistance obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-double-click-distance"
setSettingsGtkDoubleClickDistance :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDoubleClickDistance :: o -> Int32 -> m ()
setSettingsGtkDoubleClickDistance obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-double-click-distance" Int32
val
constructSettingsGtkDoubleClickDistance :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickDistance :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickDistance val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-double-click-distance" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkDoubleClickDistancePropertyInfo
instance AttrInfo SettingsGtkDoubleClickDistancePropertyInfo where
type AttrAllowedOps SettingsGtkDoubleClickDistancePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkDoubleClickDistancePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkDoubleClickDistancePropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkDoubleClickDistancePropertyInfo = (~) Int32
type AttrTransferType SettingsGtkDoubleClickDistancePropertyInfo = Int32
type AttrGetType SettingsGtkDoubleClickDistancePropertyInfo = Int32
type AttrLabel SettingsGtkDoubleClickDistancePropertyInfo = "gtk-double-click-distance"
type AttrOrigin SettingsGtkDoubleClickDistancePropertyInfo = Settings
attrGet = getSettingsGtkDoubleClickDistance
attrSet = setSettingsGtkDoubleClickDistance
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkDoubleClickDistance
attrClear = undefined
#endif
getSettingsGtkDoubleClickTime :: (MonadIO m, IsSettings o) => o -> m Int32
getSettingsGtkDoubleClickTime :: o -> m Int32
getSettingsGtkDoubleClickTime obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-double-click-time"
setSettingsGtkDoubleClickTime :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
setSettingsGtkDoubleClickTime :: o -> Int32 -> m ()
setSettingsGtkDoubleClickTime obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-double-click-time" Int32
val
constructSettingsGtkDoubleClickTime :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickTime :: Int32 -> IO (GValueConstruct o)
constructSettingsGtkDoubleClickTime val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-double-click-time" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkDoubleClickTimePropertyInfo
instance AttrInfo SettingsGtkDoubleClickTimePropertyInfo where
type AttrAllowedOps SettingsGtkDoubleClickTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkDoubleClickTimePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkDoubleClickTimePropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkDoubleClickTimePropertyInfo = (~) Int32
type AttrTransferType SettingsGtkDoubleClickTimePropertyInfo = Int32
type AttrGetType SettingsGtkDoubleClickTimePropertyInfo = Int32
type AttrLabel SettingsGtkDoubleClickTimePropertyInfo = "gtk-double-click-time"
type AttrOrigin SettingsGtkDoubleClickTimePropertyInfo = Settings
attrGet = getSettingsGtkDoubleClickTime
attrSet = setSettingsGtkDoubleClickTime
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkDoubleClickTime
attrClear = undefined
#endif
getSettingsGtkEnableAccels :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableAccels :: o -> m Bool
getSettingsGtkEnableAccels obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-accels"
setSettingsGtkEnableAccels :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableAccels :: o -> Bool -> m ()
setSettingsGtkEnableAccels obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-accels" Bool
val
constructSettingsGtkEnableAccels :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAccels :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAccels val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-accels" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableAccelsPropertyInfo
instance AttrInfo SettingsGtkEnableAccelsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableAccelsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableAccelsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableAccelsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableAccelsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableAccelsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableAccelsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableAccelsPropertyInfo = "gtk-enable-accels"
type AttrOrigin SettingsGtkEnableAccelsPropertyInfo = Settings
attrGet = getSettingsGtkEnableAccels
attrSet = setSettingsGtkEnableAccels
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableAccels
attrClear = undefined
#endif
getSettingsGtkEnableAnimations :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableAnimations :: o -> m Bool
getSettingsGtkEnableAnimations obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-animations"
setSettingsGtkEnableAnimations :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableAnimations :: o -> Bool -> m ()
setSettingsGtkEnableAnimations obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-animations" Bool
val
constructSettingsGtkEnableAnimations :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAnimations :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableAnimations val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-animations" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableAnimationsPropertyInfo
instance AttrInfo SettingsGtkEnableAnimationsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableAnimationsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableAnimationsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableAnimationsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableAnimationsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableAnimationsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableAnimationsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableAnimationsPropertyInfo = "gtk-enable-animations"
type AttrOrigin SettingsGtkEnableAnimationsPropertyInfo = Settings
attrGet = getSettingsGtkEnableAnimations
attrSet = setSettingsGtkEnableAnimations
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableAnimations
attrClear = undefined
#endif
getSettingsGtkEnableEventSounds :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableEventSounds :: o -> m Bool
getSettingsGtkEnableEventSounds obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-event-sounds"
setSettingsGtkEnableEventSounds :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableEventSounds :: o -> Bool -> m ()
setSettingsGtkEnableEventSounds obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-event-sounds" Bool
val
constructSettingsGtkEnableEventSounds :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableEventSounds :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableEventSounds val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-event-sounds" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableEventSoundsPropertyInfo
instance AttrInfo SettingsGtkEnableEventSoundsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableEventSoundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableEventSoundsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableEventSoundsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableEventSoundsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableEventSoundsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableEventSoundsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableEventSoundsPropertyInfo = "gtk-enable-event-sounds"
type AttrOrigin SettingsGtkEnableEventSoundsPropertyInfo = Settings
attrGet = getSettingsGtkEnableEventSounds
attrSet = setSettingsGtkEnableEventSounds
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableEventSounds
attrClear = undefined
#endif
getSettingsGtkEnableInputFeedbackSounds :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableInputFeedbackSounds :: o -> m Bool
getSettingsGtkEnableInputFeedbackSounds obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-input-feedback-sounds"
setSettingsGtkEnableInputFeedbackSounds :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableInputFeedbackSounds :: o -> Bool -> m ()
setSettingsGtkEnableInputFeedbackSounds obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-input-feedback-sounds" Bool
val
constructSettingsGtkEnableInputFeedbackSounds :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableInputFeedbackSounds :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableInputFeedbackSounds val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-input-feedback-sounds" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableInputFeedbackSoundsPropertyInfo
instance AttrInfo SettingsGtkEnableInputFeedbackSoundsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableInputFeedbackSoundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableInputFeedbackSoundsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableInputFeedbackSoundsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableInputFeedbackSoundsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableInputFeedbackSoundsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableInputFeedbackSoundsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableInputFeedbackSoundsPropertyInfo = "gtk-enable-input-feedback-sounds"
type AttrOrigin SettingsGtkEnableInputFeedbackSoundsPropertyInfo = Settings
attrGet = getSettingsGtkEnableInputFeedbackSounds
attrSet = setSettingsGtkEnableInputFeedbackSounds
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableInputFeedbackSounds
attrClear = undefined
#endif
getSettingsGtkEnableMnemonics :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableMnemonics :: o -> m Bool
getSettingsGtkEnableMnemonics obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-mnemonics"
setSettingsGtkEnableMnemonics :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableMnemonics :: o -> Bool -> m ()
setSettingsGtkEnableMnemonics obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-mnemonics" Bool
val
constructSettingsGtkEnableMnemonics :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableMnemonics :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableMnemonics val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-mnemonics" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableMnemonicsPropertyInfo
instance AttrInfo SettingsGtkEnableMnemonicsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableMnemonicsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableMnemonicsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableMnemonicsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableMnemonicsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableMnemonicsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableMnemonicsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableMnemonicsPropertyInfo = "gtk-enable-mnemonics"
type AttrOrigin SettingsGtkEnableMnemonicsPropertyInfo = Settings
attrGet = getSettingsGtkEnableMnemonics
attrSet = setSettingsGtkEnableMnemonics
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableMnemonics
attrClear = undefined
#endif
getSettingsGtkEnablePrimaryPaste :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnablePrimaryPaste :: o -> m Bool
getSettingsGtkEnablePrimaryPaste obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-primary-paste"
setSettingsGtkEnablePrimaryPaste :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnablePrimaryPaste :: o -> Bool -> m ()
setSettingsGtkEnablePrimaryPaste obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-primary-paste" Bool
val
constructSettingsGtkEnablePrimaryPaste :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnablePrimaryPaste :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnablePrimaryPaste val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-primary-paste" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnablePrimaryPastePropertyInfo
instance AttrInfo SettingsGtkEnablePrimaryPastePropertyInfo where
type AttrAllowedOps SettingsGtkEnablePrimaryPastePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnablePrimaryPastePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnablePrimaryPastePropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnablePrimaryPastePropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnablePrimaryPastePropertyInfo = Bool
type AttrGetType SettingsGtkEnablePrimaryPastePropertyInfo = Bool
type AttrLabel SettingsGtkEnablePrimaryPastePropertyInfo = "gtk-enable-primary-paste"
type AttrOrigin SettingsGtkEnablePrimaryPastePropertyInfo = Settings
attrGet = getSettingsGtkEnablePrimaryPaste
attrSet = setSettingsGtkEnablePrimaryPaste
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnablePrimaryPaste
attrClear = undefined
#endif
getSettingsGtkEnableTooltips :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEnableTooltips :: o -> m Bool
getSettingsGtkEnableTooltips obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-enable-tooltips"
setSettingsGtkEnableTooltips :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEnableTooltips :: o -> Bool -> m ()
setSettingsGtkEnableTooltips obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-enable-tooltips" Bool
val
constructSettingsGtkEnableTooltips :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableTooltips :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEnableTooltips val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-enable-tooltips" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEnableTooltipsPropertyInfo
instance AttrInfo SettingsGtkEnableTooltipsPropertyInfo where
type AttrAllowedOps SettingsGtkEnableTooltipsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEnableTooltipsPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEnableTooltipsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEnableTooltipsPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEnableTooltipsPropertyInfo = Bool
type AttrGetType SettingsGtkEnableTooltipsPropertyInfo = Bool
type AttrLabel SettingsGtkEnableTooltipsPropertyInfo = "gtk-enable-tooltips"
type AttrOrigin SettingsGtkEnableTooltipsPropertyInfo = Settings
attrGet = getSettingsGtkEnableTooltips
attrSet = setSettingsGtkEnableTooltips
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEnableTooltips
attrClear = undefined
#endif
getSettingsGtkEntryPasswordHintTimeout :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkEntryPasswordHintTimeout :: o -> m Word32
getSettingsGtkEntryPasswordHintTimeout obj :: o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj "gtk-entry-password-hint-timeout"
setSettingsGtkEntryPasswordHintTimeout :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkEntryPasswordHintTimeout :: o -> Word32 -> m ()
setSettingsGtkEntryPasswordHintTimeout obj :: o
obj val :: Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj "gtk-entry-password-hint-timeout" Word32
val
constructSettingsGtkEntryPasswordHintTimeout :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkEntryPasswordHintTimeout :: Word32 -> IO (GValueConstruct o)
constructSettingsGtkEntryPasswordHintTimeout val :: Word32
val = String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 "gtk-entry-password-hint-timeout" Word32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEntryPasswordHintTimeoutPropertyInfo
instance AttrInfo SettingsGtkEntryPasswordHintTimeoutPropertyInfo where
type AttrAllowedOps SettingsGtkEntryPasswordHintTimeoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEntryPasswordHintTimeoutPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEntryPasswordHintTimeoutPropertyInfo = (~) Word32
type AttrTransferTypeConstraint SettingsGtkEntryPasswordHintTimeoutPropertyInfo = (~) Word32
type AttrTransferType SettingsGtkEntryPasswordHintTimeoutPropertyInfo = Word32
type AttrGetType SettingsGtkEntryPasswordHintTimeoutPropertyInfo = Word32
type AttrLabel SettingsGtkEntryPasswordHintTimeoutPropertyInfo = "gtk-entry-password-hint-timeout"
type AttrOrigin SettingsGtkEntryPasswordHintTimeoutPropertyInfo = Settings
attrGet = getSettingsGtkEntryPasswordHintTimeout
attrSet = setSettingsGtkEntryPasswordHintTimeout
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEntryPasswordHintTimeout
attrClear = undefined
#endif
getSettingsGtkEntrySelectOnFocus :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkEntrySelectOnFocus :: o -> m Bool
getSettingsGtkEntrySelectOnFocus obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-entry-select-on-focus"
setSettingsGtkEntrySelectOnFocus :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkEntrySelectOnFocus :: o -> Bool -> m ()
setSettingsGtkEntrySelectOnFocus obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-entry-select-on-focus" Bool
val
constructSettingsGtkEntrySelectOnFocus :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkEntrySelectOnFocus :: Bool -> IO (GValueConstruct o)
constructSettingsGtkEntrySelectOnFocus val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-entry-select-on-focus" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkEntrySelectOnFocusPropertyInfo
instance AttrInfo SettingsGtkEntrySelectOnFocusPropertyInfo where
type AttrAllowedOps SettingsGtkEntrySelectOnFocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkEntrySelectOnFocusPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkEntrySelectOnFocusPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkEntrySelectOnFocusPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkEntrySelectOnFocusPropertyInfo = Bool
type AttrGetType SettingsGtkEntrySelectOnFocusPropertyInfo = Bool
type AttrLabel SettingsGtkEntrySelectOnFocusPropertyInfo = "gtk-entry-select-on-focus"
type AttrOrigin SettingsGtkEntrySelectOnFocusPropertyInfo = Settings
attrGet = getSettingsGtkEntrySelectOnFocus
attrSet = setSettingsGtkEntrySelectOnFocus
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkEntrySelectOnFocus
attrClear = undefined
#endif
getSettingsGtkErrorBell :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkErrorBell :: o -> m Bool
getSettingsGtkErrorBell obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-error-bell"
setSettingsGtkErrorBell :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkErrorBell :: o -> Bool -> m ()
setSettingsGtkErrorBell obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-error-bell" Bool
val
constructSettingsGtkErrorBell :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkErrorBell :: Bool -> IO (GValueConstruct o)
constructSettingsGtkErrorBell val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-error-bell" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkErrorBellPropertyInfo
instance AttrInfo SettingsGtkErrorBellPropertyInfo where
type AttrAllowedOps SettingsGtkErrorBellPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkErrorBellPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkErrorBellPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkErrorBellPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkErrorBellPropertyInfo = Bool
type AttrGetType SettingsGtkErrorBellPropertyInfo = Bool
type AttrLabel SettingsGtkErrorBellPropertyInfo = "gtk-error-bell"
type AttrOrigin SettingsGtkErrorBellPropertyInfo = Settings
attrGet = getSettingsGtkErrorBell
attrSet = setSettingsGtkErrorBell
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkErrorBell
attrClear = undefined
#endif
getSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFallbackIconTheme :: o -> m (Maybe Text)
getSettingsGtkFallbackIconTheme obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-fallback-icon-theme"
setSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFallbackIconTheme :: o -> Text -> m ()
setSettingsGtkFallbackIconTheme obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-fallback-icon-theme" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkFallbackIconTheme :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFallbackIconTheme :: Text -> IO (GValueConstruct o)
constructSettingsGtkFallbackIconTheme val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-fallback-icon-theme" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkFallbackIconTheme :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFallbackIconTheme :: o -> m ()
clearSettingsGtkFallbackIconTheme obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-fallback-icon-theme" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkFallbackIconThemePropertyInfo
instance AttrInfo SettingsGtkFallbackIconThemePropertyInfo where
type AttrAllowedOps SettingsGtkFallbackIconThemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkFallbackIconThemePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkFallbackIconThemePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkFallbackIconThemePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkFallbackIconThemePropertyInfo = T.Text
type AttrGetType SettingsGtkFallbackIconThemePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFallbackIconThemePropertyInfo = "gtk-fallback-icon-theme"
type AttrOrigin SettingsGtkFallbackIconThemePropertyInfo = Settings
attrGet = getSettingsGtkFallbackIconTheme
attrSet = setSettingsGtkFallbackIconTheme
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkFallbackIconTheme
attrClear = clearSettingsGtkFallbackIconTheme
#endif
getSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFileChooserBackend :: o -> m (Maybe Text)
getSettingsGtkFileChooserBackend obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-file-chooser-backend"
setSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFileChooserBackend :: o -> Text -> m ()
setSettingsGtkFileChooserBackend obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-file-chooser-backend" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkFileChooserBackend :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFileChooserBackend :: Text -> IO (GValueConstruct o)
constructSettingsGtkFileChooserBackend val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-file-chooser-backend" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkFileChooserBackend :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFileChooserBackend :: o -> m ()
clearSettingsGtkFileChooserBackend obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-file-chooser-backend" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkFileChooserBackendPropertyInfo
instance AttrInfo SettingsGtkFileChooserBackendPropertyInfo where
type AttrAllowedOps SettingsGtkFileChooserBackendPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkFileChooserBackendPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkFileChooserBackendPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkFileChooserBackendPropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkFileChooserBackendPropertyInfo = T.Text
type AttrGetType SettingsGtkFileChooserBackendPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFileChooserBackendPropertyInfo = "gtk-file-chooser-backend"
type AttrOrigin SettingsGtkFileChooserBackendPropertyInfo = Settings
attrGet = getSettingsGtkFileChooserBackend
attrSet = setSettingsGtkFileChooserBackend
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkFileChooserBackend
attrClear = clearSettingsGtkFileChooserBackend
#endif
getSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkFontName :: o -> m (Maybe Text)
getSettingsGtkFontName obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-font-name"
setSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkFontName :: o -> Text -> m ()
setSettingsGtkFontName obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-font-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkFontName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkFontName :: Text -> IO (GValueConstruct o)
constructSettingsGtkFontName val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-font-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkFontName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkFontName :: o -> m ()
clearSettingsGtkFontName obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-font-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkFontNamePropertyInfo
instance AttrInfo SettingsGtkFontNamePropertyInfo where
type AttrAllowedOps SettingsGtkFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkFontNamePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkFontNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkFontNamePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkFontNamePropertyInfo = T.Text
type AttrGetType SettingsGtkFontNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkFontNamePropertyInfo = "gtk-font-name"
type AttrOrigin SettingsGtkFontNamePropertyInfo = Settings
attrGet = getSettingsGtkFontName
attrSet = setSettingsGtkFontName
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkFontName
attrClear = clearSettingsGtkFontName
#endif
getSettingsGtkFontconfigTimestamp :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkFontconfigTimestamp :: o -> m Word32
getSettingsGtkFontconfigTimestamp obj :: o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj "gtk-fontconfig-timestamp"
setSettingsGtkFontconfigTimestamp :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkFontconfigTimestamp :: o -> Word32 -> m ()
setSettingsGtkFontconfigTimestamp obj :: o
obj val :: Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj "gtk-fontconfig-timestamp" Word32
val
constructSettingsGtkFontconfigTimestamp :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkFontconfigTimestamp :: Word32 -> IO (GValueConstruct o)
constructSettingsGtkFontconfigTimestamp val :: Word32
val = String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 "gtk-fontconfig-timestamp" Word32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkFontconfigTimestampPropertyInfo
instance AttrInfo SettingsGtkFontconfigTimestampPropertyInfo where
type AttrAllowedOps SettingsGtkFontconfigTimestampPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkFontconfigTimestampPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkFontconfigTimestampPropertyInfo = (~) Word32
type AttrTransferTypeConstraint SettingsGtkFontconfigTimestampPropertyInfo = (~) Word32
type AttrTransferType SettingsGtkFontconfigTimestampPropertyInfo = Word32
type AttrGetType SettingsGtkFontconfigTimestampPropertyInfo = Word32
type AttrLabel SettingsGtkFontconfigTimestampPropertyInfo = "gtk-fontconfig-timestamp"
type AttrOrigin SettingsGtkFontconfigTimestampPropertyInfo = Settings
attrGet = getSettingsGtkFontconfigTimestamp
attrSet = setSettingsGtkFontconfigTimestamp
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkFontconfigTimestamp
attrClear = undefined
#endif
getSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkIconSizes :: o -> m (Maybe Text)
getSettingsGtkIconSizes obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-icon-sizes"
setSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkIconSizes :: o -> Text -> m ()
setSettingsGtkIconSizes obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-icon-sizes" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkIconSizes :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkIconSizes :: Text -> IO (GValueConstruct o)
constructSettingsGtkIconSizes val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-icon-sizes" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkIconSizes :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkIconSizes :: o -> m ()
clearSettingsGtkIconSizes obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-icon-sizes" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkIconSizesPropertyInfo
instance AttrInfo SettingsGtkIconSizesPropertyInfo where
type AttrAllowedOps SettingsGtkIconSizesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkIconSizesPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkIconSizesPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkIconSizesPropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkIconSizesPropertyInfo = T.Text
type AttrGetType SettingsGtkIconSizesPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkIconSizesPropertyInfo = "gtk-icon-sizes"
type AttrOrigin SettingsGtkIconSizesPropertyInfo = Settings
attrGet = getSettingsGtkIconSizes
attrSet = setSettingsGtkIconSizes
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkIconSizes
attrClear = clearSettingsGtkIconSizes
#endif
getSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkIconThemeName :: o -> m (Maybe Text)
getSettingsGtkIconThemeName obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-icon-theme-name"
setSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkIconThemeName :: o -> Text -> m ()
setSettingsGtkIconThemeName obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-icon-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkIconThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkIconThemeName :: Text -> IO (GValueConstruct o)
constructSettingsGtkIconThemeName val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-icon-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkIconThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkIconThemeName :: o -> m ()
clearSettingsGtkIconThemeName obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-icon-theme-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkIconThemeNamePropertyInfo
instance AttrInfo SettingsGtkIconThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkIconThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkIconThemeNamePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkIconThemeNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkIconThemeNamePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkIconThemeNamePropertyInfo = T.Text
type AttrGetType SettingsGtkIconThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkIconThemeNamePropertyInfo = "gtk-icon-theme-name"
type AttrOrigin SettingsGtkIconThemeNamePropertyInfo = Settings
attrGet = getSettingsGtkIconThemeName
attrSet = setSettingsGtkIconThemeName
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkIconThemeName
attrClear = clearSettingsGtkIconThemeName
#endif
getSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkImModule :: o -> m (Maybe Text)
getSettingsGtkImModule obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-im-module"
setSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkImModule :: o -> Text -> m ()
setSettingsGtkImModule obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-im-module" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkImModule :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkImModule :: Text -> IO (GValueConstruct o)
constructSettingsGtkImModule val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-im-module" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkImModule :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkImModule :: o -> m ()
clearSettingsGtkImModule obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-im-module" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkImModulePropertyInfo
instance AttrInfo SettingsGtkImModulePropertyInfo where
type AttrAllowedOps SettingsGtkImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkImModulePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkImModulePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkImModulePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkImModulePropertyInfo = T.Text
type AttrGetType SettingsGtkImModulePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkImModulePropertyInfo = "gtk-im-module"
type AttrOrigin SettingsGtkImModulePropertyInfo = Settings
attrGet = getSettingsGtkImModule
attrSet = setSettingsGtkImModule
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkImModule
attrClear = clearSettingsGtkImModule
#endif
getSettingsGtkImPreeditStyle :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.IMPreeditStyle
getSettingsGtkImPreeditStyle :: o -> m IMPreeditStyle
getSettingsGtkImPreeditStyle obj :: o
obj = IO IMPreeditStyle -> m IMPreeditStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO IMPreeditStyle -> m IMPreeditStyle)
-> IO IMPreeditStyle -> m IMPreeditStyle
forall a b. (a -> b) -> a -> b
$ o -> String -> IO IMPreeditStyle
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "gtk-im-preedit-style"
setSettingsGtkImPreeditStyle :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.IMPreeditStyle -> m ()
setSettingsGtkImPreeditStyle :: o -> IMPreeditStyle -> m ()
setSettingsGtkImPreeditStyle obj :: o
obj val :: IMPreeditStyle
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> IMPreeditStyle -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "gtk-im-preedit-style" IMPreeditStyle
val
constructSettingsGtkImPreeditStyle :: (IsSettings o) => Gtk.Enums.IMPreeditStyle -> IO (GValueConstruct o)
constructSettingsGtkImPreeditStyle :: IMPreeditStyle -> IO (GValueConstruct o)
constructSettingsGtkImPreeditStyle val :: IMPreeditStyle
val = String -> IMPreeditStyle -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "gtk-im-preedit-style" IMPreeditStyle
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkImPreeditStylePropertyInfo
instance AttrInfo SettingsGtkImPreeditStylePropertyInfo where
type AttrAllowedOps SettingsGtkImPreeditStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkImPreeditStylePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkImPreeditStylePropertyInfo = (~) Gtk.Enums.IMPreeditStyle
type AttrTransferTypeConstraint SettingsGtkImPreeditStylePropertyInfo = (~) Gtk.Enums.IMPreeditStyle
type AttrTransferType SettingsGtkImPreeditStylePropertyInfo = Gtk.Enums.IMPreeditStyle
type AttrGetType SettingsGtkImPreeditStylePropertyInfo = Gtk.Enums.IMPreeditStyle
type AttrLabel SettingsGtkImPreeditStylePropertyInfo = "gtk-im-preedit-style"
type AttrOrigin SettingsGtkImPreeditStylePropertyInfo = Settings
attrGet = getSettingsGtkImPreeditStyle
attrSet = setSettingsGtkImPreeditStyle
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkImPreeditStyle
attrClear = undefined
#endif
getSettingsGtkImStatusStyle :: (MonadIO m, IsSettings o) => o -> m Gtk.Enums.IMStatusStyle
getSettingsGtkImStatusStyle :: o -> m IMStatusStyle
getSettingsGtkImStatusStyle obj :: o
obj = IO IMStatusStyle -> m IMStatusStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO IMStatusStyle -> m IMStatusStyle)
-> IO IMStatusStyle -> m IMStatusStyle
forall a b. (a -> b) -> a -> b
$ o -> String -> IO IMStatusStyle
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj "gtk-im-status-style"
setSettingsGtkImStatusStyle :: (MonadIO m, IsSettings o) => o -> Gtk.Enums.IMStatusStyle -> m ()
setSettingsGtkImStatusStyle :: o -> IMStatusStyle -> m ()
setSettingsGtkImStatusStyle obj :: o
obj val :: IMStatusStyle
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> IMStatusStyle -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj "gtk-im-status-style" IMStatusStyle
val
constructSettingsGtkImStatusStyle :: (IsSettings o) => Gtk.Enums.IMStatusStyle -> IO (GValueConstruct o)
constructSettingsGtkImStatusStyle :: IMStatusStyle -> IO (GValueConstruct o)
constructSettingsGtkImStatusStyle val :: IMStatusStyle
val = String -> IMStatusStyle -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum "gtk-im-status-style" IMStatusStyle
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkImStatusStylePropertyInfo
instance AttrInfo SettingsGtkImStatusStylePropertyInfo where
type AttrAllowedOps SettingsGtkImStatusStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkImStatusStylePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkImStatusStylePropertyInfo = (~) Gtk.Enums.IMStatusStyle
type AttrTransferTypeConstraint SettingsGtkImStatusStylePropertyInfo = (~) Gtk.Enums.IMStatusStyle
type AttrTransferType SettingsGtkImStatusStylePropertyInfo = Gtk.Enums.IMStatusStyle
type AttrGetType SettingsGtkImStatusStylePropertyInfo = Gtk.Enums.IMStatusStyle
type AttrLabel SettingsGtkImStatusStylePropertyInfo = "gtk-im-status-style"
type AttrOrigin SettingsGtkImStatusStylePropertyInfo = Settings
attrGet = getSettingsGtkImStatusStyle
attrSet = setSettingsGtkImStatusStyle
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkImStatusStyle
attrClear = undefined
#endif
getSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
getSettingsGtkKeyThemeName :: o -> m (Maybe Text)
getSettingsGtkKeyThemeName obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-key-theme-name"
setSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsGtkKeyThemeName :: o -> Text -> m ()
setSettingsGtkKeyThemeName obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-key-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkKeyThemeName :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsGtkKeyThemeName :: Text -> IO (GValueConstruct o)
constructSettingsGtkKeyThemeName val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-key-theme-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkKeyThemeName :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsGtkKeyThemeName :: o -> m ()
clearSettingsGtkKeyThemeName obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-key-theme-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkKeyThemeNamePropertyInfo
instance AttrInfo SettingsGtkKeyThemeNamePropertyInfo where
type AttrAllowedOps SettingsGtkKeyThemeNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkKeyThemeNamePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkKeyThemeNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkKeyThemeNamePropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkKeyThemeNamePropertyInfo = T.Text
type AttrGetType SettingsGtkKeyThemeNamePropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkKeyThemeNamePropertyInfo = "gtk-key-theme-name"
type AttrOrigin SettingsGtkKeyThemeNamePropertyInfo = Settings
attrGet = getSettingsGtkKeyThemeName
attrSet = setSettingsGtkKeyThemeName
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkKeyThemeName
attrClear = clearSettingsGtkKeyThemeName
#endif
getSettingsGtkKeynavCursorOnly :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavCursorOnly :: o -> m Bool
getSettingsGtkKeynavCursorOnly obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-keynav-cursor-only"
setSettingsGtkKeynavCursorOnly :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavCursorOnly :: o -> Bool -> m ()
setSettingsGtkKeynavCursorOnly obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-keynav-cursor-only" Bool
val
constructSettingsGtkKeynavCursorOnly :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavCursorOnly :: Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavCursorOnly val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-keynav-cursor-only" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkKeynavCursorOnlyPropertyInfo
instance AttrInfo SettingsGtkKeynavCursorOnlyPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavCursorOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkKeynavCursorOnlyPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkKeynavCursorOnlyPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkKeynavCursorOnlyPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkKeynavCursorOnlyPropertyInfo = Bool
type AttrGetType SettingsGtkKeynavCursorOnlyPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavCursorOnlyPropertyInfo = "gtk-keynav-cursor-only"
type AttrOrigin SettingsGtkKeynavCursorOnlyPropertyInfo = Settings
attrGet = getSettingsGtkKeynavCursorOnly
attrSet = setSettingsGtkKeynavCursorOnly
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkKeynavCursorOnly
attrClear = undefined
#endif
getSettingsGtkKeynavUseCaret :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavUseCaret :: o -> m Bool
getSettingsGtkKeynavUseCaret obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-keynav-use-caret"
setSettingsGtkKeynavUseCaret :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavUseCaret :: o -> Bool -> m ()
setSettingsGtkKeynavUseCaret obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-keynav-use-caret" Bool
val
constructSettingsGtkKeynavUseCaret :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavUseCaret :: Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavUseCaret val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-keynav-use-caret" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkKeynavUseCaretPropertyInfo
instance AttrInfo SettingsGtkKeynavUseCaretPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavUseCaretPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkKeynavUseCaretPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkKeynavUseCaretPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkKeynavUseCaretPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkKeynavUseCaretPropertyInfo = Bool
type AttrGetType SettingsGtkKeynavUseCaretPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavUseCaretPropertyInfo = "gtk-keynav-use-caret"
type AttrOrigin SettingsGtkKeynavUseCaretPropertyInfo = Settings
attrGet = getSettingsGtkKeynavUseCaret
attrSet = setSettingsGtkKeynavUseCaret
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkKeynavUseCaret
attrClear = undefined
#endif
getSettingsGtkKeynavWrapAround :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkKeynavWrapAround :: o -> m Bool
getSettingsGtkKeynavWrapAround obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-keynav-wrap-around"
setSettingsGtkKeynavWrapAround :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkKeynavWrapAround :: o -> Bool -> m ()
setSettingsGtkKeynavWrapAround obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-keynav-wrap-around" Bool
val
constructSettingsGtkKeynavWrapAround :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavWrapAround :: Bool -> IO (GValueConstruct o)
constructSettingsGtkKeynavWrapAround val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-keynav-wrap-around" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkKeynavWrapAroundPropertyInfo
instance AttrInfo SettingsGtkKeynavWrapAroundPropertyInfo where
type AttrAllowedOps SettingsGtkKeynavWrapAroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkKeynavWrapAroundPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkKeynavWrapAroundPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkKeynavWrapAroundPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkKeynavWrapAroundPropertyInfo = Bool
type AttrGetType SettingsGtkKeynavWrapAroundPropertyInfo = Bool
type AttrLabel SettingsGtkKeynavWrapAroundPropertyInfo = "gtk-keynav-wrap-around"
type AttrOrigin SettingsGtkKeynavWrapAroundPropertyInfo = Settings
attrGet = getSettingsGtkKeynavWrapAround
attrSet = setSettingsGtkKeynavWrapAround
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkKeynavWrapAround
attrClear = undefined
#endif
getSettingsGtkLabelSelectOnFocus :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsGtkLabelSelectOnFocus :: o -> m Bool
getSettingsGtkLabelSelectOnFocus obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-label-select-on-focus"
setSettingsGtkLabelSelectOnFocus :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsGtkLabelSelectOnFocus :: o -> Bool -> m ()
setSettingsGtkLabelSelectOnFocus obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-label-select-on-focus" Bool
val
constructSettingsGtkLabelSelectOnFocus :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsGtkLabelSelectOnFocus :: Bool -> IO (GValueConstruct o)
constructSettingsGtkLabelSelectOnFocus val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-label-select-on-focus" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkLabelSelectOnFocusPropertyInfo
instance AttrInfo SettingsGtkLabelSelectOnFocusPropertyInfo where
type AttrAllowedOps SettingsGtkLabelSelectOnFocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkLabelSelectOnFocusPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkLabelSelectOnFocusPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkLabelSelectOnFocusPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkLabelSelectOnFocusPropertyInfo = Bool
type AttrGetType SettingsGtkLabelSelectOnFocusPropertyInfo = Bool
type AttrLabel SettingsGtkLabelSelectOnFocusPropertyInfo = "gtk-label-select-on-focus"
type AttrOrigin SettingsGtkLabelSelectOnFocusPropertyInfo = Settings
attrGet = getSettingsGtkLabelSelectOnFocus
attrSet = setSettingsGtkLabelSelectOnFocus
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkLabelSelectOnFocus
attrClear = undefined
#endif
getSettingsGtkLongPressTime :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsGtkLongPressTime :: o -> m Word32
getSettingsGtkLongPressTime obj :: o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj "gtk-long-press-time"
setSettingsGtkLongPressTime :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsGtkLongPressTime :: o -> Word32 -> m ()
setSettingsGtkLongPressTime obj :: o
obj val :: Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj "gtk-long-press-time" Word32
val
constructSettingsGtkLongPressTime :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsGtkLongPressTime :: Word32 -> IO (GValueConstruct o)
constructSettingsGtkLongPressTime val :: Word32
val = String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 "gtk-long-press-time" Word32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkLongPressTimePropertyInfo
instance AttrInfo SettingsGtkLongPressTimePropertyInfo where
type AttrAllowedOps SettingsGtkLongPressTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkLongPressTimePropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkLongPressTimePropertyInfo = (~) Word32
type AttrTransferTypeConstraint SettingsGtkLongPressTimePropertyInfo = (~) Word32
type AttrTransferType SettingsGtkLongPressTimePropertyInfo = Word32
type AttrGetType SettingsGtkLongPressTimePropertyInfo = Word32
type AttrLabel SettingsGtkLongPressTimePropertyInfo = "gtk-long-press-time"
type AttrOrigin SettingsGtkLongPressTimePropertyInfo = Settings
attrGet = getSettingsGtkLongPressTime
attrSet = setSettingsGtkLongPressTime
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkLongPressTime
attrClear = undefined
#endif
getSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> m (Maybe T.Text)
obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "gtk-menu-bar-accel"
setSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-menu-bar-accel" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSettingsGtkMenuBarAccel :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "gtk-menu-bar-accel" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSettingsGtkMenuBarAccel :: (MonadIO m, IsSettings o) => o -> m ()
obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "gtk-menu-bar-accel" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SettingsGtkMenuBarAccelPropertyInfo
instance AttrInfo SettingsGtkMenuBarAccelPropertyInfo where
type AttrAllowedOps SettingsGtkMenuBarAccelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SettingsGtkMenuBarAccelPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkMenuBarAccelPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SettingsGtkMenuBarAccelPropertyInfo = (~) T.Text
type AttrTransferType SettingsGtkMenuBarAccelPropertyInfo = T.Text
type AttrGetType SettingsGtkMenuBarAccelPropertyInfo = (Maybe T.Text)
type AttrLabel SettingsGtkMenuBarAccelPropertyInfo = "gtk-menu-bar-accel"
type AttrOrigin SettingsGtkMenuBarAccelPropertyInfo = Settings
attrGet = getSettingsGtkMenuBarAccel
attrSet = setSettingsGtkMenuBarAccel
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkMenuBarAccel
attrClear = clearSettingsGtkMenuBarAccel
#endif
getSettingsGtkMenuBarPopupDelay :: (MonadIO m, IsSettings o) => o -> m Int32
obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-menu-bar-popup-delay"
setSettingsGtkMenuBarPopupDelay :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-menu-bar-popup-delay" Int32
val
constructSettingsGtkMenuBarPopupDelay :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-menu-bar-popup-delay" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkMenuBarPopupDelayPropertyInfo
instance AttrInfo SettingsGtkMenuBarPopupDelayPropertyInfo where
type AttrAllowedOps SettingsGtkMenuBarPopupDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkMenuBarPopupDelayPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkMenuBarPopupDelayPropertyInfo = (~) Int32
type AttrTransferTypeConstraint SettingsGtkMenuBarPopupDelayPropertyInfo = (~) Int32
type AttrTransferType SettingsGtkMenuBarPopupDelayPropertyInfo = Int32
type AttrGetType SettingsGtkMenuBarPopupDelayPropertyInfo = Int32
type AttrLabel SettingsGtkMenuBarPopupDelayPropertyInfo = "gtk-menu-bar-popup-delay"
type AttrOrigin SettingsGtkMenuBarPopupDelayPropertyInfo = Settings
attrGet = getSettingsGtkMenuBarPopupDelay
attrSet = setSettingsGtkMenuBarPopupDelay
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkMenuBarPopupDelay
attrClear = undefined
#endif
getSettingsGtkMenuImages :: (MonadIO m, IsSettings o) => o -> m Bool
obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "gtk-menu-images"
setSettingsGtkMenuImages :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "gtk-menu-images" Bool
val
constructSettingsGtkMenuImages :: (IsSettings o) => Bool -> IO (GValueConstruct o)
val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "gtk-menu-images" Bool
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkMenuImagesPropertyInfo
instance AttrInfo SettingsGtkMenuImagesPropertyInfo where
type AttrAllowedOps SettingsGtkMenuImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SettingsGtkMenuImagesPropertyInfo = IsSettings
type AttrSetTypeConstraint SettingsGtkMenuImagesPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SettingsGtkMenuImagesPropertyInfo = (~) Bool
type AttrTransferType SettingsGtkMenuImagesPropertyInfo = Bool
type AttrGetType SettingsGtkMenuImagesPropertyInfo = Bool
type AttrLabel SettingsGtkMenuImagesPropertyInfo = "gtk-menu-images"
type AttrOrigin SettingsGtkMenuImagesPropertyInfo = Settings
attrGet = getSettingsGtkMenuImages
attrSet = setSettingsGtkMenuImages
attrTransfer _ v = do
return v
attrConstruct = constructSettingsGtkMenuImages
attrClear = undefined
#endif
getSettingsGtkMenuPopdownDelay :: (MonadIO m, IsSettings o) => o -> m Int32
obj :: o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj "gtk-menu-popdown-delay"
setSettingsGtkMenuPopdownDelay :: (MonadIO m, IsSettings o) => o -> Int32 -> m ()
obj :: o
obj val :: Int32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj "gtk-menu-popdown-delay" Int32
val
constructSettingsGtkMenuPopdownDelay :: (IsSettings o) => Int32 -> IO (GValueConstruct o)
val :: Int32
val = String -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 "gtk-menu-popdown-delay" Int32
val
#if defined(ENABLE_OVERLOADING)
data SettingsGtkMenuPopdownDelayPropertyInfo
instance AttrInfo SettingsGtkMenuPopdownDelayPropertyInfo where