{- |
Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte
License    : LGPL-2.1
Maintainer : Iñaki García Etxebarria (garetxe@gmail.com)
-}

module GI.WebKit2.Objects.Settings
    ( 

-- * Exported types
    Settings(..)                            ,
    IsSettings                              ,
    toSettings                              ,
    noSettings                              ,


 -- * Methods
-- ** getAllowFileAccessFromFileUrls #method:getAllowFileAccessFromFileUrls#
    SettingsGetAllowFileAccessFromFileUrlsMethodInfo,
    settingsGetAllowFileAccessFromFileUrls  ,


-- ** getAllowModalDialogs #method:getAllowModalDialogs#
    SettingsGetAllowModalDialogsMethodInfo  ,
    settingsGetAllowModalDialogs            ,


-- ** getAllowUniversalAccessFromFileUrls #method:getAllowUniversalAccessFromFileUrls#
    SettingsGetAllowUniversalAccessFromFileUrlsMethodInfo,
    settingsGetAllowUniversalAccessFromFileUrls,


-- ** getAutoLoadImages #method:getAutoLoadImages#
    SettingsGetAutoLoadImagesMethodInfo     ,
    settingsGetAutoLoadImages               ,


-- ** getCursiveFontFamily #method:getCursiveFontFamily#
    SettingsGetCursiveFontFamilyMethodInfo  ,
    settingsGetCursiveFontFamily            ,


-- ** getDefaultCharset #method:getDefaultCharset#
    SettingsGetDefaultCharsetMethodInfo     ,
    settingsGetDefaultCharset               ,


-- ** getDefaultFontFamily #method:getDefaultFontFamily#
    SettingsGetDefaultFontFamilyMethodInfo  ,
    settingsGetDefaultFontFamily            ,


-- ** getDefaultFontSize #method:getDefaultFontSize#
    SettingsGetDefaultFontSizeMethodInfo    ,
    settingsGetDefaultFontSize              ,


-- ** getDefaultMonospaceFontSize #method:getDefaultMonospaceFontSize#
    SettingsGetDefaultMonospaceFontSizeMethodInfo,
    settingsGetDefaultMonospaceFontSize     ,


-- ** getDrawCompositingIndicators #method:getDrawCompositingIndicators#
    SettingsGetDrawCompositingIndicatorsMethodInfo,
    settingsGetDrawCompositingIndicators    ,


-- ** getEnableAccelerated2dCanvas #method:getEnableAccelerated2dCanvas#
    SettingsGetEnableAccelerated2dCanvasMethodInfo,
    settingsGetEnableAccelerated2dCanvas    ,


-- ** getEnableCaretBrowsing #method:getEnableCaretBrowsing#
    SettingsGetEnableCaretBrowsingMethodInfo,
    settingsGetEnableCaretBrowsing          ,


-- ** getEnableDeveloperExtras #method:getEnableDeveloperExtras#
    SettingsGetEnableDeveloperExtrasMethodInfo,
    settingsGetEnableDeveloperExtras        ,


-- ** getEnableDnsPrefetching #method:getEnableDnsPrefetching#
    SettingsGetEnableDnsPrefetchingMethodInfo,
    settingsGetEnableDnsPrefetching         ,


-- ** getEnableFrameFlattening #method:getEnableFrameFlattening#
    SettingsGetEnableFrameFlatteningMethodInfo,
    settingsGetEnableFrameFlattening        ,


-- ** getEnableFullscreen #method:getEnableFullscreen#
    SettingsGetEnableFullscreenMethodInfo   ,
    settingsGetEnableFullscreen             ,


-- ** getEnableHtml5Database #method:getEnableHtml5Database#
    SettingsGetEnableHtml5DatabaseMethodInfo,
    settingsGetEnableHtml5Database          ,


-- ** getEnableHtml5LocalStorage #method:getEnableHtml5LocalStorage#
    SettingsGetEnableHtml5LocalStorageMethodInfo,
    settingsGetEnableHtml5LocalStorage      ,


-- ** getEnableHyperlinkAuditing #method:getEnableHyperlinkAuditing#
    SettingsGetEnableHyperlinkAuditingMethodInfo,
    settingsGetEnableHyperlinkAuditing      ,


-- ** getEnableJava #method:getEnableJava#
    SettingsGetEnableJavaMethodInfo         ,
    settingsGetEnableJava                   ,


-- ** getEnableJavascript #method:getEnableJavascript#
    SettingsGetEnableJavascriptMethodInfo   ,
    settingsGetEnableJavascript             ,


-- ** getEnableMediaStream #method:getEnableMediaStream#
    SettingsGetEnableMediaStreamMethodInfo  ,
    settingsGetEnableMediaStream            ,


-- ** getEnableMediasource #method:getEnableMediasource#
    SettingsGetEnableMediasourceMethodInfo  ,
    settingsGetEnableMediasource            ,


-- ** getEnableOfflineWebApplicationCache #method:getEnableOfflineWebApplicationCache#
    SettingsGetEnableOfflineWebApplicationCacheMethodInfo,
    settingsGetEnableOfflineWebApplicationCache,


-- ** getEnablePageCache #method:getEnablePageCache#
    SettingsGetEnablePageCacheMethodInfo    ,
    settingsGetEnablePageCache              ,


-- ** getEnablePlugins #method:getEnablePlugins#
    SettingsGetEnablePluginsMethodInfo      ,
    settingsGetEnablePlugins                ,


-- ** getEnablePrivateBrowsing #method:getEnablePrivateBrowsing#
    SettingsGetEnablePrivateBrowsingMethodInfo,
    settingsGetEnablePrivateBrowsing        ,


-- ** getEnableResizableTextAreas #method:getEnableResizableTextAreas#
    SettingsGetEnableResizableTextAreasMethodInfo,
    settingsGetEnableResizableTextAreas     ,


-- ** getEnableSiteSpecificQuirks #method:getEnableSiteSpecificQuirks#
    SettingsGetEnableSiteSpecificQuirksMethodInfo,
    settingsGetEnableSiteSpecificQuirks     ,


-- ** getEnableSmoothScrolling #method:getEnableSmoothScrolling#
    SettingsGetEnableSmoothScrollingMethodInfo,
    settingsGetEnableSmoothScrolling        ,


-- ** getEnableSpatialNavigation #method:getEnableSpatialNavigation#
    SettingsGetEnableSpatialNavigationMethodInfo,
    settingsGetEnableSpatialNavigation      ,


-- ** getEnableTabsToLinks #method:getEnableTabsToLinks#
    SettingsGetEnableTabsToLinksMethodInfo  ,
    settingsGetEnableTabsToLinks            ,


-- ** getEnableWebaudio #method:getEnableWebaudio#
    SettingsGetEnableWebaudioMethodInfo     ,
    settingsGetEnableWebaudio               ,


-- ** getEnableWebgl #method:getEnableWebgl#
    SettingsGetEnableWebglMethodInfo        ,
    settingsGetEnableWebgl                  ,


-- ** getEnableWriteConsoleMessagesToStdout #method:getEnableWriteConsoleMessagesToStdout#
    SettingsGetEnableWriteConsoleMessagesToStdoutMethodInfo,
    settingsGetEnableWriteConsoleMessagesToStdout,


-- ** getEnableXssAuditor #method:getEnableXssAuditor#
    SettingsGetEnableXssAuditorMethodInfo   ,
    settingsGetEnableXssAuditor             ,


-- ** getFantasyFontFamily #method:getFantasyFontFamily#
    SettingsGetFantasyFontFamilyMethodInfo  ,
    settingsGetFantasyFontFamily            ,


-- ** getJavascriptCanAccessClipboard #method:getJavascriptCanAccessClipboard#
    SettingsGetJavascriptCanAccessClipboardMethodInfo,
    settingsGetJavascriptCanAccessClipboard ,


-- ** getJavascriptCanOpenWindowsAutomatically #method:getJavascriptCanOpenWindowsAutomatically#
    SettingsGetJavascriptCanOpenWindowsAutomaticallyMethodInfo,
    settingsGetJavascriptCanOpenWindowsAutomatically,


-- ** getLoadIconsIgnoringImageLoadSetting #method:getLoadIconsIgnoringImageLoadSetting#
    SettingsGetLoadIconsIgnoringImageLoadSettingMethodInfo,
    settingsGetLoadIconsIgnoringImageLoadSetting,


-- ** getMediaPlaybackAllowsInline #method:getMediaPlaybackAllowsInline#
    SettingsGetMediaPlaybackAllowsInlineMethodInfo,
    settingsGetMediaPlaybackAllowsInline    ,


-- ** getMediaPlaybackRequiresUserGesture #method:getMediaPlaybackRequiresUserGesture#
    SettingsGetMediaPlaybackRequiresUserGestureMethodInfo,
    settingsGetMediaPlaybackRequiresUserGesture,


-- ** getMinimumFontSize #method:getMinimumFontSize#
    SettingsGetMinimumFontSizeMethodInfo    ,
    settingsGetMinimumFontSize              ,


-- ** getMonospaceFontFamily #method:getMonospaceFontFamily#
    SettingsGetMonospaceFontFamilyMethodInfo,
    settingsGetMonospaceFontFamily          ,


-- ** getPictographFontFamily #method:getPictographFontFamily#
    SettingsGetPictographFontFamilyMethodInfo,
    settingsGetPictographFontFamily         ,


-- ** getPrintBackgrounds #method:getPrintBackgrounds#
    SettingsGetPrintBackgroundsMethodInfo   ,
    settingsGetPrintBackgrounds             ,


-- ** getSansSerifFontFamily #method:getSansSerifFontFamily#
    SettingsGetSansSerifFontFamilyMethodInfo,
    settingsGetSansSerifFontFamily          ,


-- ** getSerifFontFamily #method:getSerifFontFamily#
    SettingsGetSerifFontFamilyMethodInfo    ,
    settingsGetSerifFontFamily              ,


-- ** getUserAgent #method:getUserAgent#
    SettingsGetUserAgentMethodInfo          ,
    settingsGetUserAgent                    ,


-- ** getZoomTextOnly #method:getZoomTextOnly#
    SettingsGetZoomTextOnlyMethodInfo       ,
    settingsGetZoomTextOnly                 ,


-- ** new #method:new#
    settingsNew                             ,


-- ** setAllowFileAccessFromFileUrls #method:setAllowFileAccessFromFileUrls#
    SettingsSetAllowFileAccessFromFileUrlsMethodInfo,
    settingsSetAllowFileAccessFromFileUrls  ,


-- ** setAllowModalDialogs #method:setAllowModalDialogs#
    SettingsSetAllowModalDialogsMethodInfo  ,
    settingsSetAllowModalDialogs            ,


-- ** setAllowUniversalAccessFromFileUrls #method:setAllowUniversalAccessFromFileUrls#
    SettingsSetAllowUniversalAccessFromFileUrlsMethodInfo,
    settingsSetAllowUniversalAccessFromFileUrls,


-- ** setAutoLoadImages #method:setAutoLoadImages#
    SettingsSetAutoLoadImagesMethodInfo     ,
    settingsSetAutoLoadImages               ,


-- ** setCursiveFontFamily #method:setCursiveFontFamily#
    SettingsSetCursiveFontFamilyMethodInfo  ,
    settingsSetCursiveFontFamily            ,


-- ** setDefaultCharset #method:setDefaultCharset#
    SettingsSetDefaultCharsetMethodInfo     ,
    settingsSetDefaultCharset               ,


-- ** setDefaultFontFamily #method:setDefaultFontFamily#
    SettingsSetDefaultFontFamilyMethodInfo  ,
    settingsSetDefaultFontFamily            ,


-- ** setDefaultFontSize #method:setDefaultFontSize#
    SettingsSetDefaultFontSizeMethodInfo    ,
    settingsSetDefaultFontSize              ,


-- ** setDefaultMonospaceFontSize #method:setDefaultMonospaceFontSize#
    SettingsSetDefaultMonospaceFontSizeMethodInfo,
    settingsSetDefaultMonospaceFontSize     ,


-- ** setDrawCompositingIndicators #method:setDrawCompositingIndicators#
    SettingsSetDrawCompositingIndicatorsMethodInfo,
    settingsSetDrawCompositingIndicators    ,


-- ** setEnableAccelerated2dCanvas #method:setEnableAccelerated2dCanvas#
    SettingsSetEnableAccelerated2dCanvasMethodInfo,
    settingsSetEnableAccelerated2dCanvas    ,


-- ** setEnableCaretBrowsing #method:setEnableCaretBrowsing#
    SettingsSetEnableCaretBrowsingMethodInfo,
    settingsSetEnableCaretBrowsing          ,


-- ** setEnableDeveloperExtras #method:setEnableDeveloperExtras#
    SettingsSetEnableDeveloperExtrasMethodInfo,
    settingsSetEnableDeveloperExtras        ,


-- ** setEnableDnsPrefetching #method:setEnableDnsPrefetching#
    SettingsSetEnableDnsPrefetchingMethodInfo,
    settingsSetEnableDnsPrefetching         ,


-- ** setEnableFrameFlattening #method:setEnableFrameFlattening#
    SettingsSetEnableFrameFlatteningMethodInfo,
    settingsSetEnableFrameFlattening        ,


-- ** setEnableFullscreen #method:setEnableFullscreen#
    SettingsSetEnableFullscreenMethodInfo   ,
    settingsSetEnableFullscreen             ,


-- ** setEnableHtml5Database #method:setEnableHtml5Database#
    SettingsSetEnableHtml5DatabaseMethodInfo,
    settingsSetEnableHtml5Database          ,


-- ** setEnableHtml5LocalStorage #method:setEnableHtml5LocalStorage#
    SettingsSetEnableHtml5LocalStorageMethodInfo,
    settingsSetEnableHtml5LocalStorage      ,


-- ** setEnableHyperlinkAuditing #method:setEnableHyperlinkAuditing#
    SettingsSetEnableHyperlinkAuditingMethodInfo,
    settingsSetEnableHyperlinkAuditing      ,


-- ** setEnableJava #method:setEnableJava#
    SettingsSetEnableJavaMethodInfo         ,
    settingsSetEnableJava                   ,


-- ** setEnableJavascript #method:setEnableJavascript#
    SettingsSetEnableJavascriptMethodInfo   ,
    settingsSetEnableJavascript             ,


-- ** setEnableMediaStream #method:setEnableMediaStream#
    SettingsSetEnableMediaStreamMethodInfo  ,
    settingsSetEnableMediaStream            ,


-- ** setEnableMediasource #method:setEnableMediasource#
    SettingsSetEnableMediasourceMethodInfo  ,
    settingsSetEnableMediasource            ,


-- ** setEnableOfflineWebApplicationCache #method:setEnableOfflineWebApplicationCache#
    SettingsSetEnableOfflineWebApplicationCacheMethodInfo,
    settingsSetEnableOfflineWebApplicationCache,


-- ** setEnablePageCache #method:setEnablePageCache#
    SettingsSetEnablePageCacheMethodInfo    ,
    settingsSetEnablePageCache              ,


-- ** setEnablePlugins #method:setEnablePlugins#
    SettingsSetEnablePluginsMethodInfo      ,
    settingsSetEnablePlugins                ,


-- ** setEnablePrivateBrowsing #method:setEnablePrivateBrowsing#
    SettingsSetEnablePrivateBrowsingMethodInfo,
    settingsSetEnablePrivateBrowsing        ,


-- ** setEnableResizableTextAreas #method:setEnableResizableTextAreas#
    SettingsSetEnableResizableTextAreasMethodInfo,
    settingsSetEnableResizableTextAreas     ,


-- ** setEnableSiteSpecificQuirks #method:setEnableSiteSpecificQuirks#
    SettingsSetEnableSiteSpecificQuirksMethodInfo,
    settingsSetEnableSiteSpecificQuirks     ,


-- ** setEnableSmoothScrolling #method:setEnableSmoothScrolling#
    SettingsSetEnableSmoothScrollingMethodInfo,
    settingsSetEnableSmoothScrolling        ,


-- ** setEnableSpatialNavigation #method:setEnableSpatialNavigation#
    SettingsSetEnableSpatialNavigationMethodInfo,
    settingsSetEnableSpatialNavigation      ,


-- ** setEnableTabsToLinks #method:setEnableTabsToLinks#
    SettingsSetEnableTabsToLinksMethodInfo  ,
    settingsSetEnableTabsToLinks            ,


-- ** setEnableWebaudio #method:setEnableWebaudio#
    SettingsSetEnableWebaudioMethodInfo     ,
    settingsSetEnableWebaudio               ,


-- ** setEnableWebgl #method:setEnableWebgl#
    SettingsSetEnableWebglMethodInfo        ,
    settingsSetEnableWebgl                  ,


-- ** setEnableWriteConsoleMessagesToStdout #method:setEnableWriteConsoleMessagesToStdout#
    SettingsSetEnableWriteConsoleMessagesToStdoutMethodInfo,
    settingsSetEnableWriteConsoleMessagesToStdout,


-- ** setEnableXssAuditor #method:setEnableXssAuditor#
    SettingsSetEnableXssAuditorMethodInfo   ,
    settingsSetEnableXssAuditor             ,


-- ** setFantasyFontFamily #method:setFantasyFontFamily#
    SettingsSetFantasyFontFamilyMethodInfo  ,
    settingsSetFantasyFontFamily            ,


-- ** setJavascriptCanAccessClipboard #method:setJavascriptCanAccessClipboard#
    SettingsSetJavascriptCanAccessClipboardMethodInfo,
    settingsSetJavascriptCanAccessClipboard ,


-- ** setJavascriptCanOpenWindowsAutomatically #method:setJavascriptCanOpenWindowsAutomatically#
    SettingsSetJavascriptCanOpenWindowsAutomaticallyMethodInfo,
    settingsSetJavascriptCanOpenWindowsAutomatically,


-- ** setLoadIconsIgnoringImageLoadSetting #method:setLoadIconsIgnoringImageLoadSetting#
    SettingsSetLoadIconsIgnoringImageLoadSettingMethodInfo,
    settingsSetLoadIconsIgnoringImageLoadSetting,


-- ** setMediaPlaybackAllowsInline #method:setMediaPlaybackAllowsInline#
    SettingsSetMediaPlaybackAllowsInlineMethodInfo,
    settingsSetMediaPlaybackAllowsInline    ,


-- ** setMediaPlaybackRequiresUserGesture #method:setMediaPlaybackRequiresUserGesture#
    SettingsSetMediaPlaybackRequiresUserGestureMethodInfo,
    settingsSetMediaPlaybackRequiresUserGesture,


-- ** setMinimumFontSize #method:setMinimumFontSize#
    SettingsSetMinimumFontSizeMethodInfo    ,
    settingsSetMinimumFontSize              ,


-- ** setMonospaceFontFamily #method:setMonospaceFontFamily#
    SettingsSetMonospaceFontFamilyMethodInfo,
    settingsSetMonospaceFontFamily          ,


-- ** setPictographFontFamily #method:setPictographFontFamily#
    SettingsSetPictographFontFamilyMethodInfo,
    settingsSetPictographFontFamily         ,


-- ** setPrintBackgrounds #method:setPrintBackgrounds#
    SettingsSetPrintBackgroundsMethodInfo   ,
    settingsSetPrintBackgrounds             ,


-- ** setSansSerifFontFamily #method:setSansSerifFontFamily#
    SettingsSetSansSerifFontFamilyMethodInfo,
    settingsSetSansSerifFontFamily          ,


-- ** setSerifFontFamily #method:setSerifFontFamily#
    SettingsSetSerifFontFamilyMethodInfo    ,
    settingsSetSerifFontFamily              ,


-- ** setUserAgent #method:setUserAgent#
    SettingsSetUserAgentMethodInfo          ,
    settingsSetUserAgent                    ,


-- ** setUserAgentWithApplicationDetails #method:setUserAgentWithApplicationDetails#
    SettingsSetUserAgentWithApplicationDetailsMethodInfo,
    settingsSetUserAgentWithApplicationDetails,


-- ** setZoomTextOnly #method:setZoomTextOnly#
    SettingsSetZoomTextOnlyMethodInfo       ,
    settingsSetZoomTextOnly                 ,




 -- * Properties
-- ** allowFileAccessFromFileUrls #attr:allowFileAccessFromFileUrls#
    SettingsAllowFileAccessFromFileUrlsPropertyInfo,
    constructSettingsAllowFileAccessFromFileUrls,
    getSettingsAllowFileAccessFromFileUrls  ,
    setSettingsAllowFileAccessFromFileUrls  ,
    settingsAllowFileAccessFromFileUrls     ,


-- ** allowModalDialogs #attr:allowModalDialogs#
    SettingsAllowModalDialogsPropertyInfo   ,
    constructSettingsAllowModalDialogs      ,
    getSettingsAllowModalDialogs            ,
    setSettingsAllowModalDialogs            ,
    settingsAllowModalDialogs               ,


-- ** allowUniversalAccessFromFileUrls #attr:allowUniversalAccessFromFileUrls#
    SettingsAllowUniversalAccessFromFileUrlsPropertyInfo,
    constructSettingsAllowUniversalAccessFromFileUrls,
    getSettingsAllowUniversalAccessFromFileUrls,
    setSettingsAllowUniversalAccessFromFileUrls,
    settingsAllowUniversalAccessFromFileUrls,


-- ** autoLoadImages #attr:autoLoadImages#
    SettingsAutoLoadImagesPropertyInfo      ,
    constructSettingsAutoLoadImages         ,
    getSettingsAutoLoadImages               ,
    setSettingsAutoLoadImages               ,
    settingsAutoLoadImages                  ,


-- ** cursiveFontFamily #attr:cursiveFontFamily#
    SettingsCursiveFontFamilyPropertyInfo   ,
    constructSettingsCursiveFontFamily      ,
    getSettingsCursiveFontFamily            ,
    setSettingsCursiveFontFamily            ,
    settingsCursiveFontFamily               ,


-- ** defaultCharset #attr:defaultCharset#
    SettingsDefaultCharsetPropertyInfo      ,
    constructSettingsDefaultCharset         ,
    getSettingsDefaultCharset               ,
    setSettingsDefaultCharset               ,
    settingsDefaultCharset                  ,


-- ** defaultFontFamily #attr:defaultFontFamily#
    SettingsDefaultFontFamilyPropertyInfo   ,
    constructSettingsDefaultFontFamily      ,
    getSettingsDefaultFontFamily            ,
    setSettingsDefaultFontFamily            ,
    settingsDefaultFontFamily               ,


-- ** defaultFontSize #attr:defaultFontSize#
    SettingsDefaultFontSizePropertyInfo     ,
    constructSettingsDefaultFontSize        ,
    getSettingsDefaultFontSize              ,
    setSettingsDefaultFontSize              ,
    settingsDefaultFontSize                 ,


-- ** defaultMonospaceFontSize #attr:defaultMonospaceFontSize#
    SettingsDefaultMonospaceFontSizePropertyInfo,
    constructSettingsDefaultMonospaceFontSize,
    getSettingsDefaultMonospaceFontSize     ,
    setSettingsDefaultMonospaceFontSize     ,
    settingsDefaultMonospaceFontSize        ,


-- ** drawCompositingIndicators #attr:drawCompositingIndicators#
    SettingsDrawCompositingIndicatorsPropertyInfo,
    constructSettingsDrawCompositingIndicators,
    getSettingsDrawCompositingIndicators    ,
    setSettingsDrawCompositingIndicators    ,
    settingsDrawCompositingIndicators       ,


-- ** enableAccelerated2dCanvas #attr:enableAccelerated2dCanvas#
    SettingsEnableAccelerated2dCanvasPropertyInfo,
    constructSettingsEnableAccelerated2dCanvas,
    getSettingsEnableAccelerated2dCanvas    ,
    setSettingsEnableAccelerated2dCanvas    ,
    settingsEnableAccelerated2dCanvas       ,


-- ** enableCaretBrowsing #attr:enableCaretBrowsing#
    SettingsEnableCaretBrowsingPropertyInfo ,
    constructSettingsEnableCaretBrowsing    ,
    getSettingsEnableCaretBrowsing          ,
    setSettingsEnableCaretBrowsing          ,
    settingsEnableCaretBrowsing             ,


-- ** enableDeveloperExtras #attr:enableDeveloperExtras#
    SettingsEnableDeveloperExtrasPropertyInfo,
    constructSettingsEnableDeveloperExtras  ,
    getSettingsEnableDeveloperExtras        ,
    setSettingsEnableDeveloperExtras        ,
    settingsEnableDeveloperExtras           ,


-- ** enableDnsPrefetching #attr:enableDnsPrefetching#
    SettingsEnableDnsPrefetchingPropertyInfo,
    constructSettingsEnableDnsPrefetching   ,
    getSettingsEnableDnsPrefetching         ,
    setSettingsEnableDnsPrefetching         ,
    settingsEnableDnsPrefetching            ,


-- ** enableFrameFlattening #attr:enableFrameFlattening#
    SettingsEnableFrameFlatteningPropertyInfo,
    constructSettingsEnableFrameFlattening  ,
    getSettingsEnableFrameFlattening        ,
    setSettingsEnableFrameFlattening        ,
    settingsEnableFrameFlattening           ,


-- ** enableFullscreen #attr:enableFullscreen#
    SettingsEnableFullscreenPropertyInfo    ,
    constructSettingsEnableFullscreen       ,
    getSettingsEnableFullscreen             ,
    setSettingsEnableFullscreen             ,
    settingsEnableFullscreen                ,


-- ** enableHtml5Database #attr:enableHtml5Database#
    SettingsEnableHtml5DatabasePropertyInfo ,
    constructSettingsEnableHtml5Database    ,
    getSettingsEnableHtml5Database          ,
    setSettingsEnableHtml5Database          ,
    settingsEnableHtml5Database             ,


-- ** enableHtml5LocalStorage #attr:enableHtml5LocalStorage#
    SettingsEnableHtml5LocalStoragePropertyInfo,
    constructSettingsEnableHtml5LocalStorage,
    getSettingsEnableHtml5LocalStorage      ,
    setSettingsEnableHtml5LocalStorage      ,
    settingsEnableHtml5LocalStorage         ,


-- ** enableHyperlinkAuditing #attr:enableHyperlinkAuditing#
    SettingsEnableHyperlinkAuditingPropertyInfo,
    constructSettingsEnableHyperlinkAuditing,
    getSettingsEnableHyperlinkAuditing      ,
    setSettingsEnableHyperlinkAuditing      ,
    settingsEnableHyperlinkAuditing         ,


-- ** enableJava #attr:enableJava#
    SettingsEnableJavaPropertyInfo          ,
    constructSettingsEnableJava             ,
    getSettingsEnableJava                   ,
    setSettingsEnableJava                   ,
    settingsEnableJava                      ,


-- ** enableJavascript #attr:enableJavascript#
    SettingsEnableJavascriptPropertyInfo    ,
    constructSettingsEnableJavascript       ,
    getSettingsEnableJavascript             ,
    setSettingsEnableJavascript             ,
    settingsEnableJavascript                ,


-- ** enableMediaStream #attr:enableMediaStream#
    SettingsEnableMediaStreamPropertyInfo   ,
    constructSettingsEnableMediaStream      ,
    getSettingsEnableMediaStream            ,
    setSettingsEnableMediaStream            ,
    settingsEnableMediaStream               ,


-- ** enableMediasource #attr:enableMediasource#
    SettingsEnableMediasourcePropertyInfo   ,
    constructSettingsEnableMediasource      ,
    getSettingsEnableMediasource            ,
    setSettingsEnableMediasource            ,
    settingsEnableMediasource               ,


-- ** enableOfflineWebApplicationCache #attr:enableOfflineWebApplicationCache#
    SettingsEnableOfflineWebApplicationCachePropertyInfo,
    constructSettingsEnableOfflineWebApplicationCache,
    getSettingsEnableOfflineWebApplicationCache,
    setSettingsEnableOfflineWebApplicationCache,
    settingsEnableOfflineWebApplicationCache,


-- ** enablePageCache #attr:enablePageCache#
    SettingsEnablePageCachePropertyInfo     ,
    constructSettingsEnablePageCache        ,
    getSettingsEnablePageCache              ,
    setSettingsEnablePageCache              ,
    settingsEnablePageCache                 ,


-- ** enablePlugins #attr:enablePlugins#
    SettingsEnablePluginsPropertyInfo       ,
    constructSettingsEnablePlugins          ,
    getSettingsEnablePlugins                ,
    setSettingsEnablePlugins                ,
    settingsEnablePlugins                   ,


-- ** enablePrivateBrowsing #attr:enablePrivateBrowsing#
    SettingsEnablePrivateBrowsingPropertyInfo,
    constructSettingsEnablePrivateBrowsing  ,
    getSettingsEnablePrivateBrowsing        ,
    setSettingsEnablePrivateBrowsing        ,
    settingsEnablePrivateBrowsing           ,


-- ** enableResizableTextAreas #attr:enableResizableTextAreas#
    SettingsEnableResizableTextAreasPropertyInfo,
    constructSettingsEnableResizableTextAreas,
    getSettingsEnableResizableTextAreas     ,
    setSettingsEnableResizableTextAreas     ,
    settingsEnableResizableTextAreas        ,


-- ** enableSiteSpecificQuirks #attr:enableSiteSpecificQuirks#
    SettingsEnableSiteSpecificQuirksPropertyInfo,
    constructSettingsEnableSiteSpecificQuirks,
    getSettingsEnableSiteSpecificQuirks     ,
    setSettingsEnableSiteSpecificQuirks     ,
    settingsEnableSiteSpecificQuirks        ,


-- ** enableSmoothScrolling #attr:enableSmoothScrolling#
    SettingsEnableSmoothScrollingPropertyInfo,
    constructSettingsEnableSmoothScrolling  ,
    getSettingsEnableSmoothScrolling        ,
    setSettingsEnableSmoothScrolling        ,
    settingsEnableSmoothScrolling           ,


-- ** enableSpatialNavigation #attr:enableSpatialNavigation#
    SettingsEnableSpatialNavigationPropertyInfo,
    constructSettingsEnableSpatialNavigation,
    getSettingsEnableSpatialNavigation      ,
    setSettingsEnableSpatialNavigation      ,
    settingsEnableSpatialNavigation         ,


-- ** enableTabsToLinks #attr:enableTabsToLinks#
    SettingsEnableTabsToLinksPropertyInfo   ,
    constructSettingsEnableTabsToLinks      ,
    getSettingsEnableTabsToLinks            ,
    setSettingsEnableTabsToLinks            ,
    settingsEnableTabsToLinks               ,


-- ** enableWebaudio #attr:enableWebaudio#
    SettingsEnableWebaudioPropertyInfo      ,
    constructSettingsEnableWebaudio         ,
    getSettingsEnableWebaudio               ,
    setSettingsEnableWebaudio               ,
    settingsEnableWebaudio                  ,


-- ** enableWebgl #attr:enableWebgl#
    SettingsEnableWebglPropertyInfo         ,
    constructSettingsEnableWebgl            ,
    getSettingsEnableWebgl                  ,
    setSettingsEnableWebgl                  ,
    settingsEnableWebgl                     ,


-- ** enableWriteConsoleMessagesToStdout #attr:enableWriteConsoleMessagesToStdout#
    SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo,
    constructSettingsEnableWriteConsoleMessagesToStdout,
    getSettingsEnableWriteConsoleMessagesToStdout,
    setSettingsEnableWriteConsoleMessagesToStdout,
    settingsEnableWriteConsoleMessagesToStdout,


-- ** enableXssAuditor #attr:enableXssAuditor#
    SettingsEnableXssAuditorPropertyInfo    ,
    constructSettingsEnableXssAuditor       ,
    getSettingsEnableXssAuditor             ,
    setSettingsEnableXssAuditor             ,
    settingsEnableXssAuditor                ,


-- ** fantasyFontFamily #attr:fantasyFontFamily#
    SettingsFantasyFontFamilyPropertyInfo   ,
    constructSettingsFantasyFontFamily      ,
    getSettingsFantasyFontFamily            ,
    setSettingsFantasyFontFamily            ,
    settingsFantasyFontFamily               ,


-- ** javascriptCanAccessClipboard #attr:javascriptCanAccessClipboard#
    SettingsJavascriptCanAccessClipboardPropertyInfo,
    constructSettingsJavascriptCanAccessClipboard,
    getSettingsJavascriptCanAccessClipboard ,
    setSettingsJavascriptCanAccessClipboard ,
    settingsJavascriptCanAccessClipboard    ,


-- ** javascriptCanOpenWindowsAutomatically #attr:javascriptCanOpenWindowsAutomatically#
    SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo,
    constructSettingsJavascriptCanOpenWindowsAutomatically,
    getSettingsJavascriptCanOpenWindowsAutomatically,
    setSettingsJavascriptCanOpenWindowsAutomatically,
    settingsJavascriptCanOpenWindowsAutomatically,


-- ** loadIconsIgnoringImageLoadSetting #attr:loadIconsIgnoringImageLoadSetting#
    SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo,
    constructSettingsLoadIconsIgnoringImageLoadSetting,
    getSettingsLoadIconsIgnoringImageLoadSetting,
    setSettingsLoadIconsIgnoringImageLoadSetting,
    settingsLoadIconsIgnoringImageLoadSetting,


-- ** mediaPlaybackAllowsInline #attr:mediaPlaybackAllowsInline#
    SettingsMediaPlaybackAllowsInlinePropertyInfo,
    constructSettingsMediaPlaybackAllowsInline,
    getSettingsMediaPlaybackAllowsInline    ,
    setSettingsMediaPlaybackAllowsInline    ,
    settingsMediaPlaybackAllowsInline       ,


-- ** mediaPlaybackRequiresUserGesture #attr:mediaPlaybackRequiresUserGesture#
    SettingsMediaPlaybackRequiresUserGesturePropertyInfo,
    constructSettingsMediaPlaybackRequiresUserGesture,
    getSettingsMediaPlaybackRequiresUserGesture,
    setSettingsMediaPlaybackRequiresUserGesture,
    settingsMediaPlaybackRequiresUserGesture,


-- ** minimumFontSize #attr:minimumFontSize#
    SettingsMinimumFontSizePropertyInfo     ,
    constructSettingsMinimumFontSize        ,
    getSettingsMinimumFontSize              ,
    setSettingsMinimumFontSize              ,
    settingsMinimumFontSize                 ,


-- ** monospaceFontFamily #attr:monospaceFontFamily#
    SettingsMonospaceFontFamilyPropertyInfo ,
    constructSettingsMonospaceFontFamily    ,
    getSettingsMonospaceFontFamily          ,
    setSettingsMonospaceFontFamily          ,
    settingsMonospaceFontFamily             ,


-- ** pictographFontFamily #attr:pictographFontFamily#
    SettingsPictographFontFamilyPropertyInfo,
    constructSettingsPictographFontFamily   ,
    getSettingsPictographFontFamily         ,
    setSettingsPictographFontFamily         ,
    settingsPictographFontFamily            ,


-- ** printBackgrounds #attr:printBackgrounds#
    SettingsPrintBackgroundsPropertyInfo    ,
    constructSettingsPrintBackgrounds       ,
    getSettingsPrintBackgrounds             ,
    setSettingsPrintBackgrounds             ,
    settingsPrintBackgrounds                ,


-- ** sansSerifFontFamily #attr:sansSerifFontFamily#
    SettingsSansSerifFontFamilyPropertyInfo ,
    constructSettingsSansSerifFontFamily    ,
    getSettingsSansSerifFontFamily          ,
    setSettingsSansSerifFontFamily          ,
    settingsSansSerifFontFamily             ,


-- ** serifFontFamily #attr:serifFontFamily#
    SettingsSerifFontFamilyPropertyInfo     ,
    constructSettingsSerifFontFamily        ,
    getSettingsSerifFontFamily              ,
    setSettingsSerifFontFamily              ,
    settingsSerifFontFamily                 ,


-- ** userAgent #attr:userAgent#
    SettingsUserAgentPropertyInfo           ,
    clearSettingsUserAgent                  ,
    constructSettingsUserAgent              ,
    getSettingsUserAgent                    ,
    setSettingsUserAgent                    ,
    settingsUserAgent                       ,


-- ** zoomTextOnly #attr:zoomTextOnly#
    SettingsZoomTextOnlyPropertyInfo        ,
    constructSettingsZoomTextOnly           ,
    getSettingsZoomTextOnly                 ,
    setSettingsZoomTextOnly                 ,
    settingsZoomTextOnly                    ,




    ) where

import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P

import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP

import qualified GI.GObject.Objects.Object as GObject.Object

newtype Settings = Settings (ManagedPtr Settings)
foreign import ccall "webkit_settings_get_type"
    c_webkit_settings_get_type :: IO GType

instance GObject Settings where
    gobjectType _ = c_webkit_settings_get_type
    

class GObject o => IsSettings o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError Settings a) =>
    IsSettings a
#endif
instance IsSettings Settings
instance GObject.Object.IsObject Settings

toSettings :: IsSettings o => o -> IO Settings
toSettings = unsafeCastTo Settings

noSettings :: Maybe Settings
noSettings = Nothing

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 "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 "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
    ResolveSettingsMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
    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 "getAllowFileAccessFromFileUrls" o = SettingsGetAllowFileAccessFromFileUrlsMethodInfo
    ResolveSettingsMethod "getAllowModalDialogs" o = SettingsGetAllowModalDialogsMethodInfo
    ResolveSettingsMethod "getAllowUniversalAccessFromFileUrls" o = SettingsGetAllowUniversalAccessFromFileUrlsMethodInfo
    ResolveSettingsMethod "getAutoLoadImages" o = SettingsGetAutoLoadImagesMethodInfo
    ResolveSettingsMethod "getCursiveFontFamily" o = SettingsGetCursiveFontFamilyMethodInfo
    ResolveSettingsMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveSettingsMethod "getDefaultCharset" o = SettingsGetDefaultCharsetMethodInfo
    ResolveSettingsMethod "getDefaultFontFamily" o = SettingsGetDefaultFontFamilyMethodInfo
    ResolveSettingsMethod "getDefaultFontSize" o = SettingsGetDefaultFontSizeMethodInfo
    ResolveSettingsMethod "getDefaultMonospaceFontSize" o = SettingsGetDefaultMonospaceFontSizeMethodInfo
    ResolveSettingsMethod "getDrawCompositingIndicators" o = SettingsGetDrawCompositingIndicatorsMethodInfo
    ResolveSettingsMethod "getEnableAccelerated2dCanvas" o = SettingsGetEnableAccelerated2dCanvasMethodInfo
    ResolveSettingsMethod "getEnableCaretBrowsing" o = SettingsGetEnableCaretBrowsingMethodInfo
    ResolveSettingsMethod "getEnableDeveloperExtras" o = SettingsGetEnableDeveloperExtrasMethodInfo
    ResolveSettingsMethod "getEnableDnsPrefetching" o = SettingsGetEnableDnsPrefetchingMethodInfo
    ResolveSettingsMethod "getEnableFrameFlattening" o = SettingsGetEnableFrameFlatteningMethodInfo
    ResolveSettingsMethod "getEnableFullscreen" o = SettingsGetEnableFullscreenMethodInfo
    ResolveSettingsMethod "getEnableHtml5Database" o = SettingsGetEnableHtml5DatabaseMethodInfo
    ResolveSettingsMethod "getEnableHtml5LocalStorage" o = SettingsGetEnableHtml5LocalStorageMethodInfo
    ResolveSettingsMethod "getEnableHyperlinkAuditing" o = SettingsGetEnableHyperlinkAuditingMethodInfo
    ResolveSettingsMethod "getEnableJava" o = SettingsGetEnableJavaMethodInfo
    ResolveSettingsMethod "getEnableJavascript" o = SettingsGetEnableJavascriptMethodInfo
    ResolveSettingsMethod "getEnableMediaStream" o = SettingsGetEnableMediaStreamMethodInfo
    ResolveSettingsMethod "getEnableMediasource" o = SettingsGetEnableMediasourceMethodInfo
    ResolveSettingsMethod "getEnableOfflineWebApplicationCache" o = SettingsGetEnableOfflineWebApplicationCacheMethodInfo
    ResolveSettingsMethod "getEnablePageCache" o = SettingsGetEnablePageCacheMethodInfo
    ResolveSettingsMethod "getEnablePlugins" o = SettingsGetEnablePluginsMethodInfo
    ResolveSettingsMethod "getEnablePrivateBrowsing" o = SettingsGetEnablePrivateBrowsingMethodInfo
    ResolveSettingsMethod "getEnableResizableTextAreas" o = SettingsGetEnableResizableTextAreasMethodInfo
    ResolveSettingsMethod "getEnableSiteSpecificQuirks" o = SettingsGetEnableSiteSpecificQuirksMethodInfo
    ResolveSettingsMethod "getEnableSmoothScrolling" o = SettingsGetEnableSmoothScrollingMethodInfo
    ResolveSettingsMethod "getEnableSpatialNavigation" o = SettingsGetEnableSpatialNavigationMethodInfo
    ResolveSettingsMethod "getEnableTabsToLinks" o = SettingsGetEnableTabsToLinksMethodInfo
    ResolveSettingsMethod "getEnableWebaudio" o = SettingsGetEnableWebaudioMethodInfo
    ResolveSettingsMethod "getEnableWebgl" o = SettingsGetEnableWebglMethodInfo
    ResolveSettingsMethod "getEnableWriteConsoleMessagesToStdout" o = SettingsGetEnableWriteConsoleMessagesToStdoutMethodInfo
    ResolveSettingsMethod "getEnableXssAuditor" o = SettingsGetEnableXssAuditorMethodInfo
    ResolveSettingsMethod "getFantasyFontFamily" o = SettingsGetFantasyFontFamilyMethodInfo
    ResolveSettingsMethod "getJavascriptCanAccessClipboard" o = SettingsGetJavascriptCanAccessClipboardMethodInfo
    ResolveSettingsMethod "getJavascriptCanOpenWindowsAutomatically" o = SettingsGetJavascriptCanOpenWindowsAutomaticallyMethodInfo
    ResolveSettingsMethod "getLoadIconsIgnoringImageLoadSetting" o = SettingsGetLoadIconsIgnoringImageLoadSettingMethodInfo
    ResolveSettingsMethod "getMediaPlaybackAllowsInline" o = SettingsGetMediaPlaybackAllowsInlineMethodInfo
    ResolveSettingsMethod "getMediaPlaybackRequiresUserGesture" o = SettingsGetMediaPlaybackRequiresUserGestureMethodInfo
    ResolveSettingsMethod "getMinimumFontSize" o = SettingsGetMinimumFontSizeMethodInfo
    ResolveSettingsMethod "getMonospaceFontFamily" o = SettingsGetMonospaceFontFamilyMethodInfo
    ResolveSettingsMethod "getPictographFontFamily" o = SettingsGetPictographFontFamilyMethodInfo
    ResolveSettingsMethod "getPrintBackgrounds" o = SettingsGetPrintBackgroundsMethodInfo
    ResolveSettingsMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveSettingsMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveSettingsMethod "getSansSerifFontFamily" o = SettingsGetSansSerifFontFamilyMethodInfo
    ResolveSettingsMethod "getSerifFontFamily" o = SettingsGetSerifFontFamilyMethodInfo
    ResolveSettingsMethod "getUserAgent" o = SettingsGetUserAgentMethodInfo
    ResolveSettingsMethod "getZoomTextOnly" o = SettingsGetZoomTextOnlyMethodInfo
    ResolveSettingsMethod "setAllowFileAccessFromFileUrls" o = SettingsSetAllowFileAccessFromFileUrlsMethodInfo
    ResolveSettingsMethod "setAllowModalDialogs" o = SettingsSetAllowModalDialogsMethodInfo
    ResolveSettingsMethod "setAllowUniversalAccessFromFileUrls" o = SettingsSetAllowUniversalAccessFromFileUrlsMethodInfo
    ResolveSettingsMethod "setAutoLoadImages" o = SettingsSetAutoLoadImagesMethodInfo
    ResolveSettingsMethod "setCursiveFontFamily" o = SettingsSetCursiveFontFamilyMethodInfo
    ResolveSettingsMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveSettingsMethod "setDefaultCharset" o = SettingsSetDefaultCharsetMethodInfo
    ResolveSettingsMethod "setDefaultFontFamily" o = SettingsSetDefaultFontFamilyMethodInfo
    ResolveSettingsMethod "setDefaultFontSize" o = SettingsSetDefaultFontSizeMethodInfo
    ResolveSettingsMethod "setDefaultMonospaceFontSize" o = SettingsSetDefaultMonospaceFontSizeMethodInfo
    ResolveSettingsMethod "setDrawCompositingIndicators" o = SettingsSetDrawCompositingIndicatorsMethodInfo
    ResolveSettingsMethod "setEnableAccelerated2dCanvas" o = SettingsSetEnableAccelerated2dCanvasMethodInfo
    ResolveSettingsMethod "setEnableCaretBrowsing" o = SettingsSetEnableCaretBrowsingMethodInfo
    ResolveSettingsMethod "setEnableDeveloperExtras" o = SettingsSetEnableDeveloperExtrasMethodInfo
    ResolveSettingsMethod "setEnableDnsPrefetching" o = SettingsSetEnableDnsPrefetchingMethodInfo
    ResolveSettingsMethod "setEnableFrameFlattening" o = SettingsSetEnableFrameFlatteningMethodInfo
    ResolveSettingsMethod "setEnableFullscreen" o = SettingsSetEnableFullscreenMethodInfo
    ResolveSettingsMethod "setEnableHtml5Database" o = SettingsSetEnableHtml5DatabaseMethodInfo
    ResolveSettingsMethod "setEnableHtml5LocalStorage" o = SettingsSetEnableHtml5LocalStorageMethodInfo
    ResolveSettingsMethod "setEnableHyperlinkAuditing" o = SettingsSetEnableHyperlinkAuditingMethodInfo
    ResolveSettingsMethod "setEnableJava" o = SettingsSetEnableJavaMethodInfo
    ResolveSettingsMethod "setEnableJavascript" o = SettingsSetEnableJavascriptMethodInfo
    ResolveSettingsMethod "setEnableMediaStream" o = SettingsSetEnableMediaStreamMethodInfo
    ResolveSettingsMethod "setEnableMediasource" o = SettingsSetEnableMediasourceMethodInfo
    ResolveSettingsMethod "setEnableOfflineWebApplicationCache" o = SettingsSetEnableOfflineWebApplicationCacheMethodInfo
    ResolveSettingsMethod "setEnablePageCache" o = SettingsSetEnablePageCacheMethodInfo
    ResolveSettingsMethod "setEnablePlugins" o = SettingsSetEnablePluginsMethodInfo
    ResolveSettingsMethod "setEnablePrivateBrowsing" o = SettingsSetEnablePrivateBrowsingMethodInfo
    ResolveSettingsMethod "setEnableResizableTextAreas" o = SettingsSetEnableResizableTextAreasMethodInfo
    ResolveSettingsMethod "setEnableSiteSpecificQuirks" o = SettingsSetEnableSiteSpecificQuirksMethodInfo
    ResolveSettingsMethod "setEnableSmoothScrolling" o = SettingsSetEnableSmoothScrollingMethodInfo
    ResolveSettingsMethod "setEnableSpatialNavigation" o = SettingsSetEnableSpatialNavigationMethodInfo
    ResolveSettingsMethod "setEnableTabsToLinks" o = SettingsSetEnableTabsToLinksMethodInfo
    ResolveSettingsMethod "setEnableWebaudio" o = SettingsSetEnableWebaudioMethodInfo
    ResolveSettingsMethod "setEnableWebgl" o = SettingsSetEnableWebglMethodInfo
    ResolveSettingsMethod "setEnableWriteConsoleMessagesToStdout" o = SettingsSetEnableWriteConsoleMessagesToStdoutMethodInfo
    ResolveSettingsMethod "setEnableXssAuditor" o = SettingsSetEnableXssAuditorMethodInfo
    ResolveSettingsMethod "setFantasyFontFamily" o = SettingsSetFantasyFontFamilyMethodInfo
    ResolveSettingsMethod "setJavascriptCanAccessClipboard" o = SettingsSetJavascriptCanAccessClipboardMethodInfo
    ResolveSettingsMethod "setJavascriptCanOpenWindowsAutomatically" o = SettingsSetJavascriptCanOpenWindowsAutomaticallyMethodInfo
    ResolveSettingsMethod "setLoadIconsIgnoringImageLoadSetting" o = SettingsSetLoadIconsIgnoringImageLoadSettingMethodInfo
    ResolveSettingsMethod "setMediaPlaybackAllowsInline" o = SettingsSetMediaPlaybackAllowsInlineMethodInfo
    ResolveSettingsMethod "setMediaPlaybackRequiresUserGesture" o = SettingsSetMediaPlaybackRequiresUserGestureMethodInfo
    ResolveSettingsMethod "setMinimumFontSize" o = SettingsSetMinimumFontSizeMethodInfo
    ResolveSettingsMethod "setMonospaceFontFamily" o = SettingsSetMonospaceFontFamilyMethodInfo
    ResolveSettingsMethod "setPictographFontFamily" o = SettingsSetPictographFontFamilyMethodInfo
    ResolveSettingsMethod "setPrintBackgrounds" o = SettingsSetPrintBackgroundsMethodInfo
    ResolveSettingsMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveSettingsMethod "setSansSerifFontFamily" o = SettingsSetSansSerifFontFamilyMethodInfo
    ResolveSettingsMethod "setSerifFontFamily" o = SettingsSetSerifFontFamilyMethodInfo
    ResolveSettingsMethod "setUserAgent" o = SettingsSetUserAgentMethodInfo
    ResolveSettingsMethod "setUserAgentWithApplicationDetails" o = SettingsSetUserAgentWithApplicationDetailsMethodInfo
    ResolveSettingsMethod "setZoomTextOnly" o = SettingsSetZoomTextOnlyMethodInfo
    ResolveSettingsMethod l o = O.MethodResolutionFailed l o

instance (info ~ ResolveSettingsMethod t Settings, O.MethodInfo info Settings p) => O.IsLabelProxy t (Settings -> p) where
    fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)

#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveSettingsMethod t Settings, O.MethodInfo info Settings p) => O.IsLabel t (Settings -> p) where
    fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif

-- VVV Prop "allow-file-access-from-file-urls"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsAllowFileAccessFromFileUrls :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsAllowFileAccessFromFileUrls obj = liftIO $ getObjectPropertyBool obj "allow-file-access-from-file-urls"

setSettingsAllowFileAccessFromFileUrls :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsAllowFileAccessFromFileUrls obj val = liftIO $ setObjectPropertyBool obj "allow-file-access-from-file-urls" val

constructSettingsAllowFileAccessFromFileUrls :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsAllowFileAccessFromFileUrls val = constructObjectPropertyBool "allow-file-access-from-file-urls" val

data SettingsAllowFileAccessFromFileUrlsPropertyInfo
instance AttrInfo SettingsAllowFileAccessFromFileUrlsPropertyInfo where
    type AttrAllowedOps SettingsAllowFileAccessFromFileUrlsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsAllowFileAccessFromFileUrlsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsAllowFileAccessFromFileUrlsPropertyInfo = IsSettings
    type AttrGetType SettingsAllowFileAccessFromFileUrlsPropertyInfo = Bool
    type AttrLabel SettingsAllowFileAccessFromFileUrlsPropertyInfo = "allow-file-access-from-file-urls"
    type AttrOrigin SettingsAllowFileAccessFromFileUrlsPropertyInfo = Settings
    attrGet _ = getSettingsAllowFileAccessFromFileUrls
    attrSet _ = setSettingsAllowFileAccessFromFileUrls
    attrConstruct _ = constructSettingsAllowFileAccessFromFileUrls
    attrClear _ = undefined

-- VVV Prop "allow-modal-dialogs"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsAllowModalDialogs :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsAllowModalDialogs obj = liftIO $ getObjectPropertyBool obj "allow-modal-dialogs"

setSettingsAllowModalDialogs :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsAllowModalDialogs obj val = liftIO $ setObjectPropertyBool obj "allow-modal-dialogs" val

constructSettingsAllowModalDialogs :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsAllowModalDialogs val = constructObjectPropertyBool "allow-modal-dialogs" val

data SettingsAllowModalDialogsPropertyInfo
instance AttrInfo SettingsAllowModalDialogsPropertyInfo where
    type AttrAllowedOps SettingsAllowModalDialogsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsAllowModalDialogsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsAllowModalDialogsPropertyInfo = IsSettings
    type AttrGetType SettingsAllowModalDialogsPropertyInfo = Bool
    type AttrLabel SettingsAllowModalDialogsPropertyInfo = "allow-modal-dialogs"
    type AttrOrigin SettingsAllowModalDialogsPropertyInfo = Settings
    attrGet _ = getSettingsAllowModalDialogs
    attrSet _ = setSettingsAllowModalDialogs
    attrConstruct _ = constructSettingsAllowModalDialogs
    attrClear _ = undefined

-- VVV Prop "allow-universal-access-from-file-urls"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsAllowUniversalAccessFromFileUrls :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsAllowUniversalAccessFromFileUrls obj = liftIO $ getObjectPropertyBool obj "allow-universal-access-from-file-urls"

setSettingsAllowUniversalAccessFromFileUrls :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsAllowUniversalAccessFromFileUrls obj val = liftIO $ setObjectPropertyBool obj "allow-universal-access-from-file-urls" val

constructSettingsAllowUniversalAccessFromFileUrls :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsAllowUniversalAccessFromFileUrls val = constructObjectPropertyBool "allow-universal-access-from-file-urls" val

data SettingsAllowUniversalAccessFromFileUrlsPropertyInfo
instance AttrInfo SettingsAllowUniversalAccessFromFileUrlsPropertyInfo where
    type AttrAllowedOps SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = IsSettings
    type AttrGetType SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = Bool
    type AttrLabel SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = "allow-universal-access-from-file-urls"
    type AttrOrigin SettingsAllowUniversalAccessFromFileUrlsPropertyInfo = Settings
    attrGet _ = getSettingsAllowUniversalAccessFromFileUrls
    attrSet _ = setSettingsAllowUniversalAccessFromFileUrls
    attrConstruct _ = constructSettingsAllowUniversalAccessFromFileUrls
    attrClear _ = undefined

-- VVV Prop "auto-load-images"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsAutoLoadImages :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsAutoLoadImages obj = liftIO $ getObjectPropertyBool obj "auto-load-images"

setSettingsAutoLoadImages :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsAutoLoadImages obj val = liftIO $ setObjectPropertyBool obj "auto-load-images" val

constructSettingsAutoLoadImages :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsAutoLoadImages val = constructObjectPropertyBool "auto-load-images" val

data SettingsAutoLoadImagesPropertyInfo
instance AttrInfo SettingsAutoLoadImagesPropertyInfo where
    type AttrAllowedOps SettingsAutoLoadImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsAutoLoadImagesPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsAutoLoadImagesPropertyInfo = IsSettings
    type AttrGetType SettingsAutoLoadImagesPropertyInfo = Bool
    type AttrLabel SettingsAutoLoadImagesPropertyInfo = "auto-load-images"
    type AttrOrigin SettingsAutoLoadImagesPropertyInfo = Settings
    attrGet _ = getSettingsAutoLoadImages
    attrSet _ = setSettingsAutoLoadImages
    attrConstruct _ = constructSettingsAutoLoadImages
    attrClear _ = undefined

-- VVV Prop "cursive-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsCursiveFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsCursiveFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsCursiveFontFamily" $ getObjectPropertyString obj "cursive-font-family"

setSettingsCursiveFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsCursiveFontFamily obj val = liftIO $ setObjectPropertyString obj "cursive-font-family" (Just val)

constructSettingsCursiveFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsCursiveFontFamily val = constructObjectPropertyString "cursive-font-family" (Just val)

data SettingsCursiveFontFamilyPropertyInfo
instance AttrInfo SettingsCursiveFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsCursiveFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsCursiveFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsCursiveFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsCursiveFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsCursiveFontFamilyPropertyInfo = "cursive-font-family"
    type AttrOrigin SettingsCursiveFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsCursiveFontFamily
    attrSet _ = setSettingsCursiveFontFamily
    attrConstruct _ = constructSettingsCursiveFontFamily
    attrClear _ = undefined

-- VVV Prop "default-charset"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsDefaultCharset :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsDefaultCharset obj = liftIO $ checkUnexpectedNothing "getSettingsDefaultCharset" $ getObjectPropertyString obj "default-charset"

setSettingsDefaultCharset :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsDefaultCharset obj val = liftIO $ setObjectPropertyString obj "default-charset" (Just val)

constructSettingsDefaultCharset :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsDefaultCharset val = constructObjectPropertyString "default-charset" (Just val)

data SettingsDefaultCharsetPropertyInfo
instance AttrInfo SettingsDefaultCharsetPropertyInfo where
    type AttrAllowedOps SettingsDefaultCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsDefaultCharsetPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsDefaultCharsetPropertyInfo = IsSettings
    type AttrGetType SettingsDefaultCharsetPropertyInfo = T.Text
    type AttrLabel SettingsDefaultCharsetPropertyInfo = "default-charset"
    type AttrOrigin SettingsDefaultCharsetPropertyInfo = Settings
    attrGet _ = getSettingsDefaultCharset
    attrSet _ = setSettingsDefaultCharset
    attrConstruct _ = constructSettingsDefaultCharset
    attrClear _ = undefined

-- VVV Prop "default-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsDefaultFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsDefaultFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsDefaultFontFamily" $ getObjectPropertyString obj "default-font-family"

setSettingsDefaultFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsDefaultFontFamily obj val = liftIO $ setObjectPropertyString obj "default-font-family" (Just val)

constructSettingsDefaultFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsDefaultFontFamily val = constructObjectPropertyString "default-font-family" (Just val)

data SettingsDefaultFontFamilyPropertyInfo
instance AttrInfo SettingsDefaultFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsDefaultFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsDefaultFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsDefaultFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsDefaultFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsDefaultFontFamilyPropertyInfo = "default-font-family"
    type AttrOrigin SettingsDefaultFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsDefaultFontFamily
    attrSet _ = setSettingsDefaultFontFamily
    attrConstruct _ = constructSettingsDefaultFontFamily
    attrClear _ = undefined

-- VVV Prop "default-font-size"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Nothing,Nothing)

getSettingsDefaultFontSize :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsDefaultFontSize obj = liftIO $ getObjectPropertyUInt32 obj "default-font-size"

setSettingsDefaultFontSize :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsDefaultFontSize obj val = liftIO $ setObjectPropertyUInt32 obj "default-font-size" val

constructSettingsDefaultFontSize :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsDefaultFontSize val = constructObjectPropertyUInt32 "default-font-size" val

data SettingsDefaultFontSizePropertyInfo
instance AttrInfo SettingsDefaultFontSizePropertyInfo where
    type AttrAllowedOps SettingsDefaultFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsDefaultFontSizePropertyInfo = (~) Word32
    type AttrBaseTypeConstraint SettingsDefaultFontSizePropertyInfo = IsSettings
    type AttrGetType SettingsDefaultFontSizePropertyInfo = Word32
    type AttrLabel SettingsDefaultFontSizePropertyInfo = "default-font-size"
    type AttrOrigin SettingsDefaultFontSizePropertyInfo = Settings
    attrGet _ = getSettingsDefaultFontSize
    attrSet _ = setSettingsDefaultFontSize
    attrConstruct _ = constructSettingsDefaultFontSize
    attrClear _ = undefined

-- VVV Prop "default-monospace-font-size"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Nothing,Nothing)

getSettingsDefaultMonospaceFontSize :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsDefaultMonospaceFontSize obj = liftIO $ getObjectPropertyUInt32 obj "default-monospace-font-size"

setSettingsDefaultMonospaceFontSize :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsDefaultMonospaceFontSize obj val = liftIO $ setObjectPropertyUInt32 obj "default-monospace-font-size" val

constructSettingsDefaultMonospaceFontSize :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsDefaultMonospaceFontSize val = constructObjectPropertyUInt32 "default-monospace-font-size" val

data SettingsDefaultMonospaceFontSizePropertyInfo
instance AttrInfo SettingsDefaultMonospaceFontSizePropertyInfo where
    type AttrAllowedOps SettingsDefaultMonospaceFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsDefaultMonospaceFontSizePropertyInfo = (~) Word32
    type AttrBaseTypeConstraint SettingsDefaultMonospaceFontSizePropertyInfo = IsSettings
    type AttrGetType SettingsDefaultMonospaceFontSizePropertyInfo = Word32
    type AttrLabel SettingsDefaultMonospaceFontSizePropertyInfo = "default-monospace-font-size"
    type AttrOrigin SettingsDefaultMonospaceFontSizePropertyInfo = Settings
    attrGet _ = getSettingsDefaultMonospaceFontSize
    attrSet _ = setSettingsDefaultMonospaceFontSize
    attrConstruct _ = constructSettingsDefaultMonospaceFontSize
    attrClear _ = undefined

-- VVV Prop "draw-compositing-indicators"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsDrawCompositingIndicators :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsDrawCompositingIndicators obj = liftIO $ getObjectPropertyBool obj "draw-compositing-indicators"

setSettingsDrawCompositingIndicators :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsDrawCompositingIndicators obj val = liftIO $ setObjectPropertyBool obj "draw-compositing-indicators" val

constructSettingsDrawCompositingIndicators :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsDrawCompositingIndicators val = constructObjectPropertyBool "draw-compositing-indicators" val

data SettingsDrawCompositingIndicatorsPropertyInfo
instance AttrInfo SettingsDrawCompositingIndicatorsPropertyInfo where
    type AttrAllowedOps SettingsDrawCompositingIndicatorsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsDrawCompositingIndicatorsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsDrawCompositingIndicatorsPropertyInfo = IsSettings
    type AttrGetType SettingsDrawCompositingIndicatorsPropertyInfo = Bool
    type AttrLabel SettingsDrawCompositingIndicatorsPropertyInfo = "draw-compositing-indicators"
    type AttrOrigin SettingsDrawCompositingIndicatorsPropertyInfo = Settings
    attrGet _ = getSettingsDrawCompositingIndicators
    attrSet _ = setSettingsDrawCompositingIndicators
    attrConstruct _ = constructSettingsDrawCompositingIndicators
    attrClear _ = undefined

-- VVV Prop "enable-accelerated-2d-canvas"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableAccelerated2dCanvas :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableAccelerated2dCanvas obj = liftIO $ getObjectPropertyBool obj "enable-accelerated-2d-canvas"

setSettingsEnableAccelerated2dCanvas :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableAccelerated2dCanvas obj val = liftIO $ setObjectPropertyBool obj "enable-accelerated-2d-canvas" val

constructSettingsEnableAccelerated2dCanvas :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableAccelerated2dCanvas val = constructObjectPropertyBool "enable-accelerated-2d-canvas" val

data SettingsEnableAccelerated2dCanvasPropertyInfo
instance AttrInfo SettingsEnableAccelerated2dCanvasPropertyInfo where
    type AttrAllowedOps SettingsEnableAccelerated2dCanvasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableAccelerated2dCanvasPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableAccelerated2dCanvasPropertyInfo = IsSettings
    type AttrGetType SettingsEnableAccelerated2dCanvasPropertyInfo = Bool
    type AttrLabel SettingsEnableAccelerated2dCanvasPropertyInfo = "enable-accelerated-2d-canvas"
    type AttrOrigin SettingsEnableAccelerated2dCanvasPropertyInfo = Settings
    attrGet _ = getSettingsEnableAccelerated2dCanvas
    attrSet _ = setSettingsEnableAccelerated2dCanvas
    attrConstruct _ = constructSettingsEnableAccelerated2dCanvas
    attrClear _ = undefined

-- VVV Prop "enable-caret-browsing"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableCaretBrowsing :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableCaretBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-caret-browsing"

setSettingsEnableCaretBrowsing :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableCaretBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-caret-browsing" val

constructSettingsEnableCaretBrowsing :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableCaretBrowsing val = constructObjectPropertyBool "enable-caret-browsing" val

data SettingsEnableCaretBrowsingPropertyInfo
instance AttrInfo SettingsEnableCaretBrowsingPropertyInfo where
    type AttrAllowedOps SettingsEnableCaretBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableCaretBrowsingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableCaretBrowsingPropertyInfo = IsSettings
    type AttrGetType SettingsEnableCaretBrowsingPropertyInfo = Bool
    type AttrLabel SettingsEnableCaretBrowsingPropertyInfo = "enable-caret-browsing"
    type AttrOrigin SettingsEnableCaretBrowsingPropertyInfo = Settings
    attrGet _ = getSettingsEnableCaretBrowsing
    attrSet _ = setSettingsEnableCaretBrowsing
    attrConstruct _ = constructSettingsEnableCaretBrowsing
    attrClear _ = undefined

-- VVV Prop "enable-developer-extras"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableDeveloperExtras :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableDeveloperExtras obj = liftIO $ getObjectPropertyBool obj "enable-developer-extras"

setSettingsEnableDeveloperExtras :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableDeveloperExtras obj val = liftIO $ setObjectPropertyBool obj "enable-developer-extras" val

constructSettingsEnableDeveloperExtras :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableDeveloperExtras val = constructObjectPropertyBool "enable-developer-extras" val

data SettingsEnableDeveloperExtrasPropertyInfo
instance AttrInfo SettingsEnableDeveloperExtrasPropertyInfo where
    type AttrAllowedOps SettingsEnableDeveloperExtrasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableDeveloperExtrasPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableDeveloperExtrasPropertyInfo = IsSettings
    type AttrGetType SettingsEnableDeveloperExtrasPropertyInfo = Bool
    type AttrLabel SettingsEnableDeveloperExtrasPropertyInfo = "enable-developer-extras"
    type AttrOrigin SettingsEnableDeveloperExtrasPropertyInfo = Settings
    attrGet _ = getSettingsEnableDeveloperExtras
    attrSet _ = setSettingsEnableDeveloperExtras
    attrConstruct _ = constructSettingsEnableDeveloperExtras
    attrClear _ = undefined

-- VVV Prop "enable-dns-prefetching"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableDnsPrefetching :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableDnsPrefetching obj = liftIO $ getObjectPropertyBool obj "enable-dns-prefetching"

setSettingsEnableDnsPrefetching :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableDnsPrefetching obj val = liftIO $ setObjectPropertyBool obj "enable-dns-prefetching" val

constructSettingsEnableDnsPrefetching :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableDnsPrefetching val = constructObjectPropertyBool "enable-dns-prefetching" val

data SettingsEnableDnsPrefetchingPropertyInfo
instance AttrInfo SettingsEnableDnsPrefetchingPropertyInfo where
    type AttrAllowedOps SettingsEnableDnsPrefetchingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableDnsPrefetchingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableDnsPrefetchingPropertyInfo = IsSettings
    type AttrGetType SettingsEnableDnsPrefetchingPropertyInfo = Bool
    type AttrLabel SettingsEnableDnsPrefetchingPropertyInfo = "enable-dns-prefetching"
    type AttrOrigin SettingsEnableDnsPrefetchingPropertyInfo = Settings
    attrGet _ = getSettingsEnableDnsPrefetching
    attrSet _ = setSettingsEnableDnsPrefetching
    attrConstruct _ = constructSettingsEnableDnsPrefetching
    attrClear _ = undefined

-- VVV Prop "enable-frame-flattening"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableFrameFlattening :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableFrameFlattening obj = liftIO $ getObjectPropertyBool obj "enable-frame-flattening"

setSettingsEnableFrameFlattening :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableFrameFlattening obj val = liftIO $ setObjectPropertyBool obj "enable-frame-flattening" val

constructSettingsEnableFrameFlattening :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableFrameFlattening val = constructObjectPropertyBool "enable-frame-flattening" val

data SettingsEnableFrameFlatteningPropertyInfo
instance AttrInfo SettingsEnableFrameFlatteningPropertyInfo where
    type AttrAllowedOps SettingsEnableFrameFlatteningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableFrameFlatteningPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableFrameFlatteningPropertyInfo = IsSettings
    type AttrGetType SettingsEnableFrameFlatteningPropertyInfo = Bool
    type AttrLabel SettingsEnableFrameFlatteningPropertyInfo = "enable-frame-flattening"
    type AttrOrigin SettingsEnableFrameFlatteningPropertyInfo = Settings
    attrGet _ = getSettingsEnableFrameFlattening
    attrSet _ = setSettingsEnableFrameFlattening
    attrConstruct _ = constructSettingsEnableFrameFlattening
    attrClear _ = undefined

-- VVV Prop "enable-fullscreen"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableFullscreen :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableFullscreen obj = liftIO $ getObjectPropertyBool obj "enable-fullscreen"

setSettingsEnableFullscreen :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableFullscreen obj val = liftIO $ setObjectPropertyBool obj "enable-fullscreen" val

constructSettingsEnableFullscreen :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableFullscreen val = constructObjectPropertyBool "enable-fullscreen" val

data SettingsEnableFullscreenPropertyInfo
instance AttrInfo SettingsEnableFullscreenPropertyInfo where
    type AttrAllowedOps SettingsEnableFullscreenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableFullscreenPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableFullscreenPropertyInfo = IsSettings
    type AttrGetType SettingsEnableFullscreenPropertyInfo = Bool
    type AttrLabel SettingsEnableFullscreenPropertyInfo = "enable-fullscreen"
    type AttrOrigin SettingsEnableFullscreenPropertyInfo = Settings
    attrGet _ = getSettingsEnableFullscreen
    attrSet _ = setSettingsEnableFullscreen
    attrConstruct _ = constructSettingsEnableFullscreen
    attrClear _ = undefined

-- VVV Prop "enable-html5-database"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableHtml5Database :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableHtml5Database obj = liftIO $ getObjectPropertyBool obj "enable-html5-database"

setSettingsEnableHtml5Database :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableHtml5Database obj val = liftIO $ setObjectPropertyBool obj "enable-html5-database" val

constructSettingsEnableHtml5Database :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableHtml5Database val = constructObjectPropertyBool "enable-html5-database" val

data SettingsEnableHtml5DatabasePropertyInfo
instance AttrInfo SettingsEnableHtml5DatabasePropertyInfo where
    type AttrAllowedOps SettingsEnableHtml5DatabasePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableHtml5DatabasePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableHtml5DatabasePropertyInfo = IsSettings
    type AttrGetType SettingsEnableHtml5DatabasePropertyInfo = Bool
    type AttrLabel SettingsEnableHtml5DatabasePropertyInfo = "enable-html5-database"
    type AttrOrigin SettingsEnableHtml5DatabasePropertyInfo = Settings
    attrGet _ = getSettingsEnableHtml5Database
    attrSet _ = setSettingsEnableHtml5Database
    attrConstruct _ = constructSettingsEnableHtml5Database
    attrClear _ = undefined

-- VVV Prop "enable-html5-local-storage"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableHtml5LocalStorage :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableHtml5LocalStorage obj = liftIO $ getObjectPropertyBool obj "enable-html5-local-storage"

setSettingsEnableHtml5LocalStorage :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableHtml5LocalStorage obj val = liftIO $ setObjectPropertyBool obj "enable-html5-local-storage" val

constructSettingsEnableHtml5LocalStorage :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableHtml5LocalStorage val = constructObjectPropertyBool "enable-html5-local-storage" val

data SettingsEnableHtml5LocalStoragePropertyInfo
instance AttrInfo SettingsEnableHtml5LocalStoragePropertyInfo where
    type AttrAllowedOps SettingsEnableHtml5LocalStoragePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableHtml5LocalStoragePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableHtml5LocalStoragePropertyInfo = IsSettings
    type AttrGetType SettingsEnableHtml5LocalStoragePropertyInfo = Bool
    type AttrLabel SettingsEnableHtml5LocalStoragePropertyInfo = "enable-html5-local-storage"
    type AttrOrigin SettingsEnableHtml5LocalStoragePropertyInfo = Settings
    attrGet _ = getSettingsEnableHtml5LocalStorage
    attrSet _ = setSettingsEnableHtml5LocalStorage
    attrConstruct _ = constructSettingsEnableHtml5LocalStorage
    attrClear _ = undefined

-- VVV Prop "enable-hyperlink-auditing"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableHyperlinkAuditing :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableHyperlinkAuditing obj = liftIO $ getObjectPropertyBool obj "enable-hyperlink-auditing"

setSettingsEnableHyperlinkAuditing :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableHyperlinkAuditing obj val = liftIO $ setObjectPropertyBool obj "enable-hyperlink-auditing" val

constructSettingsEnableHyperlinkAuditing :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableHyperlinkAuditing val = constructObjectPropertyBool "enable-hyperlink-auditing" val

data SettingsEnableHyperlinkAuditingPropertyInfo
instance AttrInfo SettingsEnableHyperlinkAuditingPropertyInfo where
    type AttrAllowedOps SettingsEnableHyperlinkAuditingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableHyperlinkAuditingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableHyperlinkAuditingPropertyInfo = IsSettings
    type AttrGetType SettingsEnableHyperlinkAuditingPropertyInfo = Bool
    type AttrLabel SettingsEnableHyperlinkAuditingPropertyInfo = "enable-hyperlink-auditing"
    type AttrOrigin SettingsEnableHyperlinkAuditingPropertyInfo = Settings
    attrGet _ = getSettingsEnableHyperlinkAuditing
    attrSet _ = setSettingsEnableHyperlinkAuditing
    attrConstruct _ = constructSettingsEnableHyperlinkAuditing
    attrClear _ = undefined

-- VVV Prop "enable-java"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableJava :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableJava obj = liftIO $ getObjectPropertyBool obj "enable-java"

setSettingsEnableJava :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableJava obj val = liftIO $ setObjectPropertyBool obj "enable-java" val

constructSettingsEnableJava :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableJava val = constructObjectPropertyBool "enable-java" val

data SettingsEnableJavaPropertyInfo
instance AttrInfo SettingsEnableJavaPropertyInfo where
    type AttrAllowedOps SettingsEnableJavaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableJavaPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableJavaPropertyInfo = IsSettings
    type AttrGetType SettingsEnableJavaPropertyInfo = Bool
    type AttrLabel SettingsEnableJavaPropertyInfo = "enable-java"
    type AttrOrigin SettingsEnableJavaPropertyInfo = Settings
    attrGet _ = getSettingsEnableJava
    attrSet _ = setSettingsEnableJava
    attrConstruct _ = constructSettingsEnableJava
    attrClear _ = undefined

-- VVV Prop "enable-javascript"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableJavascript :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableJavascript obj = liftIO $ getObjectPropertyBool obj "enable-javascript"

setSettingsEnableJavascript :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableJavascript obj val = liftIO $ setObjectPropertyBool obj "enable-javascript" val

constructSettingsEnableJavascript :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableJavascript val = constructObjectPropertyBool "enable-javascript" val

data SettingsEnableJavascriptPropertyInfo
instance AttrInfo SettingsEnableJavascriptPropertyInfo where
    type AttrAllowedOps SettingsEnableJavascriptPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableJavascriptPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableJavascriptPropertyInfo = IsSettings
    type AttrGetType SettingsEnableJavascriptPropertyInfo = Bool
    type AttrLabel SettingsEnableJavascriptPropertyInfo = "enable-javascript"
    type AttrOrigin SettingsEnableJavascriptPropertyInfo = Settings
    attrGet _ = getSettingsEnableJavascript
    attrSet _ = setSettingsEnableJavascript
    attrConstruct _ = constructSettingsEnableJavascript
    attrClear _ = undefined

-- VVV Prop "enable-media-stream"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableMediaStream :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableMediaStream obj = liftIO $ getObjectPropertyBool obj "enable-media-stream"

setSettingsEnableMediaStream :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableMediaStream obj val = liftIO $ setObjectPropertyBool obj "enable-media-stream" val

constructSettingsEnableMediaStream :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableMediaStream val = constructObjectPropertyBool "enable-media-stream" val

data SettingsEnableMediaStreamPropertyInfo
instance AttrInfo SettingsEnableMediaStreamPropertyInfo where
    type AttrAllowedOps SettingsEnableMediaStreamPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableMediaStreamPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableMediaStreamPropertyInfo = IsSettings
    type AttrGetType SettingsEnableMediaStreamPropertyInfo = Bool
    type AttrLabel SettingsEnableMediaStreamPropertyInfo = "enable-media-stream"
    type AttrOrigin SettingsEnableMediaStreamPropertyInfo = Settings
    attrGet _ = getSettingsEnableMediaStream
    attrSet _ = setSettingsEnableMediaStream
    attrConstruct _ = constructSettingsEnableMediaStream
    attrClear _ = undefined

-- VVV Prop "enable-mediasource"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableMediasource :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableMediasource obj = liftIO $ getObjectPropertyBool obj "enable-mediasource"

setSettingsEnableMediasource :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableMediasource obj val = liftIO $ setObjectPropertyBool obj "enable-mediasource" val

constructSettingsEnableMediasource :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableMediasource val = constructObjectPropertyBool "enable-mediasource" val

data SettingsEnableMediasourcePropertyInfo
instance AttrInfo SettingsEnableMediasourcePropertyInfo where
    type AttrAllowedOps SettingsEnableMediasourcePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableMediasourcePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableMediasourcePropertyInfo = IsSettings
    type AttrGetType SettingsEnableMediasourcePropertyInfo = Bool
    type AttrLabel SettingsEnableMediasourcePropertyInfo = "enable-mediasource"
    type AttrOrigin SettingsEnableMediasourcePropertyInfo = Settings
    attrGet _ = getSettingsEnableMediasource
    attrSet _ = setSettingsEnableMediasource
    attrConstruct _ = constructSettingsEnableMediasource
    attrClear _ = undefined

-- VVV Prop "enable-offline-web-application-cache"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableOfflineWebApplicationCache :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableOfflineWebApplicationCache obj = liftIO $ getObjectPropertyBool obj "enable-offline-web-application-cache"

setSettingsEnableOfflineWebApplicationCache :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableOfflineWebApplicationCache obj val = liftIO $ setObjectPropertyBool obj "enable-offline-web-application-cache" val

constructSettingsEnableOfflineWebApplicationCache :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableOfflineWebApplicationCache val = constructObjectPropertyBool "enable-offline-web-application-cache" val

data SettingsEnableOfflineWebApplicationCachePropertyInfo
instance AttrInfo SettingsEnableOfflineWebApplicationCachePropertyInfo where
    type AttrAllowedOps SettingsEnableOfflineWebApplicationCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableOfflineWebApplicationCachePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableOfflineWebApplicationCachePropertyInfo = IsSettings
    type AttrGetType SettingsEnableOfflineWebApplicationCachePropertyInfo = Bool
    type AttrLabel SettingsEnableOfflineWebApplicationCachePropertyInfo = "enable-offline-web-application-cache"
    type AttrOrigin SettingsEnableOfflineWebApplicationCachePropertyInfo = Settings
    attrGet _ = getSettingsEnableOfflineWebApplicationCache
    attrSet _ = setSettingsEnableOfflineWebApplicationCache
    attrConstruct _ = constructSettingsEnableOfflineWebApplicationCache
    attrClear _ = undefined

-- VVV Prop "enable-page-cache"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnablePageCache :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnablePageCache obj = liftIO $ getObjectPropertyBool obj "enable-page-cache"

setSettingsEnablePageCache :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnablePageCache obj val = liftIO $ setObjectPropertyBool obj "enable-page-cache" val

constructSettingsEnablePageCache :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnablePageCache val = constructObjectPropertyBool "enable-page-cache" val

data SettingsEnablePageCachePropertyInfo
instance AttrInfo SettingsEnablePageCachePropertyInfo where
    type AttrAllowedOps SettingsEnablePageCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnablePageCachePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnablePageCachePropertyInfo = IsSettings
    type AttrGetType SettingsEnablePageCachePropertyInfo = Bool
    type AttrLabel SettingsEnablePageCachePropertyInfo = "enable-page-cache"
    type AttrOrigin SettingsEnablePageCachePropertyInfo = Settings
    attrGet _ = getSettingsEnablePageCache
    attrSet _ = setSettingsEnablePageCache
    attrConstruct _ = constructSettingsEnablePageCache
    attrClear _ = undefined

-- VVV Prop "enable-plugins"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnablePlugins :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnablePlugins obj = liftIO $ getObjectPropertyBool obj "enable-plugins"

setSettingsEnablePlugins :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnablePlugins obj val = liftIO $ setObjectPropertyBool obj "enable-plugins" val

constructSettingsEnablePlugins :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnablePlugins val = constructObjectPropertyBool "enable-plugins" val

data SettingsEnablePluginsPropertyInfo
instance AttrInfo SettingsEnablePluginsPropertyInfo where
    type AttrAllowedOps SettingsEnablePluginsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnablePluginsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnablePluginsPropertyInfo = IsSettings
    type AttrGetType SettingsEnablePluginsPropertyInfo = Bool
    type AttrLabel SettingsEnablePluginsPropertyInfo = "enable-plugins"
    type AttrOrigin SettingsEnablePluginsPropertyInfo = Settings
    attrGet _ = getSettingsEnablePlugins
    attrSet _ = setSettingsEnablePlugins
    attrConstruct _ = constructSettingsEnablePlugins
    attrClear _ = undefined

-- VVV Prop "enable-private-browsing"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnablePrivateBrowsing :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnablePrivateBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-private-browsing"

setSettingsEnablePrivateBrowsing :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnablePrivateBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-private-browsing" val

constructSettingsEnablePrivateBrowsing :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnablePrivateBrowsing val = constructObjectPropertyBool "enable-private-browsing" val

data SettingsEnablePrivateBrowsingPropertyInfo
instance AttrInfo SettingsEnablePrivateBrowsingPropertyInfo where
    type AttrAllowedOps SettingsEnablePrivateBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnablePrivateBrowsingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnablePrivateBrowsingPropertyInfo = IsSettings
    type AttrGetType SettingsEnablePrivateBrowsingPropertyInfo = Bool
    type AttrLabel SettingsEnablePrivateBrowsingPropertyInfo = "enable-private-browsing"
    type AttrOrigin SettingsEnablePrivateBrowsingPropertyInfo = Settings
    attrGet _ = getSettingsEnablePrivateBrowsing
    attrSet _ = setSettingsEnablePrivateBrowsing
    attrConstruct _ = constructSettingsEnablePrivateBrowsing
    attrClear _ = undefined

-- VVV Prop "enable-resizable-text-areas"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableResizableTextAreas :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableResizableTextAreas obj = liftIO $ getObjectPropertyBool obj "enable-resizable-text-areas"

setSettingsEnableResizableTextAreas :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableResizableTextAreas obj val = liftIO $ setObjectPropertyBool obj "enable-resizable-text-areas" val

constructSettingsEnableResizableTextAreas :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableResizableTextAreas val = constructObjectPropertyBool "enable-resizable-text-areas" val

data SettingsEnableResizableTextAreasPropertyInfo
instance AttrInfo SettingsEnableResizableTextAreasPropertyInfo where
    type AttrAllowedOps SettingsEnableResizableTextAreasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableResizableTextAreasPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableResizableTextAreasPropertyInfo = IsSettings
    type AttrGetType SettingsEnableResizableTextAreasPropertyInfo = Bool
    type AttrLabel SettingsEnableResizableTextAreasPropertyInfo = "enable-resizable-text-areas"
    type AttrOrigin SettingsEnableResizableTextAreasPropertyInfo = Settings
    attrGet _ = getSettingsEnableResizableTextAreas
    attrSet _ = setSettingsEnableResizableTextAreas
    attrConstruct _ = constructSettingsEnableResizableTextAreas
    attrClear _ = undefined

-- VVV Prop "enable-site-specific-quirks"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableSiteSpecificQuirks :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableSiteSpecificQuirks obj = liftIO $ getObjectPropertyBool obj "enable-site-specific-quirks"

setSettingsEnableSiteSpecificQuirks :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableSiteSpecificQuirks obj val = liftIO $ setObjectPropertyBool obj "enable-site-specific-quirks" val

constructSettingsEnableSiteSpecificQuirks :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableSiteSpecificQuirks val = constructObjectPropertyBool "enable-site-specific-quirks" val

data SettingsEnableSiteSpecificQuirksPropertyInfo
instance AttrInfo SettingsEnableSiteSpecificQuirksPropertyInfo where
    type AttrAllowedOps SettingsEnableSiteSpecificQuirksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableSiteSpecificQuirksPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableSiteSpecificQuirksPropertyInfo = IsSettings
    type AttrGetType SettingsEnableSiteSpecificQuirksPropertyInfo = Bool
    type AttrLabel SettingsEnableSiteSpecificQuirksPropertyInfo = "enable-site-specific-quirks"
    type AttrOrigin SettingsEnableSiteSpecificQuirksPropertyInfo = Settings
    attrGet _ = getSettingsEnableSiteSpecificQuirks
    attrSet _ = setSettingsEnableSiteSpecificQuirks
    attrConstruct _ = constructSettingsEnableSiteSpecificQuirks
    attrClear _ = undefined

-- VVV Prop "enable-smooth-scrolling"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableSmoothScrolling :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableSmoothScrolling obj = liftIO $ getObjectPropertyBool obj "enable-smooth-scrolling"

setSettingsEnableSmoothScrolling :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableSmoothScrolling obj val = liftIO $ setObjectPropertyBool obj "enable-smooth-scrolling" val

constructSettingsEnableSmoothScrolling :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableSmoothScrolling val = constructObjectPropertyBool "enable-smooth-scrolling" val

data SettingsEnableSmoothScrollingPropertyInfo
instance AttrInfo SettingsEnableSmoothScrollingPropertyInfo where
    type AttrAllowedOps SettingsEnableSmoothScrollingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableSmoothScrollingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableSmoothScrollingPropertyInfo = IsSettings
    type AttrGetType SettingsEnableSmoothScrollingPropertyInfo = Bool
    type AttrLabel SettingsEnableSmoothScrollingPropertyInfo = "enable-smooth-scrolling"
    type AttrOrigin SettingsEnableSmoothScrollingPropertyInfo = Settings
    attrGet _ = getSettingsEnableSmoothScrolling
    attrSet _ = setSettingsEnableSmoothScrolling
    attrConstruct _ = constructSettingsEnableSmoothScrolling
    attrClear _ = undefined

-- VVV Prop "enable-spatial-navigation"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableSpatialNavigation :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableSpatialNavigation obj = liftIO $ getObjectPropertyBool obj "enable-spatial-navigation"

setSettingsEnableSpatialNavigation :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableSpatialNavigation obj val = liftIO $ setObjectPropertyBool obj "enable-spatial-navigation" val

constructSettingsEnableSpatialNavigation :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableSpatialNavigation val = constructObjectPropertyBool "enable-spatial-navigation" val

data SettingsEnableSpatialNavigationPropertyInfo
instance AttrInfo SettingsEnableSpatialNavigationPropertyInfo where
    type AttrAllowedOps SettingsEnableSpatialNavigationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableSpatialNavigationPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableSpatialNavigationPropertyInfo = IsSettings
    type AttrGetType SettingsEnableSpatialNavigationPropertyInfo = Bool
    type AttrLabel SettingsEnableSpatialNavigationPropertyInfo = "enable-spatial-navigation"
    type AttrOrigin SettingsEnableSpatialNavigationPropertyInfo = Settings
    attrGet _ = getSettingsEnableSpatialNavigation
    attrSet _ = setSettingsEnableSpatialNavigation
    attrConstruct _ = constructSettingsEnableSpatialNavigation
    attrClear _ = undefined

-- VVV Prop "enable-tabs-to-links"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableTabsToLinks :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableTabsToLinks obj = liftIO $ getObjectPropertyBool obj "enable-tabs-to-links"

setSettingsEnableTabsToLinks :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableTabsToLinks obj val = liftIO $ setObjectPropertyBool obj "enable-tabs-to-links" val

constructSettingsEnableTabsToLinks :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableTabsToLinks val = constructObjectPropertyBool "enable-tabs-to-links" val

data SettingsEnableTabsToLinksPropertyInfo
instance AttrInfo SettingsEnableTabsToLinksPropertyInfo where
    type AttrAllowedOps SettingsEnableTabsToLinksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableTabsToLinksPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableTabsToLinksPropertyInfo = IsSettings
    type AttrGetType SettingsEnableTabsToLinksPropertyInfo = Bool
    type AttrLabel SettingsEnableTabsToLinksPropertyInfo = "enable-tabs-to-links"
    type AttrOrigin SettingsEnableTabsToLinksPropertyInfo = Settings
    attrGet _ = getSettingsEnableTabsToLinks
    attrSet _ = setSettingsEnableTabsToLinks
    attrConstruct _ = constructSettingsEnableTabsToLinks
    attrClear _ = undefined

-- VVV Prop "enable-webaudio"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableWebaudio :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableWebaudio obj = liftIO $ getObjectPropertyBool obj "enable-webaudio"

setSettingsEnableWebaudio :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableWebaudio obj val = liftIO $ setObjectPropertyBool obj "enable-webaudio" val

constructSettingsEnableWebaudio :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableWebaudio val = constructObjectPropertyBool "enable-webaudio" val

data SettingsEnableWebaudioPropertyInfo
instance AttrInfo SettingsEnableWebaudioPropertyInfo where
    type AttrAllowedOps SettingsEnableWebaudioPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableWebaudioPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableWebaudioPropertyInfo = IsSettings
    type AttrGetType SettingsEnableWebaudioPropertyInfo = Bool
    type AttrLabel SettingsEnableWebaudioPropertyInfo = "enable-webaudio"
    type AttrOrigin SettingsEnableWebaudioPropertyInfo = Settings
    attrGet _ = getSettingsEnableWebaudio
    attrSet _ = setSettingsEnableWebaudio
    attrConstruct _ = constructSettingsEnableWebaudio
    attrClear _ = undefined

-- VVV Prop "enable-webgl"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableWebgl :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableWebgl obj = liftIO $ getObjectPropertyBool obj "enable-webgl"

setSettingsEnableWebgl :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableWebgl obj val = liftIO $ setObjectPropertyBool obj "enable-webgl" val

constructSettingsEnableWebgl :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableWebgl val = constructObjectPropertyBool "enable-webgl" val

data SettingsEnableWebglPropertyInfo
instance AttrInfo SettingsEnableWebglPropertyInfo where
    type AttrAllowedOps SettingsEnableWebglPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableWebglPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableWebglPropertyInfo = IsSettings
    type AttrGetType SettingsEnableWebglPropertyInfo = Bool
    type AttrLabel SettingsEnableWebglPropertyInfo = "enable-webgl"
    type AttrOrigin SettingsEnableWebglPropertyInfo = Settings
    attrGet _ = getSettingsEnableWebgl
    attrSet _ = setSettingsEnableWebgl
    attrConstruct _ = constructSettingsEnableWebgl
    attrClear _ = undefined

-- VVV Prop "enable-write-console-messages-to-stdout"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableWriteConsoleMessagesToStdout :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableWriteConsoleMessagesToStdout obj = liftIO $ getObjectPropertyBool obj "enable-write-console-messages-to-stdout"

setSettingsEnableWriteConsoleMessagesToStdout :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableWriteConsoleMessagesToStdout obj val = liftIO $ setObjectPropertyBool obj "enable-write-console-messages-to-stdout" val

constructSettingsEnableWriteConsoleMessagesToStdout :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableWriteConsoleMessagesToStdout val = constructObjectPropertyBool "enable-write-console-messages-to-stdout" val

data SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo
instance AttrInfo SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo where
    type AttrAllowedOps SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = IsSettings
    type AttrGetType SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = Bool
    type AttrLabel SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = "enable-write-console-messages-to-stdout"
    type AttrOrigin SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo = Settings
    attrGet _ = getSettingsEnableWriteConsoleMessagesToStdout
    attrSet _ = setSettingsEnableWriteConsoleMessagesToStdout
    attrConstruct _ = constructSettingsEnableWriteConsoleMessagesToStdout
    attrClear _ = undefined

-- VVV Prop "enable-xss-auditor"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsEnableXssAuditor :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsEnableXssAuditor obj = liftIO $ getObjectPropertyBool obj "enable-xss-auditor"

setSettingsEnableXssAuditor :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsEnableXssAuditor obj val = liftIO $ setObjectPropertyBool obj "enable-xss-auditor" val

constructSettingsEnableXssAuditor :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsEnableXssAuditor val = constructObjectPropertyBool "enable-xss-auditor" val

data SettingsEnableXssAuditorPropertyInfo
instance AttrInfo SettingsEnableXssAuditorPropertyInfo where
    type AttrAllowedOps SettingsEnableXssAuditorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsEnableXssAuditorPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsEnableXssAuditorPropertyInfo = IsSettings
    type AttrGetType SettingsEnableXssAuditorPropertyInfo = Bool
    type AttrLabel SettingsEnableXssAuditorPropertyInfo = "enable-xss-auditor"
    type AttrOrigin SettingsEnableXssAuditorPropertyInfo = Settings
    attrGet _ = getSettingsEnableXssAuditor
    attrSet _ = setSettingsEnableXssAuditor
    attrConstruct _ = constructSettingsEnableXssAuditor
    attrClear _ = undefined

-- VVV Prop "fantasy-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsFantasyFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsFantasyFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsFantasyFontFamily" $ getObjectPropertyString obj "fantasy-font-family"

setSettingsFantasyFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsFantasyFontFamily obj val = liftIO $ setObjectPropertyString obj "fantasy-font-family" (Just val)

constructSettingsFantasyFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsFantasyFontFamily val = constructObjectPropertyString "fantasy-font-family" (Just val)

data SettingsFantasyFontFamilyPropertyInfo
instance AttrInfo SettingsFantasyFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsFantasyFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsFantasyFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsFantasyFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsFantasyFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsFantasyFontFamilyPropertyInfo = "fantasy-font-family"
    type AttrOrigin SettingsFantasyFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsFantasyFontFamily
    attrSet _ = setSettingsFantasyFontFamily
    attrConstruct _ = constructSettingsFantasyFontFamily
    attrClear _ = undefined

-- VVV Prop "javascript-can-access-clipboard"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsJavascriptCanAccessClipboard :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsJavascriptCanAccessClipboard obj = liftIO $ getObjectPropertyBool obj "javascript-can-access-clipboard"

setSettingsJavascriptCanAccessClipboard :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsJavascriptCanAccessClipboard obj val = liftIO $ setObjectPropertyBool obj "javascript-can-access-clipboard" val

constructSettingsJavascriptCanAccessClipboard :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsJavascriptCanAccessClipboard val = constructObjectPropertyBool "javascript-can-access-clipboard" val

data SettingsJavascriptCanAccessClipboardPropertyInfo
instance AttrInfo SettingsJavascriptCanAccessClipboardPropertyInfo where
    type AttrAllowedOps SettingsJavascriptCanAccessClipboardPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsJavascriptCanAccessClipboardPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsJavascriptCanAccessClipboardPropertyInfo = IsSettings
    type AttrGetType SettingsJavascriptCanAccessClipboardPropertyInfo = Bool
    type AttrLabel SettingsJavascriptCanAccessClipboardPropertyInfo = "javascript-can-access-clipboard"
    type AttrOrigin SettingsJavascriptCanAccessClipboardPropertyInfo = Settings
    attrGet _ = getSettingsJavascriptCanAccessClipboard
    attrSet _ = setSettingsJavascriptCanAccessClipboard
    attrConstruct _ = constructSettingsJavascriptCanAccessClipboard
    attrClear _ = undefined

-- VVV Prop "javascript-can-open-windows-automatically"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsJavascriptCanOpenWindowsAutomatically obj = liftIO $ getObjectPropertyBool obj "javascript-can-open-windows-automatically"

setSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsJavascriptCanOpenWindowsAutomatically obj val = liftIO $ setObjectPropertyBool obj "javascript-can-open-windows-automatically" val

constructSettingsJavascriptCanOpenWindowsAutomatically :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsJavascriptCanOpenWindowsAutomatically val = constructObjectPropertyBool "javascript-can-open-windows-automatically" val

data SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo
instance AttrInfo SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo where
    type AttrAllowedOps SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = IsSettings
    type AttrGetType SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = Bool
    type AttrLabel SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = "javascript-can-open-windows-automatically"
    type AttrOrigin SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = Settings
    attrGet _ = getSettingsJavascriptCanOpenWindowsAutomatically
    attrSet _ = setSettingsJavascriptCanOpenWindowsAutomatically
    attrConstruct _ = constructSettingsJavascriptCanOpenWindowsAutomatically
    attrClear _ = undefined

-- VVV Prop "load-icons-ignoring-image-load-setting"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsLoadIconsIgnoringImageLoadSetting :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsLoadIconsIgnoringImageLoadSetting obj = liftIO $ getObjectPropertyBool obj "load-icons-ignoring-image-load-setting"

setSettingsLoadIconsIgnoringImageLoadSetting :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsLoadIconsIgnoringImageLoadSetting obj val = liftIO $ setObjectPropertyBool obj "load-icons-ignoring-image-load-setting" val

constructSettingsLoadIconsIgnoringImageLoadSetting :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsLoadIconsIgnoringImageLoadSetting val = constructObjectPropertyBool "load-icons-ignoring-image-load-setting" val

data SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo
instance AttrInfo SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo where
    type AttrAllowedOps SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = IsSettings
    type AttrGetType SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = Bool
    type AttrLabel SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = "load-icons-ignoring-image-load-setting"
    type AttrOrigin SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo = Settings
    attrGet _ = getSettingsLoadIconsIgnoringImageLoadSetting
    attrSet _ = setSettingsLoadIconsIgnoringImageLoadSetting
    attrConstruct _ = constructSettingsLoadIconsIgnoringImageLoadSetting
    attrClear _ = undefined

-- VVV Prop "media-playback-allows-inline"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsMediaPlaybackAllowsInline :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsMediaPlaybackAllowsInline obj = liftIO $ getObjectPropertyBool obj "media-playback-allows-inline"

setSettingsMediaPlaybackAllowsInline :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsMediaPlaybackAllowsInline obj val = liftIO $ setObjectPropertyBool obj "media-playback-allows-inline" val

constructSettingsMediaPlaybackAllowsInline :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsMediaPlaybackAllowsInline val = constructObjectPropertyBool "media-playback-allows-inline" val

data SettingsMediaPlaybackAllowsInlinePropertyInfo
instance AttrInfo SettingsMediaPlaybackAllowsInlinePropertyInfo where
    type AttrAllowedOps SettingsMediaPlaybackAllowsInlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsMediaPlaybackAllowsInlinePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsMediaPlaybackAllowsInlinePropertyInfo = IsSettings
    type AttrGetType SettingsMediaPlaybackAllowsInlinePropertyInfo = Bool
    type AttrLabel SettingsMediaPlaybackAllowsInlinePropertyInfo = "media-playback-allows-inline"
    type AttrOrigin SettingsMediaPlaybackAllowsInlinePropertyInfo = Settings
    attrGet _ = getSettingsMediaPlaybackAllowsInline
    attrSet _ = setSettingsMediaPlaybackAllowsInline
    attrConstruct _ = constructSettingsMediaPlaybackAllowsInline
    attrClear _ = undefined

-- VVV Prop "media-playback-requires-user-gesture"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsMediaPlaybackRequiresUserGesture obj = liftIO $ getObjectPropertyBool obj "media-playback-requires-user-gesture"

setSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsMediaPlaybackRequiresUserGesture obj val = liftIO $ setObjectPropertyBool obj "media-playback-requires-user-gesture" val

constructSettingsMediaPlaybackRequiresUserGesture :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsMediaPlaybackRequiresUserGesture val = constructObjectPropertyBool "media-playback-requires-user-gesture" val

data SettingsMediaPlaybackRequiresUserGesturePropertyInfo
instance AttrInfo SettingsMediaPlaybackRequiresUserGesturePropertyInfo where
    type AttrAllowedOps SettingsMediaPlaybackRequiresUserGesturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsMediaPlaybackRequiresUserGesturePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsMediaPlaybackRequiresUserGesturePropertyInfo = IsSettings
    type AttrGetType SettingsMediaPlaybackRequiresUserGesturePropertyInfo = Bool
    type AttrLabel SettingsMediaPlaybackRequiresUserGesturePropertyInfo = "media-playback-requires-user-gesture"
    type AttrOrigin SettingsMediaPlaybackRequiresUserGesturePropertyInfo = Settings
    attrGet _ = getSettingsMediaPlaybackRequiresUserGesture
    attrSet _ = setSettingsMediaPlaybackRequiresUserGesture
    attrConstruct _ = constructSettingsMediaPlaybackRequiresUserGesture
    attrClear _ = undefined

-- VVV Prop "minimum-font-size"
   -- Type: TBasicType TUInt
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Nothing,Nothing)

getSettingsMinimumFontSize :: (MonadIO m, IsSettings o) => o -> m Word32
getSettingsMinimumFontSize obj = liftIO $ getObjectPropertyUInt32 obj "minimum-font-size"

setSettingsMinimumFontSize :: (MonadIO m, IsSettings o) => o -> Word32 -> m ()
setSettingsMinimumFontSize obj val = liftIO $ setObjectPropertyUInt32 obj "minimum-font-size" val

constructSettingsMinimumFontSize :: (IsSettings o) => Word32 -> IO (GValueConstruct o)
constructSettingsMinimumFontSize val = constructObjectPropertyUInt32 "minimum-font-size" val

data SettingsMinimumFontSizePropertyInfo
instance AttrInfo SettingsMinimumFontSizePropertyInfo where
    type AttrAllowedOps SettingsMinimumFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsMinimumFontSizePropertyInfo = (~) Word32
    type AttrBaseTypeConstraint SettingsMinimumFontSizePropertyInfo = IsSettings
    type AttrGetType SettingsMinimumFontSizePropertyInfo = Word32
    type AttrLabel SettingsMinimumFontSizePropertyInfo = "minimum-font-size"
    type AttrOrigin SettingsMinimumFontSizePropertyInfo = Settings
    attrGet _ = getSettingsMinimumFontSize
    attrSet _ = setSettingsMinimumFontSize
    attrConstruct _ = constructSettingsMinimumFontSize
    attrClear _ = undefined

-- VVV Prop "monospace-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsMonospaceFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsMonospaceFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsMonospaceFontFamily" $ getObjectPropertyString obj "monospace-font-family"

setSettingsMonospaceFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsMonospaceFontFamily obj val = liftIO $ setObjectPropertyString obj "monospace-font-family" (Just val)

constructSettingsMonospaceFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsMonospaceFontFamily val = constructObjectPropertyString "monospace-font-family" (Just val)

data SettingsMonospaceFontFamilyPropertyInfo
instance AttrInfo SettingsMonospaceFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsMonospaceFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsMonospaceFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsMonospaceFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsMonospaceFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsMonospaceFontFamilyPropertyInfo = "monospace-font-family"
    type AttrOrigin SettingsMonospaceFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsMonospaceFontFamily
    attrSet _ = setSettingsMonospaceFontFamily
    attrConstruct _ = constructSettingsMonospaceFontFamily
    attrClear _ = undefined

-- VVV Prop "pictograph-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsPictographFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsPictographFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsPictographFontFamily" $ getObjectPropertyString obj "pictograph-font-family"

setSettingsPictographFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsPictographFontFamily obj val = liftIO $ setObjectPropertyString obj "pictograph-font-family" (Just val)

constructSettingsPictographFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsPictographFontFamily val = constructObjectPropertyString "pictograph-font-family" (Just val)

data SettingsPictographFontFamilyPropertyInfo
instance AttrInfo SettingsPictographFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsPictographFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsPictographFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsPictographFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsPictographFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsPictographFontFamilyPropertyInfo = "pictograph-font-family"
    type AttrOrigin SettingsPictographFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsPictographFontFamily
    attrSet _ = setSettingsPictographFontFamily
    attrConstruct _ = constructSettingsPictographFontFamily
    attrClear _ = undefined

-- VVV Prop "print-backgrounds"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsPrintBackgrounds :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsPrintBackgrounds obj = liftIO $ getObjectPropertyBool obj "print-backgrounds"

setSettingsPrintBackgrounds :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsPrintBackgrounds obj val = liftIO $ setObjectPropertyBool obj "print-backgrounds" val

constructSettingsPrintBackgrounds :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsPrintBackgrounds val = constructObjectPropertyBool "print-backgrounds" val

data SettingsPrintBackgroundsPropertyInfo
instance AttrInfo SettingsPrintBackgroundsPropertyInfo where
    type AttrAllowedOps SettingsPrintBackgroundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsPrintBackgroundsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsPrintBackgroundsPropertyInfo = IsSettings
    type AttrGetType SettingsPrintBackgroundsPropertyInfo = Bool
    type AttrLabel SettingsPrintBackgroundsPropertyInfo = "print-backgrounds"
    type AttrOrigin SettingsPrintBackgroundsPropertyInfo = Settings
    attrGet _ = getSettingsPrintBackgrounds
    attrSet _ = setSettingsPrintBackgrounds
    attrConstruct _ = constructSettingsPrintBackgrounds
    attrClear _ = undefined

-- VVV Prop "sans-serif-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsSansSerifFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsSansSerifFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsSansSerifFontFamily" $ getObjectPropertyString obj "sans-serif-font-family"

setSettingsSansSerifFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsSansSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "sans-serif-font-family" (Just val)

constructSettingsSansSerifFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsSansSerifFontFamily val = constructObjectPropertyString "sans-serif-font-family" (Just val)

data SettingsSansSerifFontFamilyPropertyInfo
instance AttrInfo SettingsSansSerifFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsSansSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsSansSerifFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsSansSerifFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsSansSerifFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsSansSerifFontFamilyPropertyInfo = "sans-serif-font-family"
    type AttrOrigin SettingsSansSerifFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsSansSerifFontFamily
    attrSet _ = setSettingsSansSerifFontFamily
    attrConstruct _ = constructSettingsSansSerifFontFamily
    attrClear _ = undefined

-- VVV Prop "serif-font-family"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsSerifFontFamily :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsSerifFontFamily obj = liftIO $ checkUnexpectedNothing "getSettingsSerifFontFamily" $ getObjectPropertyString obj "serif-font-family"

setSettingsSerifFontFamily :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "serif-font-family" (Just val)

constructSettingsSerifFontFamily :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsSerifFontFamily val = constructObjectPropertyString "serif-font-family" (Just val)

data SettingsSerifFontFamilyPropertyInfo
instance AttrInfo SettingsSerifFontFamilyPropertyInfo where
    type AttrAllowedOps SettingsSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsSerifFontFamilyPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsSerifFontFamilyPropertyInfo = IsSettings
    type AttrGetType SettingsSerifFontFamilyPropertyInfo = T.Text
    type AttrLabel SettingsSerifFontFamilyPropertyInfo = "serif-font-family"
    type AttrOrigin SettingsSerifFontFamilyPropertyInfo = Settings
    attrGet _ = getSettingsSerifFontFamily
    attrSet _ = setSettingsSerifFontFamily
    attrConstruct _ = constructSettingsSerifFontFamily
    attrClear _ = undefined

-- VVV Prop "user-agent"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just True)

getSettingsUserAgent :: (MonadIO m, IsSettings o) => o -> m T.Text
getSettingsUserAgent obj = liftIO $ checkUnexpectedNothing "getSettingsUserAgent" $ getObjectPropertyString obj "user-agent"

setSettingsUserAgent :: (MonadIO m, IsSettings o) => o -> T.Text -> m ()
setSettingsUserAgent obj val = liftIO $ setObjectPropertyString obj "user-agent" (Just val)

constructSettingsUserAgent :: (IsSettings o) => T.Text -> IO (GValueConstruct o)
constructSettingsUserAgent val = constructObjectPropertyString "user-agent" (Just val)

clearSettingsUserAgent :: (MonadIO m, IsSettings o) => o -> m ()
clearSettingsUserAgent obj = liftIO $ setObjectPropertyString obj "user-agent" (Nothing :: Maybe T.Text)

data SettingsUserAgentPropertyInfo
instance AttrInfo SettingsUserAgentPropertyInfo where
    type AttrAllowedOps SettingsUserAgentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint SettingsUserAgentPropertyInfo = (~) T.Text
    type AttrBaseTypeConstraint SettingsUserAgentPropertyInfo = IsSettings
    type AttrGetType SettingsUserAgentPropertyInfo = T.Text
    type AttrLabel SettingsUserAgentPropertyInfo = "user-agent"
    type AttrOrigin SettingsUserAgentPropertyInfo = Settings
    attrGet _ = getSettingsUserAgent
    attrSet _ = setSettingsUserAgent
    attrConstruct _ = constructSettingsUserAgent
    attrClear _ = clearSettingsUserAgent

-- VVV Prop "zoom-text-only"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]
   -- Nullable: (Just False,Just False)

getSettingsZoomTextOnly :: (MonadIO m, IsSettings o) => o -> m Bool
getSettingsZoomTextOnly obj = liftIO $ getObjectPropertyBool obj "zoom-text-only"

setSettingsZoomTextOnly :: (MonadIO m, IsSettings o) => o -> Bool -> m ()
setSettingsZoomTextOnly obj val = liftIO $ setObjectPropertyBool obj "zoom-text-only" val

constructSettingsZoomTextOnly :: (IsSettings o) => Bool -> IO (GValueConstruct o)
constructSettingsZoomTextOnly val = constructObjectPropertyBool "zoom-text-only" val

data SettingsZoomTextOnlyPropertyInfo
instance AttrInfo SettingsZoomTextOnlyPropertyInfo where
    type AttrAllowedOps SettingsZoomTextOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint SettingsZoomTextOnlyPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint SettingsZoomTextOnlyPropertyInfo = IsSettings
    type AttrGetType SettingsZoomTextOnlyPropertyInfo = Bool
    type AttrLabel SettingsZoomTextOnlyPropertyInfo = "zoom-text-only"
    type AttrOrigin SettingsZoomTextOnlyPropertyInfo = Settings
    attrGet _ = getSettingsZoomTextOnly
    attrSet _ = setSettingsZoomTextOnly
    attrConstruct _ = constructSettingsZoomTextOnly
    attrClear _ = undefined

instance O.HasAttributeList Settings
type instance O.AttributeList Settings = SettingsAttributeList
type SettingsAttributeList = ('[ '("allowFileAccessFromFileUrls", SettingsAllowFileAccessFromFileUrlsPropertyInfo), '("allowModalDialogs", SettingsAllowModalDialogsPropertyInfo), '("allowUniversalAccessFromFileUrls", SettingsAllowUniversalAccessFromFileUrlsPropertyInfo), '("autoLoadImages", SettingsAutoLoadImagesPropertyInfo), '("cursiveFontFamily", SettingsCursiveFontFamilyPropertyInfo), '("defaultCharset", SettingsDefaultCharsetPropertyInfo), '("defaultFontFamily", SettingsDefaultFontFamilyPropertyInfo), '("defaultFontSize", SettingsDefaultFontSizePropertyInfo), '("defaultMonospaceFontSize", SettingsDefaultMonospaceFontSizePropertyInfo), '("drawCompositingIndicators", SettingsDrawCompositingIndicatorsPropertyInfo), '("enableAccelerated2dCanvas", SettingsEnableAccelerated2dCanvasPropertyInfo), '("enableCaretBrowsing", SettingsEnableCaretBrowsingPropertyInfo), '("enableDeveloperExtras", SettingsEnableDeveloperExtrasPropertyInfo), '("enableDnsPrefetching", SettingsEnableDnsPrefetchingPropertyInfo), '("enableFrameFlattening", SettingsEnableFrameFlatteningPropertyInfo), '("enableFullscreen", SettingsEnableFullscreenPropertyInfo), '("enableHtml5Database", SettingsEnableHtml5DatabasePropertyInfo), '("enableHtml5LocalStorage", SettingsEnableHtml5LocalStoragePropertyInfo), '("enableHyperlinkAuditing", SettingsEnableHyperlinkAuditingPropertyInfo), '("enableJava", SettingsEnableJavaPropertyInfo), '("enableJavascript", SettingsEnableJavascriptPropertyInfo), '("enableMediaStream", SettingsEnableMediaStreamPropertyInfo), '("enableMediasource", SettingsEnableMediasourcePropertyInfo), '("enableOfflineWebApplicationCache", SettingsEnableOfflineWebApplicationCachePropertyInfo), '("enablePageCache", SettingsEnablePageCachePropertyInfo), '("enablePlugins", SettingsEnablePluginsPropertyInfo), '("enablePrivateBrowsing", SettingsEnablePrivateBrowsingPropertyInfo), '("enableResizableTextAreas", SettingsEnableResizableTextAreasPropertyInfo), '("enableSiteSpecificQuirks", SettingsEnableSiteSpecificQuirksPropertyInfo), '("enableSmoothScrolling", SettingsEnableSmoothScrollingPropertyInfo), '("enableSpatialNavigation", SettingsEnableSpatialNavigationPropertyInfo), '("enableTabsToLinks", SettingsEnableTabsToLinksPropertyInfo), '("enableWebaudio", SettingsEnableWebaudioPropertyInfo), '("enableWebgl", SettingsEnableWebglPropertyInfo), '("enableWriteConsoleMessagesToStdout", SettingsEnableWriteConsoleMessagesToStdoutPropertyInfo), '("enableXssAuditor", SettingsEnableXssAuditorPropertyInfo), '("fantasyFontFamily", SettingsFantasyFontFamilyPropertyInfo), '("javascriptCanAccessClipboard", SettingsJavascriptCanAccessClipboardPropertyInfo), '("javascriptCanOpenWindowsAutomatically", SettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo), '("loadIconsIgnoringImageLoadSetting", SettingsLoadIconsIgnoringImageLoadSettingPropertyInfo), '("mediaPlaybackAllowsInline", SettingsMediaPlaybackAllowsInlinePropertyInfo), '("mediaPlaybackRequiresUserGesture", SettingsMediaPlaybackRequiresUserGesturePropertyInfo), '("minimumFontSize", SettingsMinimumFontSizePropertyInfo), '("monospaceFontFamily", SettingsMonospaceFontFamilyPropertyInfo), '("pictographFontFamily", SettingsPictographFontFamilyPropertyInfo), '("printBackgrounds", SettingsPrintBackgroundsPropertyInfo), '("sansSerifFontFamily", SettingsSansSerifFontFamilyPropertyInfo), '("serifFontFamily", SettingsSerifFontFamilyPropertyInfo), '("userAgent", SettingsUserAgentPropertyInfo), '("zoomTextOnly", SettingsZoomTextOnlyPropertyInfo)] :: [(Symbol, *)])

settingsAllowFileAccessFromFileUrls :: AttrLabelProxy "allowFileAccessFromFileUrls"
settingsAllowFileAccessFromFileUrls = AttrLabelProxy

settingsAllowModalDialogs :: AttrLabelProxy "allowModalDialogs"
settingsAllowModalDialogs = AttrLabelProxy

settingsAllowUniversalAccessFromFileUrls :: AttrLabelProxy "allowUniversalAccessFromFileUrls"
settingsAllowUniversalAccessFromFileUrls = AttrLabelProxy

settingsAutoLoadImages :: AttrLabelProxy "autoLoadImages"
settingsAutoLoadImages = AttrLabelProxy

settingsCursiveFontFamily :: AttrLabelProxy "cursiveFontFamily"
settingsCursiveFontFamily = AttrLabelProxy

settingsDefaultCharset :: AttrLabelProxy "defaultCharset"
settingsDefaultCharset = AttrLabelProxy

settingsDefaultFontFamily :: AttrLabelProxy "defaultFontFamily"
settingsDefaultFontFamily = AttrLabelProxy

settingsDefaultFontSize :: AttrLabelProxy "defaultFontSize"
settingsDefaultFontSize = AttrLabelProxy

settingsDefaultMonospaceFontSize :: AttrLabelProxy "defaultMonospaceFontSize"
settingsDefaultMonospaceFontSize = AttrLabelProxy

settingsDrawCompositingIndicators :: AttrLabelProxy "drawCompositingIndicators"
settingsDrawCompositingIndicators = AttrLabelProxy

settingsEnableAccelerated2dCanvas :: AttrLabelProxy "enableAccelerated2dCanvas"
settingsEnableAccelerated2dCanvas = AttrLabelProxy

settingsEnableCaretBrowsing :: AttrLabelProxy "enableCaretBrowsing"
settingsEnableCaretBrowsing = AttrLabelProxy

settingsEnableDeveloperExtras :: AttrLabelProxy "enableDeveloperExtras"
settingsEnableDeveloperExtras = AttrLabelProxy

settingsEnableDnsPrefetching :: AttrLabelProxy "enableDnsPrefetching"
settingsEnableDnsPrefetching = AttrLabelProxy

settingsEnableFrameFlattening :: AttrLabelProxy "enableFrameFlattening"
settingsEnableFrameFlattening = AttrLabelProxy

settingsEnableFullscreen :: AttrLabelProxy "enableFullscreen"
settingsEnableFullscreen = AttrLabelProxy

settingsEnableHtml5Database :: AttrLabelProxy "enableHtml5Database"
settingsEnableHtml5Database = AttrLabelProxy

settingsEnableHtml5LocalStorage :: AttrLabelProxy "enableHtml5LocalStorage"
settingsEnableHtml5LocalStorage = AttrLabelProxy

settingsEnableHyperlinkAuditing :: AttrLabelProxy "enableHyperlinkAuditing"
settingsEnableHyperlinkAuditing = AttrLabelProxy

settingsEnableJava :: AttrLabelProxy "enableJava"
settingsEnableJava = AttrLabelProxy

settingsEnableJavascript :: AttrLabelProxy "enableJavascript"
settingsEnableJavascript = AttrLabelProxy

settingsEnableMediaStream :: AttrLabelProxy "enableMediaStream"
settingsEnableMediaStream = AttrLabelProxy

settingsEnableMediasource :: AttrLabelProxy "enableMediasource"
settingsEnableMediasource = AttrLabelProxy

settingsEnableOfflineWebApplicationCache :: AttrLabelProxy "enableOfflineWebApplicationCache"
settingsEnableOfflineWebApplicationCache = AttrLabelProxy

settingsEnablePageCache :: AttrLabelProxy "enablePageCache"
settingsEnablePageCache = AttrLabelProxy

settingsEnablePlugins :: AttrLabelProxy "enablePlugins"
settingsEnablePlugins = AttrLabelProxy

settingsEnablePrivateBrowsing :: AttrLabelProxy "enablePrivateBrowsing"
settingsEnablePrivateBrowsing = AttrLabelProxy

settingsEnableResizableTextAreas :: AttrLabelProxy "enableResizableTextAreas"
settingsEnableResizableTextAreas = AttrLabelProxy

settingsEnableSiteSpecificQuirks :: AttrLabelProxy "enableSiteSpecificQuirks"
settingsEnableSiteSpecificQuirks = AttrLabelProxy

settingsEnableSmoothScrolling :: AttrLabelProxy "enableSmoothScrolling"
settingsEnableSmoothScrolling = AttrLabelProxy

settingsEnableSpatialNavigation :: AttrLabelProxy "enableSpatialNavigation"
settingsEnableSpatialNavigation = AttrLabelProxy

settingsEnableTabsToLinks :: AttrLabelProxy "enableTabsToLinks"
settingsEnableTabsToLinks = AttrLabelProxy

settingsEnableWebaudio :: AttrLabelProxy "enableWebaudio"
settingsEnableWebaudio = AttrLabelProxy

settingsEnableWebgl :: AttrLabelProxy "enableWebgl"
settingsEnableWebgl = AttrLabelProxy

settingsEnableWriteConsoleMessagesToStdout :: AttrLabelProxy "enableWriteConsoleMessagesToStdout"
settingsEnableWriteConsoleMessagesToStdout = AttrLabelProxy

settingsEnableXssAuditor :: AttrLabelProxy "enableXssAuditor"
settingsEnableXssAuditor = AttrLabelProxy

settingsFantasyFontFamily :: AttrLabelProxy "fantasyFontFamily"
settingsFantasyFontFamily = AttrLabelProxy

settingsJavascriptCanAccessClipboard :: AttrLabelProxy "javascriptCanAccessClipboard"
settingsJavascriptCanAccessClipboard = AttrLabelProxy

settingsJavascriptCanOpenWindowsAutomatically :: AttrLabelProxy "javascriptCanOpenWindowsAutomatically"
settingsJavascriptCanOpenWindowsAutomatically = AttrLabelProxy

settingsLoadIconsIgnoringImageLoadSetting :: AttrLabelProxy "loadIconsIgnoringImageLoadSetting"
settingsLoadIconsIgnoringImageLoadSetting = AttrLabelProxy

settingsMediaPlaybackAllowsInline :: AttrLabelProxy "mediaPlaybackAllowsInline"
settingsMediaPlaybackAllowsInline = AttrLabelProxy

settingsMediaPlaybackRequiresUserGesture :: AttrLabelProxy "mediaPlaybackRequiresUserGesture"
settingsMediaPlaybackRequiresUserGesture = AttrLabelProxy

settingsMinimumFontSize :: AttrLabelProxy "minimumFontSize"
settingsMinimumFontSize = AttrLabelProxy

settingsMonospaceFontFamily :: AttrLabelProxy "monospaceFontFamily"
settingsMonospaceFontFamily = AttrLabelProxy

settingsPictographFontFamily :: AttrLabelProxy "pictographFontFamily"
settingsPictographFontFamily = AttrLabelProxy

settingsPrintBackgrounds :: AttrLabelProxy "printBackgrounds"
settingsPrintBackgrounds = AttrLabelProxy

settingsSansSerifFontFamily :: AttrLabelProxy "sansSerifFontFamily"
settingsSansSerifFontFamily = AttrLabelProxy

settingsSerifFontFamily :: AttrLabelProxy "serifFontFamily"
settingsSerifFontFamily = AttrLabelProxy

settingsUserAgent :: AttrLabelProxy "userAgent"
settingsUserAgent = AttrLabelProxy

settingsZoomTextOnly :: AttrLabelProxy "zoomTextOnly"
settingsZoomTextOnly = AttrLabelProxy

type instance O.SignalList Settings = SettingsSignalList
type SettingsSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])

-- method Settings::new
-- method type : Constructor
-- Args : []
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "WebKit2", name = "Settings"}))
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_new" webkit_settings_new :: 
    IO (Ptr Settings)

{- |
Creates a new 'GI.WebKit2.Objects.Settings.Settings' instance with default values. It must
be manually attached to a 'GI.WebKit2.Objects.WebView.WebView'.
See also @/webkit_settings_new_with_settings()/@.
-}
settingsNew ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    m Settings
    {- ^ __Returns:__ a new 'GI.WebKit2.Objects.Settings.Settings' instance. -}
settingsNew  = liftIO $ do
    result <- webkit_settings_new
    checkUnexpectedReturnNULL "settingsNew" result
    result' <- (wrapObject Settings) result
    return result'

-- method Settings::get_allow_file_access_from_file_urls
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_allow_file_access_from_file_urls" webkit_settings_get_allow_file_access_from_file_urls :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/allow-file-access-from-file-urls/@ property.

@since 2.10
-}
settingsGetAllowFileAccessFromFileUrls ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If file access from file URLs is allowed or 'False' otherwise. -}
settingsGetAllowFileAccessFromFileUrls settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_allow_file_access_from_file_urls settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetAllowFileAccessFromFileUrlsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetAllowFileAccessFromFileUrlsMethodInfo a signature where
    overloadedMethod _ = settingsGetAllowFileAccessFromFileUrls

-- method Settings::get_allow_modal_dialogs
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_allow_modal_dialogs" webkit_settings_get_allow_modal_dialogs :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/allow-modal-dialogs/@ property.
-}
settingsGetAllowModalDialogs ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if it\'s allowed to create and run modal dialogs or 'False' otherwise. -}
settingsGetAllowModalDialogs settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_allow_modal_dialogs settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetAllowModalDialogsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetAllowModalDialogsMethodInfo a signature where
    overloadedMethod _ = settingsGetAllowModalDialogs

-- method Settings::get_allow_universal_access_from_file_urls
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_allow_universal_access_from_file_urls" webkit_settings_get_allow_universal_access_from_file_urls :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/allow-universal-access-from-file-urls/@ property.

@since 2.14
-}
settingsGetAllowUniversalAccessFromFileUrls ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If universal access from file URLs is allowed or 'False' otherwise. -}
settingsGetAllowUniversalAccessFromFileUrls settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_allow_universal_access_from_file_urls settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetAllowUniversalAccessFromFileUrlsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetAllowUniversalAccessFromFileUrlsMethodInfo a signature where
    overloadedMethod _ = settingsGetAllowUniversalAccessFromFileUrls

-- method Settings::get_auto_load_images
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_auto_load_images" webkit_settings_get_auto_load_images :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/auto-load-images/@ property.
-}
settingsGetAutoLoadImages ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If auto loading of images is enabled or 'False' otherwise. -}
settingsGetAutoLoadImages settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_auto_load_images settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetAutoLoadImagesMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetAutoLoadImagesMethodInfo a signature where
    overloadedMethod _ = settingsGetAutoLoadImages

-- method Settings::get_cursive_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_cursive_font_family" webkit_settings_get_cursive_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/cursive-font-family/@ property.
-}
settingsGetCursiveFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The default font family used to display content marked with cursive font. -}
settingsGetCursiveFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_cursive_font_family settings'
    checkUnexpectedReturnNULL "settingsGetCursiveFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetCursiveFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetCursiveFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetCursiveFontFamily

-- method Settings::get_default_charset
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_default_charset" webkit_settings_get_default_charset :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/default-charset/@ property.
-}
settingsGetDefaultCharset ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ Default charset. -}
settingsGetDefaultCharset settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_default_charset settings'
    checkUnexpectedReturnNULL "settingsGetDefaultCharset" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetDefaultCharsetMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetDefaultCharsetMethodInfo a signature where
    overloadedMethod _ = settingsGetDefaultCharset

-- method Settings::get_default_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Nothing, sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_default_font_family" webkit_settings_get_default_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
/No description available in the introspection data./
-}
settingsGetDefaultFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    -> m T.Text
settingsGetDefaultFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_default_font_family settings'
    checkUnexpectedReturnNULL "settingsGetDefaultFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetDefaultFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetDefaultFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetDefaultFontFamily

-- method Settings::get_default_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUInt32)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_default_font_size" webkit_settings_get_default_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO Word32

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/default-font-size/@ property.
-}
settingsGetDefaultFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Word32
    {- ^ __Returns:__ The default font size. -}
settingsGetDefaultFontSize settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_default_font_size settings'
    touchManagedPtr settings
    return result

data SettingsGetDefaultFontSizeMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetDefaultFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsGetDefaultFontSize

-- method Settings::get_default_monospace_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUInt32)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_default_monospace_font_size" webkit_settings_get_default_monospace_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO Word32

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/default-monospace-font-size/@ property.
-}
settingsGetDefaultMonospaceFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Word32
    {- ^ __Returns:__ Default monospace font size. -}
settingsGetDefaultMonospaceFontSize settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_default_monospace_font_size settings'
    touchManagedPtr settings
    return result

data SettingsGetDefaultMonospaceFontSizeMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetDefaultMonospaceFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsGetDefaultMonospaceFontSize

-- method Settings::get_draw_compositing_indicators
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_draw_compositing_indicators" webkit_settings_get_draw_compositing_indicators :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/draw-compositing-indicators/@ property.
-}
settingsGetDrawCompositingIndicators ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If compositing borders are drawn or 'False' otherwise. -}
settingsGetDrawCompositingIndicators settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_draw_compositing_indicators settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetDrawCompositingIndicatorsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetDrawCompositingIndicatorsMethodInfo a signature where
    overloadedMethod _ = settingsGetDrawCompositingIndicators

-- method Settings::get_enable_accelerated_2d_canvas
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_accelerated_2d_canvas" webkit_settings_get_enable_accelerated_2d_canvas :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-accelerated-2d-canvas/@ property.

@since 2.2
-}
settingsGetEnableAccelerated2dCanvas ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if accelerated 2D canvas is enabled or 'False' otherwise. -}
settingsGetEnableAccelerated2dCanvas settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_accelerated_2d_canvas settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableAccelerated2dCanvasMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableAccelerated2dCanvasMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableAccelerated2dCanvas

-- method Settings::get_enable_caret_browsing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_caret_browsing" webkit_settings_get_enable_caret_browsing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-caret-browsing/@ property.
-}
settingsGetEnableCaretBrowsing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If caret browsing is enabled or 'False' otherwise. -}
settingsGetEnableCaretBrowsing settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_caret_browsing settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableCaretBrowsingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableCaretBrowsingMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableCaretBrowsing

-- method Settings::get_enable_developer_extras
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_developer_extras" webkit_settings_get_enable_developer_extras :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-developer-extras/@ property.
-}
settingsGetEnableDeveloperExtras ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If developer extras is enabled or 'False' otherwise. -}
settingsGetEnableDeveloperExtras settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_developer_extras settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableDeveloperExtrasMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableDeveloperExtrasMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableDeveloperExtras

-- method Settings::get_enable_dns_prefetching
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_dns_prefetching" webkit_settings_get_enable_dns_prefetching :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-dns-prefetching/@ property.
-}
settingsGetEnableDnsPrefetching ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If DNS prefetching is enabled or 'False' otherwise. -}
settingsGetEnableDnsPrefetching settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_dns_prefetching settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableDnsPrefetchingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableDnsPrefetchingMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableDnsPrefetching

-- method Settings::get_enable_frame_flattening
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_frame_flattening" webkit_settings_get_enable_frame_flattening :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-frame-flattening/@ property.
-}
settingsGetEnableFrameFlattening ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If frame flattening is enabled or 'False' otherwise. -}
settingsGetEnableFrameFlattening settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_frame_flattening settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableFrameFlatteningMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableFrameFlatteningMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableFrameFlattening

-- method Settings::get_enable_fullscreen
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_fullscreen" webkit_settings_get_enable_fullscreen :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-fullscreen/@ property.
-}
settingsGetEnableFullscreen ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If fullscreen support is enabled or 'False' otherwise. -}
settingsGetEnableFullscreen settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_fullscreen settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableFullscreenMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableFullscreenMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableFullscreen

-- method Settings::get_enable_html5_database
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_html5_database" webkit_settings_get_enable_html5_database :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-html5-database/@ property.
-}
settingsGetEnableHtml5Database ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If HTML5 database support is enabled or 'False' otherwise. -}
settingsGetEnableHtml5Database settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_html5_database settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableHtml5DatabaseMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableHtml5DatabaseMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableHtml5Database

-- method Settings::get_enable_html5_local_storage
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_html5_local_storage" webkit_settings_get_enable_html5_local_storage :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-html5-local-storage/@ property.
-}
settingsGetEnableHtml5LocalStorage ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If HTML5 local storage support is enabled or 'False' otherwise. -}
settingsGetEnableHtml5LocalStorage settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_html5_local_storage settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableHtml5LocalStorageMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableHtml5LocalStorageMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableHtml5LocalStorage

-- method Settings::get_enable_hyperlink_auditing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_hyperlink_auditing" webkit_settings_get_enable_hyperlink_auditing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-hyperlink-auditing/@ property.
-}
settingsGetEnableHyperlinkAuditing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If hyper link auditing is enabled or 'False' otherwise. -}
settingsGetEnableHyperlinkAuditing settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_hyperlink_auditing settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableHyperlinkAuditingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableHyperlinkAuditingMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableHyperlinkAuditing

-- method Settings::get_enable_java
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_java" webkit_settings_get_enable_java :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-java/@ property.
-}
settingsGetEnableJava ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If Java is enabled or 'False' otherwise. -}
settingsGetEnableJava settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_java settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableJavaMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableJavaMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableJava

-- method Settings::get_enable_javascript
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_javascript" webkit_settings_get_enable_javascript :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-javascript/@ property.
-}
settingsGetEnableJavascript ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If JavaScript is enabled or 'False' otherwise. -}
settingsGetEnableJavascript settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_javascript settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableJavascriptMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableJavascriptMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableJavascript

-- method Settings::get_enable_media_stream
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_media_stream" webkit_settings_get_enable_media_stream :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-media-stream/@ property.

@since 2.4
-}
settingsGetEnableMediaStream ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If mediastream support is enabled or 'False' otherwise. -}
settingsGetEnableMediaStream settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_media_stream settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableMediaStreamMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableMediaStreamMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableMediaStream

-- method Settings::get_enable_mediasource
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_mediasource" webkit_settings_get_enable_mediasource :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-mediasource/@ property.

@since 2.4
-}
settingsGetEnableMediasource ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If MediaSource support is enabled or 'False' otherwise. -}
settingsGetEnableMediasource settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_mediasource settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableMediasourceMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableMediasourceMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableMediasource

-- method Settings::get_enable_offline_web_application_cache
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_offline_web_application_cache" webkit_settings_get_enable_offline_web_application_cache :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-offline-web-application-cache/@ property.
-}
settingsGetEnableOfflineWebApplicationCache ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If HTML5 offline web application cache support is enabled or 'False' otherwise. -}
settingsGetEnableOfflineWebApplicationCache settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_offline_web_application_cache settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableOfflineWebApplicationCacheMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableOfflineWebApplicationCacheMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableOfflineWebApplicationCache

-- method Settings::get_enable_page_cache
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_page_cache" webkit_settings_get_enable_page_cache :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-page-cache/@ property.
-}
settingsGetEnablePageCache ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if page cache enabled or 'False' otherwise. -}
settingsGetEnablePageCache settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_page_cache settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnablePageCacheMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnablePageCacheMethodInfo a signature where
    overloadedMethod _ = settingsGetEnablePageCache

-- method Settings::get_enable_plugins
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_plugins" webkit_settings_get_enable_plugins :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-plugins/@ property.
-}
settingsGetEnablePlugins ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If plugins are enabled or 'False' otherwise. -}
settingsGetEnablePlugins settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_plugins settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnablePluginsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnablePluginsMethodInfo a signature where
    overloadedMethod _ = settingsGetEnablePlugins

-- method Settings::get_enable_private_browsing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_private_browsing" webkit_settings_get_enable_private_browsing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-private-browsing/@ property.
-}
settingsGetEnablePrivateBrowsing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If private browsing is enabled or 'False' otherwise. -}
settingsGetEnablePrivateBrowsing settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_private_browsing settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnablePrivateBrowsingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnablePrivateBrowsingMethodInfo a signature where
    overloadedMethod _ = settingsGetEnablePrivateBrowsing

-- method Settings::get_enable_resizable_text_areas
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_resizable_text_areas" webkit_settings_get_enable_resizable_text_areas :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-resizable-text-areas/@ property.
-}
settingsGetEnableResizableTextAreas ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If text areas can be resized or 'False' otherwise. -}
settingsGetEnableResizableTextAreas settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_resizable_text_areas settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableResizableTextAreasMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableResizableTextAreasMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableResizableTextAreas

-- method Settings::get_enable_site_specific_quirks
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_site_specific_quirks" webkit_settings_get_enable_site_specific_quirks :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-site-specific-quirks/@ property.
-}
settingsGetEnableSiteSpecificQuirks ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if site specific quirks are enabled or 'False' otherwise. -}
settingsGetEnableSiteSpecificQuirks settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_site_specific_quirks settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableSiteSpecificQuirksMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableSiteSpecificQuirksMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableSiteSpecificQuirks

-- method Settings::get_enable_smooth_scrolling
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_smooth_scrolling" webkit_settings_get_enable_smooth_scrolling :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-smooth-scrolling/@ property.
-}
settingsGetEnableSmoothScrolling ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if smooth scrolling is enabled or 'False' otherwise. -}
settingsGetEnableSmoothScrolling settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_smooth_scrolling settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableSmoothScrollingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableSmoothScrollingMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableSmoothScrolling

-- method Settings::get_enable_spatial_navigation
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_spatial_navigation" webkit_settings_get_enable_spatial_navigation :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-spatial-navigation/@ property.

@since 2.2
-}
settingsGetEnableSpatialNavigation ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If HTML5 spatial navigation support is enabled or 'False' otherwise. -}
settingsGetEnableSpatialNavigation settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_spatial_navigation settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableSpatialNavigationMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableSpatialNavigationMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableSpatialNavigation

-- method Settings::get_enable_tabs_to_links
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_tabs_to_links" webkit_settings_get_enable_tabs_to_links :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-tabs-to-links/@ property.
-}
settingsGetEnableTabsToLinks ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If tabs to link is enabled or 'False' otherwise. -}
settingsGetEnableTabsToLinks settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_tabs_to_links settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableTabsToLinksMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableTabsToLinksMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableTabsToLinks

-- method Settings::get_enable_webaudio
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_webaudio" webkit_settings_get_enable_webaudio :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-webaudio/@ property.
-}
settingsGetEnableWebaudio ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If webaudio support is enabled or 'False' otherwise. -}
settingsGetEnableWebaudio settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_webaudio settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableWebaudioMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableWebaudioMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableWebaudio

-- method Settings::get_enable_webgl
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_webgl" webkit_settings_get_enable_webgl :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-webgl/@ property.
-}
settingsGetEnableWebgl ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If webgl support is enabled or 'False' otherwise. -}
settingsGetEnableWebgl settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_webgl settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableWebglMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableWebglMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableWebgl

-- method Settings::get_enable_write_console_messages_to_stdout
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_write_console_messages_to_stdout" webkit_settings_get_enable_write_console_messages_to_stdout :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-write-console-messages-to-stdout/@ property.

@since 2.2
-}
settingsGetEnableWriteConsoleMessagesToStdout ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' if writing console messages to stdout is enabled or 'False'
otherwise. -}
settingsGetEnableWriteConsoleMessagesToStdout settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_write_console_messages_to_stdout settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableWriteConsoleMessagesToStdoutMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableWriteConsoleMessagesToStdoutMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableWriteConsoleMessagesToStdout

-- method Settings::get_enable_xss_auditor
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_enable_xss_auditor" webkit_settings_get_enable_xss_auditor :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/enable-xss-auditor/@ property.
-}
settingsGetEnableXssAuditor ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If XSS auditing is enabled or 'False' otherwise. -}
settingsGetEnableXssAuditor settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_enable_xss_auditor settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetEnableXssAuditorMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetEnableXssAuditorMethodInfo a signature where
    overloadedMethod _ = settingsGetEnableXssAuditor

-- method Settings::get_fantasy_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_fantasy_font_family" webkit_settings_get_fantasy_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/fantasy-font-family/@ property.
-}
settingsGetFantasyFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The default font family used to display content marked with fantasy font. -}
settingsGetFantasyFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_fantasy_font_family settings'
    checkUnexpectedReturnNULL "settingsGetFantasyFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetFantasyFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetFantasyFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetFantasyFontFamily

-- method Settings::get_javascript_can_access_clipboard
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_javascript_can_access_clipboard" webkit_settings_get_javascript_can_access_clipboard :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/javascript-can-access-clipboard/@ property.
-}
settingsGetJavascriptCanAccessClipboard ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If javascript-can-access-clipboard is enabled or 'False' otherwise. -}
settingsGetJavascriptCanAccessClipboard settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_javascript_can_access_clipboard settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetJavascriptCanAccessClipboardMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetJavascriptCanAccessClipboardMethodInfo a signature where
    overloadedMethod _ = settingsGetJavascriptCanAccessClipboard

-- method Settings::get_javascript_can_open_windows_automatically
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_javascript_can_open_windows_automatically" webkit_settings_get_javascript_can_open_windows_automatically :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/javascript-can-open-windows-automatically/@ property.
-}
settingsGetJavascriptCanOpenWindowsAutomatically ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If JavaScript can open window automatically or 'False' otherwise. -}
settingsGetJavascriptCanOpenWindowsAutomatically settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_javascript_can_open_windows_automatically settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetJavascriptCanOpenWindowsAutomaticallyMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetJavascriptCanOpenWindowsAutomaticallyMethodInfo a signature where
    overloadedMethod _ = settingsGetJavascriptCanOpenWindowsAutomatically

-- method Settings::get_load_icons_ignoring_image_load_setting
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_load_icons_ignoring_image_load_setting" webkit_settings_get_load_icons_ignoring_image_load_setting :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/load-icons-ignoring-image-load-setting/@ property.
-}
settingsGetLoadIconsIgnoringImageLoadSetting ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If site icon can be loaded irrespective of image loading preference or 'False' otherwise. -}
settingsGetLoadIconsIgnoringImageLoadSetting settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_load_icons_ignoring_image_load_setting settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetLoadIconsIgnoringImageLoadSettingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetLoadIconsIgnoringImageLoadSettingMethodInfo a signature where
    overloadedMethod _ = settingsGetLoadIconsIgnoringImageLoadSetting

-- method Settings::get_media_playback_allows_inline
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_media_playback_allows_inline" webkit_settings_get_media_playback_allows_inline :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/media-playback-allows-inline/@ property.
-}
settingsGetMediaPlaybackAllowsInline ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If inline playback is allowed for media
   or 'False' if only fullscreen playback is allowed. -}
settingsGetMediaPlaybackAllowsInline settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_media_playback_allows_inline settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetMediaPlaybackAllowsInlineMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetMediaPlaybackAllowsInlineMethodInfo a signature where
    overloadedMethod _ = settingsGetMediaPlaybackAllowsInline

-- method Settings::get_media_playback_requires_user_gesture
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_media_playback_requires_user_gesture" webkit_settings_get_media_playback_requires_user_gesture :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/media-playback-requires-user-gesture/@ property.
-}
settingsGetMediaPlaybackRequiresUserGesture ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If an user gesture is needed to play or load media
   or 'False' if no user gesture is needed. -}
settingsGetMediaPlaybackRequiresUserGesture settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_media_playback_requires_user_gesture settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetMediaPlaybackRequiresUserGestureMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetMediaPlaybackRequiresUserGestureMethodInfo a signature where
    overloadedMethod _ = settingsGetMediaPlaybackRequiresUserGesture

-- method Settings::get_minimum_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUInt32)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_minimum_font_size" webkit_settings_get_minimum_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO Word32

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/minimum-font-size/@ property.
-}
settingsGetMinimumFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Word32
    {- ^ __Returns:__ Minimum font size. -}
settingsGetMinimumFontSize settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_minimum_font_size settings'
    touchManagedPtr settings
    return result

data SettingsGetMinimumFontSizeMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetMinimumFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsGetMinimumFontSize

-- method Settings::get_monospace_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_monospace_font_family" webkit_settings_get_monospace_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/monospace-font-family/@ property.
-}
settingsGetMonospaceFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ Default font family used to display content marked with monospace font. -}
settingsGetMonospaceFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_monospace_font_family settings'
    checkUnexpectedReturnNULL "settingsGetMonospaceFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetMonospaceFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetMonospaceFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetMonospaceFontFamily

-- method Settings::get_pictograph_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_pictograph_font_family" webkit_settings_get_pictograph_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/pictograph-font-family/@ property.
-}
settingsGetPictographFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The default font family used to display content marked with pictograph font. -}
settingsGetPictographFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_pictograph_font_family settings'
    checkUnexpectedReturnNULL "settingsGetPictographFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetPictographFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetPictographFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetPictographFontFamily

-- method Settings::get_print_backgrounds
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_print_backgrounds" webkit_settings_get_print_backgrounds :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/print-backgrounds/@ property.
-}
settingsGetPrintBackgrounds ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If background images should be printed or 'False' otherwise. -}
settingsGetPrintBackgrounds settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_print_backgrounds settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetPrintBackgroundsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetPrintBackgroundsMethodInfo a signature where
    overloadedMethod _ = settingsGetPrintBackgrounds

-- method Settings::get_sans_serif_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_sans_serif_font_family" webkit_settings_get_sans_serif_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/sans-serif-font-family/@ property.
-}
settingsGetSansSerifFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The default font family used to display content marked with sans-serif font. -}
settingsGetSansSerifFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_sans_serif_font_family settings'
    checkUnexpectedReturnNULL "settingsGetSansSerifFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetSansSerifFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetSansSerifFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetSansSerifFontFamily

-- method Settings::get_serif_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_serif_font_family" webkit_settings_get_serif_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Gets the 'GI.WebKit2.Objects.Settings.Settings':@/serif-font-family/@ property.
-}
settingsGetSerifFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The default font family used to display content marked with serif font. -}
settingsGetSerifFontFamily settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_serif_font_family settings'
    checkUnexpectedReturnNULL "settingsGetSerifFontFamily" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetSerifFontFamilyMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetSerifFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsGetSerifFontFamily

-- method Settings::get_user_agent
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_user_agent" webkit_settings_get_user_agent :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CString

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/user-agent/@ property.
-}
settingsGetUserAgent ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m T.Text
    {- ^ __Returns:__ The current value of the user-agent property. -}
settingsGetUserAgent settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_user_agent settings'
    checkUnexpectedReturnNULL "settingsGetUserAgent" result
    result' <- cstringToText result
    touchManagedPtr settings
    return result'

data SettingsGetUserAgentMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetUserAgentMethodInfo a signature where
    overloadedMethod _ = settingsGetUserAgent

-- method Settings::get_zoom_text_only
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_get_zoom_text_only" webkit_settings_get_zoom_text_only :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    IO CInt

{- |
Get the 'GI.WebKit2.Objects.Settings.Settings':@/zoom-text-only/@ property.
-}
settingsGetZoomTextOnly ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> m Bool
    {- ^ __Returns:__ 'True' If zoom level of the view should only affect the text
   or 'False' if all view contents should be scaled. -}
settingsGetZoomTextOnly settings = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    result <- webkit_settings_get_zoom_text_only settings'
    let result' = (/= 0) result
    touchManagedPtr settings
    return result'

data SettingsGetZoomTextOnlyMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsSettings a) => O.MethodInfo SettingsGetZoomTextOnlyMethodInfo a signature where
    overloadedMethod _ = settingsGetZoomTextOnly

-- method Settings::set_allow_file_access_from_file_urls
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allowed", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_allow_file_access_from_file_urls" webkit_settings_set_allow_file_access_from_file_urls :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- allowed : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/allow-file-access-from-file-urls/@ property.

@since 2.10
-}
settingsSetAllowFileAccessFromFileUrls ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@allowed@/: Value to be set -}
    -> m ()
settingsSetAllowFileAccessFromFileUrls settings allowed = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let allowed' = (fromIntegral . fromEnum) allowed
    webkit_settings_set_allow_file_access_from_file_urls settings' allowed'
    touchManagedPtr settings
    return ()

data SettingsSetAllowFileAccessFromFileUrlsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetAllowFileAccessFromFileUrlsMethodInfo a signature where
    overloadedMethod _ = settingsSetAllowFileAccessFromFileUrls

-- method Settings::set_allow_modal_dialogs
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allowed", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_allow_modal_dialogs" webkit_settings_set_allow_modal_dialogs :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- allowed : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/allow-modal-dialogs/@ property.
-}
settingsSetAllowModalDialogs ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@allowed@/: Value to be set -}
    -> m ()
settingsSetAllowModalDialogs settings allowed = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let allowed' = (fromIntegral . fromEnum) allowed
    webkit_settings_set_allow_modal_dialogs settings' allowed'
    touchManagedPtr settings
    return ()

data SettingsSetAllowModalDialogsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetAllowModalDialogsMethodInfo a signature where
    overloadedMethod _ = settingsSetAllowModalDialogs

-- method Settings::set_allow_universal_access_from_file_urls
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allowed", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_allow_universal_access_from_file_urls" webkit_settings_set_allow_universal_access_from_file_urls :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- allowed : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/allow-universal-access-from-file-urls/@ property.

@since 2.14
-}
settingsSetAllowUniversalAccessFromFileUrls ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@allowed@/: Value to be set -}
    -> m ()
settingsSetAllowUniversalAccessFromFileUrls settings allowed = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let allowed' = (fromIntegral . fromEnum) allowed
    webkit_settings_set_allow_universal_access_from_file_urls settings' allowed'
    touchManagedPtr settings
    return ()

data SettingsSetAllowUniversalAccessFromFileUrlsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetAllowUniversalAccessFromFileUrlsMethodInfo a signature where
    overloadedMethod _ = settingsSetAllowUniversalAccessFromFileUrls

-- method Settings::set_auto_load_images
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_auto_load_images" webkit_settings_set_auto_load_images :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/auto-load-images/@ property.
-}
settingsSetAutoLoadImages ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetAutoLoadImages settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_auto_load_images settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetAutoLoadImagesMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetAutoLoadImagesMethodInfo a signature where
    overloadedMethod _ = settingsSetAutoLoadImages

-- method Settings::set_cursive_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cursive_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default cursive font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_cursive_font_family" webkit_settings_set_cursive_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- cursive_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/cursive-font-family/@ property.
-}
settingsSetCursiveFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@cursiveFontFamily@/: the new default cursive font family -}
    -> m ()
settingsSetCursiveFontFamily settings cursiveFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    cursiveFontFamily' <- textToCString cursiveFontFamily
    webkit_settings_set_cursive_font_family settings' cursiveFontFamily'
    touchManagedPtr settings
    freeMem cursiveFontFamily'
    return ()

data SettingsSetCursiveFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetCursiveFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetCursiveFontFamily

-- method Settings::set_default_charset
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "default_charset", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "default charset to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_default_charset" webkit_settings_set_default_charset :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- default_charset : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/default-charset/@ property.
-}
settingsSetDefaultCharset ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@defaultCharset@/: default charset to be set -}
    -> m ()
settingsSetDefaultCharset settings defaultCharset = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    defaultCharset' <- textToCString defaultCharset
    webkit_settings_set_default_charset settings' defaultCharset'
    touchManagedPtr settings
    freeMem defaultCharset'
    return ()

data SettingsSetDefaultCharsetMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetDefaultCharsetMethodInfo a signature where
    overloadedMethod _ = settingsSetDefaultCharset

-- method Settings::set_default_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "default_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_default_font_family" webkit_settings_set_default_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- default_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/default-font-family/@ property.
-}
settingsSetDefaultFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@defaultFontFamily@/: the new default font family -}
    -> m ()
settingsSetDefaultFontFamily settings defaultFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    defaultFontFamily' <- textToCString defaultFontFamily
    webkit_settings_set_default_font_family settings' defaultFontFamily'
    touchManagedPtr settings
    freeMem defaultFontFamily'
    return ()

data SettingsSetDefaultFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetDefaultFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetDefaultFontFamily

-- method Settings::set_default_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_size", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "default font size to be set in pixels", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_default_font_size" webkit_settings_set_default_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    Word32 ->                               -- font_size : TBasicType TUInt32
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/default-font-size/@ property.
-}
settingsSetDefaultFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Word32
    {- ^ /@fontSize@/: default font size to be set in pixels -}
    -> m ()
settingsSetDefaultFontSize settings fontSize = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    webkit_settings_set_default_font_size settings' fontSize
    touchManagedPtr settings
    return ()

data SettingsSetDefaultFontSizeMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetDefaultFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsSetDefaultFontSize

-- method Settings::set_default_monospace_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_size", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "default monospace font size to be set in pixels", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_default_monospace_font_size" webkit_settings_set_default_monospace_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    Word32 ->                               -- font_size : TBasicType TUInt32
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/default-monospace-font-size/@ property.
-}
settingsSetDefaultMonospaceFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Word32
    {- ^ /@fontSize@/: default monospace font size to be set in pixels -}
    -> m ()
settingsSetDefaultMonospaceFontSize settings fontSize = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    webkit_settings_set_default_monospace_font_size settings' fontSize
    touchManagedPtr settings
    return ()

data SettingsSetDefaultMonospaceFontSizeMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetDefaultMonospaceFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsSetDefaultMonospaceFontSize

-- method Settings::set_draw_compositing_indicators
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_draw_compositing_indicators" webkit_settings_set_draw_compositing_indicators :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/draw-compositing-indicators/@ property.
-}
settingsSetDrawCompositingIndicators ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetDrawCompositingIndicators settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_draw_compositing_indicators settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetDrawCompositingIndicatorsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetDrawCompositingIndicatorsMethodInfo a signature where
    overloadedMethod _ = settingsSetDrawCompositingIndicators

-- method Settings::set_enable_accelerated_2d_canvas
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_accelerated_2d_canvas" webkit_settings_set_enable_accelerated_2d_canvas :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-accelerated-2d-canvas/@ property.

@since 2.2
-}
settingsSetEnableAccelerated2dCanvas ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableAccelerated2dCanvas settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_accelerated_2d_canvas settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableAccelerated2dCanvasMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableAccelerated2dCanvasMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableAccelerated2dCanvas

-- method Settings::set_enable_caret_browsing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_caret_browsing" webkit_settings_set_enable_caret_browsing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-caret-browsing/@ property.
-}
settingsSetEnableCaretBrowsing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableCaretBrowsing settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_caret_browsing settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableCaretBrowsingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableCaretBrowsingMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableCaretBrowsing

-- method Settings::set_enable_developer_extras
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_developer_extras" webkit_settings_set_enable_developer_extras :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-developer-extras/@ property.
-}
settingsSetEnableDeveloperExtras ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableDeveloperExtras settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_developer_extras settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableDeveloperExtrasMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableDeveloperExtrasMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableDeveloperExtras

-- method Settings::set_enable_dns_prefetching
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_dns_prefetching" webkit_settings_set_enable_dns_prefetching :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-dns-prefetching/@ property.
-}
settingsSetEnableDnsPrefetching ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableDnsPrefetching settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_dns_prefetching settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableDnsPrefetchingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableDnsPrefetchingMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableDnsPrefetching

-- method Settings::set_enable_frame_flattening
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_frame_flattening" webkit_settings_set_enable_frame_flattening :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-frame-flattening/@ property.
-}
settingsSetEnableFrameFlattening ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableFrameFlattening settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_frame_flattening settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableFrameFlatteningMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableFrameFlatteningMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableFrameFlattening

-- method Settings::set_enable_fullscreen
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_fullscreen" webkit_settings_set_enable_fullscreen :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-fullscreen/@ property.
-}
settingsSetEnableFullscreen ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableFullscreen settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_fullscreen settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableFullscreenMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableFullscreenMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableFullscreen

-- method Settings::set_enable_html5_database
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_html5_database" webkit_settings_set_enable_html5_database :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-html5-database/@ property.
-}
settingsSetEnableHtml5Database ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableHtml5Database settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_html5_database settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableHtml5DatabaseMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableHtml5DatabaseMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableHtml5Database

-- method Settings::set_enable_html5_local_storage
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_html5_local_storage" webkit_settings_set_enable_html5_local_storage :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-html5-local-storage/@ property.
-}
settingsSetEnableHtml5LocalStorage ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableHtml5LocalStorage settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_html5_local_storage settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableHtml5LocalStorageMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableHtml5LocalStorageMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableHtml5LocalStorage

-- method Settings::set_enable_hyperlink_auditing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_hyperlink_auditing" webkit_settings_set_enable_hyperlink_auditing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-hyperlink-auditing/@ property.
-}
settingsSetEnableHyperlinkAuditing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableHyperlinkAuditing settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_hyperlink_auditing settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableHyperlinkAuditingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableHyperlinkAuditingMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableHyperlinkAuditing

-- method Settings::set_enable_java
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_java" webkit_settings_set_enable_java :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-java/@ property.
-}
settingsSetEnableJava ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableJava settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_java settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableJavaMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableJavaMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableJava

-- method Settings::set_enable_javascript
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_javascript" webkit_settings_set_enable_javascript :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-javascript/@ property.
-}
settingsSetEnableJavascript ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableJavascript settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_javascript settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableJavascriptMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableJavascriptMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableJavascript

-- method Settings::set_enable_media_stream
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_media_stream" webkit_settings_set_enable_media_stream :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-media-stream/@ property.

@since 2.4
-}
settingsSetEnableMediaStream ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableMediaStream settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_media_stream settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableMediaStreamMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableMediaStreamMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableMediaStream

-- method Settings::set_enable_mediasource
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_mediasource" webkit_settings_set_enable_mediasource :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-mediasource/@ property.

@since 2.4
-}
settingsSetEnableMediasource ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableMediasource settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_mediasource settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableMediasourceMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableMediasourceMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableMediasource

-- method Settings::set_enable_offline_web_application_cache
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_offline_web_application_cache" webkit_settings_set_enable_offline_web_application_cache :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-offline-web-application-cache/@ property.
-}
settingsSetEnableOfflineWebApplicationCache ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableOfflineWebApplicationCache settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_offline_web_application_cache settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableOfflineWebApplicationCacheMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableOfflineWebApplicationCacheMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableOfflineWebApplicationCache

-- method Settings::set_enable_page_cache
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_page_cache" webkit_settings_set_enable_page_cache :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-page-cache/@ property.
-}
settingsSetEnablePageCache ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnablePageCache settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_page_cache settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnablePageCacheMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnablePageCacheMethodInfo a signature where
    overloadedMethod _ = settingsSetEnablePageCache

-- method Settings::set_enable_plugins
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_plugins" webkit_settings_set_enable_plugins :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-plugins/@ property.
-}
settingsSetEnablePlugins ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnablePlugins settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_plugins settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnablePluginsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnablePluginsMethodInfo a signature where
    overloadedMethod _ = settingsSetEnablePlugins

-- method Settings::set_enable_private_browsing
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Nothing, sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Nothing, sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_private_browsing" webkit_settings_set_enable_private_browsing :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
/No description available in the introspection data./
-}
settingsSetEnablePrivateBrowsing ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    -> Bool
    -> m ()
settingsSetEnablePrivateBrowsing settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_private_browsing settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnablePrivateBrowsingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnablePrivateBrowsingMethodInfo a signature where
    overloadedMethod _ = settingsSetEnablePrivateBrowsing

-- method Settings::set_enable_resizable_text_areas
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_resizable_text_areas" webkit_settings_set_enable_resizable_text_areas :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-resizable-text-areas/@ property.
-}
settingsSetEnableResizableTextAreas ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableResizableTextAreas settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_resizable_text_areas settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableResizableTextAreasMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableResizableTextAreasMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableResizableTextAreas

-- method Settings::set_enable_site_specific_quirks
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_site_specific_quirks" webkit_settings_set_enable_site_specific_quirks :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-site-specific-quirks/@ property.
-}
settingsSetEnableSiteSpecificQuirks ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableSiteSpecificQuirks settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_site_specific_quirks settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableSiteSpecificQuirksMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableSiteSpecificQuirksMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableSiteSpecificQuirks

-- method Settings::set_enable_smooth_scrolling
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_smooth_scrolling" webkit_settings_set_enable_smooth_scrolling :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-smooth-scrolling/@ property.
-}
settingsSetEnableSmoothScrolling ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableSmoothScrolling settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_smooth_scrolling settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableSmoothScrollingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableSmoothScrollingMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableSmoothScrolling

-- method Settings::set_enable_spatial_navigation
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_spatial_navigation" webkit_settings_set_enable_spatial_navigation :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-spatial-navigation/@ property.

@since 2.2
-}
settingsSetEnableSpatialNavigation ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableSpatialNavigation settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_spatial_navigation settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableSpatialNavigationMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableSpatialNavigationMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableSpatialNavigation

-- method Settings::set_enable_tabs_to_links
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_tabs_to_links" webkit_settings_set_enable_tabs_to_links :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-tabs-to-links/@ property.
-}
settingsSetEnableTabsToLinks ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableTabsToLinks settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_tabs_to_links settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableTabsToLinksMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableTabsToLinksMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableTabsToLinks

-- method Settings::set_enable_webaudio
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_webaudio" webkit_settings_set_enable_webaudio :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-webaudio/@ property.
-}
settingsSetEnableWebaudio ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableWebaudio settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_webaudio settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableWebaudioMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableWebaudioMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableWebaudio

-- method Settings::set_enable_webgl
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_webgl" webkit_settings_set_enable_webgl :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-webgl/@ property.
-}
settingsSetEnableWebgl ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableWebgl settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_webgl settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableWebglMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableWebglMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableWebgl

-- method Settings::set_enable_write_console_messages_to_stdout
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_write_console_messages_to_stdout" webkit_settings_set_enable_write_console_messages_to_stdout :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-write-console-messages-to-stdout/@ property.

@since 2.2
-}
settingsSetEnableWriteConsoleMessagesToStdout ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableWriteConsoleMessagesToStdout settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_write_console_messages_to_stdout settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableWriteConsoleMessagesToStdoutMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableWriteConsoleMessagesToStdoutMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableWriteConsoleMessagesToStdout

-- method Settings::set_enable_xss_auditor
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_enable_xss_auditor" webkit_settings_set_enable_xss_auditor :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/enable-xss-auditor/@ property.
-}
settingsSetEnableXssAuditor ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetEnableXssAuditor settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_enable_xss_auditor settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetEnableXssAuditorMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetEnableXssAuditorMethodInfo a signature where
    overloadedMethod _ = settingsSetEnableXssAuditor

-- method Settings::set_fantasy_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "fantasy_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default fantasy font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_fantasy_font_family" webkit_settings_set_fantasy_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- fantasy_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/fantasy-font-family/@ property.
-}
settingsSetFantasyFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@fantasyFontFamily@/: the new default fantasy font family -}
    -> m ()
settingsSetFantasyFontFamily settings fantasyFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    fantasyFontFamily' <- textToCString fantasyFontFamily
    webkit_settings_set_fantasy_font_family settings' fantasyFontFamily'
    touchManagedPtr settings
    freeMem fantasyFontFamily'
    return ()

data SettingsSetFantasyFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetFantasyFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetFantasyFontFamily

-- method Settings::set_javascript_can_access_clipboard
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_javascript_can_access_clipboard" webkit_settings_set_javascript_can_access_clipboard :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/javascript-can-access-clipboard/@ property.
-}
settingsSetJavascriptCanAccessClipboard ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetJavascriptCanAccessClipboard settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_javascript_can_access_clipboard settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetJavascriptCanAccessClipboardMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetJavascriptCanAccessClipboardMethodInfo a signature where
    overloadedMethod _ = settingsSetJavascriptCanAccessClipboard

-- method Settings::set_javascript_can_open_windows_automatically
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_javascript_can_open_windows_automatically" webkit_settings_set_javascript_can_open_windows_automatically :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/javascript-can-open-windows-automatically/@ property.
-}
settingsSetJavascriptCanOpenWindowsAutomatically ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetJavascriptCanOpenWindowsAutomatically settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_javascript_can_open_windows_automatically settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetJavascriptCanOpenWindowsAutomaticallyMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetJavascriptCanOpenWindowsAutomaticallyMethodInfo a signature where
    overloadedMethod _ = settingsSetJavascriptCanOpenWindowsAutomatically

-- method Settings::set_load_icons_ignoring_image_load_setting
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_load_icons_ignoring_image_load_setting" webkit_settings_set_load_icons_ignoring_image_load_setting :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/load-icons-ignoring-image-load-setting/@ property.
-}
settingsSetLoadIconsIgnoringImageLoadSetting ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetLoadIconsIgnoringImageLoadSetting settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_load_icons_ignoring_image_load_setting settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetLoadIconsIgnoringImageLoadSettingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetLoadIconsIgnoringImageLoadSettingMethodInfo a signature where
    overloadedMethod _ = settingsSetLoadIconsIgnoringImageLoadSetting

-- method Settings::set_media_playback_allows_inline
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_media_playback_allows_inline" webkit_settings_set_media_playback_allows_inline :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/media-playback-allows-inline/@ property.
-}
settingsSetMediaPlaybackAllowsInline ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetMediaPlaybackAllowsInline settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_media_playback_allows_inline settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetMediaPlaybackAllowsInlineMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetMediaPlaybackAllowsInlineMethodInfo a signature where
    overloadedMethod _ = settingsSetMediaPlaybackAllowsInline

-- method Settings::set_media_playback_requires_user_gesture
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_media_playback_requires_user_gesture" webkit_settings_set_media_playback_requires_user_gesture :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- enabled : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/media-playback-requires-user-gesture/@ property.
-}
settingsSetMediaPlaybackRequiresUserGesture ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@enabled@/: Value to be set -}
    -> m ()
settingsSetMediaPlaybackRequiresUserGesture settings enabled = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let enabled' = (fromIntegral . fromEnum) enabled
    webkit_settings_set_media_playback_requires_user_gesture settings' enabled'
    touchManagedPtr settings
    return ()

data SettingsSetMediaPlaybackRequiresUserGestureMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetMediaPlaybackRequiresUserGestureMethodInfo a signature where
    overloadedMethod _ = settingsSetMediaPlaybackRequiresUserGesture

-- method Settings::set_minimum_font_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_size", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "minimum font size to be set in points", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_minimum_font_size" webkit_settings_set_minimum_font_size :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    Word32 ->                               -- font_size : TBasicType TUInt32
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/minimum-font-size/@ property.
-}
settingsSetMinimumFontSize ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Word32
    {- ^ /@fontSize@/: minimum font size to be set in points -}
    -> m ()
settingsSetMinimumFontSize settings fontSize = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    webkit_settings_set_minimum_font_size settings' fontSize
    touchManagedPtr settings
    return ()

data SettingsSetMinimumFontSizeMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetMinimumFontSizeMethodInfo a signature where
    overloadedMethod _ = settingsSetMinimumFontSize

-- method Settings::set_monospace_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "monospace_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default monospace font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_monospace_font_family" webkit_settings_set_monospace_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- monospace_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/monospace-font-family/@ property.
-}
settingsSetMonospaceFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@monospaceFontFamily@/: the new default monospace font family -}
    -> m ()
settingsSetMonospaceFontFamily settings monospaceFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    monospaceFontFamily' <- textToCString monospaceFontFamily
    webkit_settings_set_monospace_font_family settings' monospaceFontFamily'
    touchManagedPtr settings
    freeMem monospaceFontFamily'
    return ()

data SettingsSetMonospaceFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetMonospaceFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetMonospaceFontFamily

-- method Settings::set_pictograph_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pictograph_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default pictograph font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_pictograph_font_family" webkit_settings_set_pictograph_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- pictograph_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/pictograph-font-family/@ property.
-}
settingsSetPictographFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@pictographFontFamily@/: the new default pictograph font family -}
    -> m ()
settingsSetPictographFontFamily settings pictographFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    pictographFontFamily' <- textToCString pictographFontFamily
    webkit_settings_set_pictograph_font_family settings' pictographFontFamily'
    touchManagedPtr settings
    freeMem pictographFontFamily'
    return ()

data SettingsSetPictographFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetPictographFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetPictographFontFamily

-- method Settings::set_print_backgrounds
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "print_backgrounds", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_print_backgrounds" webkit_settings_set_print_backgrounds :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- print_backgrounds : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/print-backgrounds/@ property.
-}
settingsSetPrintBackgrounds ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@printBackgrounds@/: Value to be set -}
    -> m ()
settingsSetPrintBackgrounds settings printBackgrounds = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let printBackgrounds' = (fromIntegral . fromEnum) printBackgrounds
    webkit_settings_set_print_backgrounds settings' printBackgrounds'
    touchManagedPtr settings
    return ()

data SettingsSetPrintBackgroundsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetPrintBackgroundsMethodInfo a signature where
    overloadedMethod _ = settingsSetPrintBackgrounds

-- method Settings::set_sans_serif_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sans_serif_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default sans-serif font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_sans_serif_font_family" webkit_settings_set_sans_serif_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- sans_serif_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/sans-serif-font-family/@ property.
-}
settingsSetSansSerifFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@sansSerifFontFamily@/: the new default sans-serif font family -}
    -> m ()
settingsSetSansSerifFontFamily settings sansSerifFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    sansSerifFontFamily' <- textToCString sansSerifFontFamily
    webkit_settings_set_sans_serif_font_family settings' sansSerifFontFamily'
    touchManagedPtr settings
    freeMem sansSerifFontFamily'
    return ()

data SettingsSetSansSerifFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetSansSerifFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetSansSerifFontFamily

-- method Settings::set_serif_font_family
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "serif_font_family", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the new default serif font family", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_serif_font_family" webkit_settings_set_serif_font_family :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- serif_font_family : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/serif-font-family/@ property.
-}
settingsSetSerifFontFamily ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> T.Text
    {- ^ /@serifFontFamily@/: the new default serif font family -}
    -> m ()
settingsSetSerifFontFamily settings serifFontFamily = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    serifFontFamily' <- textToCString serifFontFamily
    webkit_settings_set_serif_font_family settings' serifFontFamily'
    touchManagedPtr settings
    freeMem serifFontFamily'
    return ()

data SettingsSetSerifFontFamilyMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetSerifFontFamilyMethodInfo a signature where
    overloadedMethod _ = settingsSetSerifFontFamily

-- method Settings::set_user_agent
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_agent", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The new custom user agent string or %NULL to use the default user agent", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_user_agent" webkit_settings_set_user_agent :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- user_agent : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/user-agent/@ property.
-}
settingsSetUserAgent ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Maybe (T.Text)
    {- ^ /@userAgent@/: The new custom user agent string or 'Nothing' to use the default user agent -}
    -> m ()
settingsSetUserAgent settings userAgent = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    maybeUserAgent <- case userAgent of
        Nothing -> return nullPtr
        Just jUserAgent -> do
            jUserAgent' <- textToCString jUserAgent
            return jUserAgent'
    webkit_settings_set_user_agent settings' maybeUserAgent
    touchManagedPtr settings
    freeMem maybeUserAgent
    return ()

data SettingsSetUserAgentMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetUserAgentMethodInfo a signature where
    overloadedMethod _ = settingsSetUserAgent

-- method Settings::set_user_agent_with_application_details
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "application_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The application name used for the user agent or %NULL to use the default user agent.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "application_version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "The application version for the user agent or %NULL to user the default version.", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_user_agent_with_application_details" webkit_settings_set_user_agent_with_application_details :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CString ->                              -- application_name : TBasicType TUTF8
    CString ->                              -- application_version : TBasicType TUTF8
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/user-agent/@ property by appending the application details to the default user
agent. If no application name or version is given, the default user agent used will be used. If only
the version is given, the default engine version is used with the given application name.
-}
settingsSetUserAgentWithApplicationDetails ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Maybe (T.Text)
    {- ^ /@applicationName@/: The application name used for the user agent or 'Nothing' to use the default user agent. -}
    -> Maybe (T.Text)
    {- ^ /@applicationVersion@/: The application version for the user agent or 'Nothing' to user the default version. -}
    -> m ()
settingsSetUserAgentWithApplicationDetails settings applicationName applicationVersion = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    maybeApplicationName <- case applicationName of
        Nothing -> return nullPtr
        Just jApplicationName -> do
            jApplicationName' <- textToCString jApplicationName
            return jApplicationName'
    maybeApplicationVersion <- case applicationVersion of
        Nothing -> return nullPtr
        Just jApplicationVersion -> do
            jApplicationVersion' <- textToCString jApplicationVersion
            return jApplicationVersion'
    webkit_settings_set_user_agent_with_application_details settings' maybeApplicationName maybeApplicationVersion
    touchManagedPtr settings
    freeMem maybeApplicationName
    freeMem maybeApplicationVersion
    return ()

data SettingsSetUserAgentWithApplicationDetailsMethodInfo
instance (signature ~ (Maybe (T.Text) -> Maybe (T.Text) -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetUserAgentWithApplicationDetailsMethodInfo a signature where
    overloadedMethod _ = settingsSetUserAgentWithApplicationDetails

-- method Settings::set_zoom_text_only
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "WebKit2", name = "Settings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #WebKitSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "zoom_text_only", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "Value to be set", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False

foreign import ccall "webkit_settings_set_zoom_text_only" webkit_settings_set_zoom_text_only :: 
    Ptr Settings ->                         -- settings : TInterface (Name {namespace = "WebKit2", name = "Settings"})
    CInt ->                                 -- zoom_text_only : TBasicType TBoolean
    IO ()

{- |
Set the 'GI.WebKit2.Objects.Settings.Settings':@/zoom-text-only/@ property.
-}
settingsSetZoomTextOnly ::
    (B.CallStack.HasCallStack, MonadIO m, IsSettings a) =>
    a
    {- ^ /@settings@/: a 'GI.WebKit2.Objects.Settings.Settings' -}
    -> Bool
    {- ^ /@zoomTextOnly@/: Value to be set -}
    -> m ()
settingsSetZoomTextOnly settings zoomTextOnly = liftIO $ do
    settings' <- unsafeManagedPtrCastPtr settings
    let zoomTextOnly' = (fromIntegral . fromEnum) zoomTextOnly
    webkit_settings_set_zoom_text_only settings' zoomTextOnly'
    touchManagedPtr settings
    return ()

data SettingsSetZoomTextOnlyMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsSettings a) => O.MethodInfo SettingsSetZoomTextOnlyMethodInfo a signature where
    overloadedMethod _ = settingsSetZoomTextOnly