module GI.WebKit.Objects.WebSettings
(
WebSettings(..) ,
WebSettingsK ,
toWebSettings ,
noWebSettings ,
webSettingsCopy ,
webSettingsGetUserAgent ,
webSettingsNew ,
WebSettingsAutoLoadImagesPropertyInfo ,
constructWebSettingsAutoLoadImages ,
getWebSettingsAutoLoadImages ,
setWebSettingsAutoLoadImages ,
WebSettingsAutoResizeWindowPropertyInfo ,
constructWebSettingsAutoResizeWindow ,
getWebSettingsAutoResizeWindow ,
setWebSettingsAutoResizeWindow ,
WebSettingsAutoShrinkImagesPropertyInfo ,
constructWebSettingsAutoShrinkImages ,
getWebSettingsAutoShrinkImages ,
setWebSettingsAutoShrinkImages ,
WebSettingsCursiveFontFamilyPropertyInfo,
constructWebSettingsCursiveFontFamily ,
getWebSettingsCursiveFontFamily ,
setWebSettingsCursiveFontFamily ,
WebSettingsDefaultEncodingPropertyInfo ,
constructWebSettingsDefaultEncoding ,
getWebSettingsDefaultEncoding ,
setWebSettingsDefaultEncoding ,
WebSettingsDefaultFontFamilyPropertyInfo,
constructWebSettingsDefaultFontFamily ,
getWebSettingsDefaultFontFamily ,
setWebSettingsDefaultFontFamily ,
WebSettingsDefaultFontSizePropertyInfo ,
constructWebSettingsDefaultFontSize ,
getWebSettingsDefaultFontSize ,
setWebSettingsDefaultFontSize ,
WebSettingsDefaultMonospaceFontSizePropertyInfo,
constructWebSettingsDefaultMonospaceFontSize,
getWebSettingsDefaultMonospaceFontSize ,
setWebSettingsDefaultMonospaceFontSize ,
WebSettingsEditingBehaviorPropertyInfo ,
constructWebSettingsEditingBehavior ,
getWebSettingsEditingBehavior ,
setWebSettingsEditingBehavior ,
WebSettingsEnableAcceleratedCompositingPropertyInfo,
constructWebSettingsEnableAcceleratedCompositing,
getWebSettingsEnableAcceleratedCompositing,
setWebSettingsEnableAcceleratedCompositing,
WebSettingsEnableCaretBrowsingPropertyInfo,
constructWebSettingsEnableCaretBrowsing ,
getWebSettingsEnableCaretBrowsing ,
setWebSettingsEnableCaretBrowsing ,
WebSettingsEnableDefaultContextMenuPropertyInfo,
constructWebSettingsEnableDefaultContextMenu,
getWebSettingsEnableDefaultContextMenu ,
setWebSettingsEnableDefaultContextMenu ,
WebSettingsEnableDeveloperExtrasPropertyInfo,
constructWebSettingsEnableDeveloperExtras,
getWebSettingsEnableDeveloperExtras ,
setWebSettingsEnableDeveloperExtras ,
WebSettingsEnableDisplayOfInsecureContentPropertyInfo,
constructWebSettingsEnableDisplayOfInsecureContent,
getWebSettingsEnableDisplayOfInsecureContent,
setWebSettingsEnableDisplayOfInsecureContent,
WebSettingsEnableDnsPrefetchingPropertyInfo,
constructWebSettingsEnableDnsPrefetching,
getWebSettingsEnableDnsPrefetching ,
setWebSettingsEnableDnsPrefetching ,
WebSettingsEnableDomPastePropertyInfo ,
constructWebSettingsEnableDomPaste ,
getWebSettingsEnableDomPaste ,
setWebSettingsEnableDomPaste ,
WebSettingsEnableFileAccessFromFileUrisPropertyInfo,
constructWebSettingsEnableFileAccessFromFileUris,
getWebSettingsEnableFileAccessFromFileUris,
setWebSettingsEnableFileAccessFromFileUris,
WebSettingsEnableFrameFlatteningPropertyInfo,
constructWebSettingsEnableFrameFlattening,
getWebSettingsEnableFrameFlattening ,
setWebSettingsEnableFrameFlattening ,
WebSettingsEnableFullscreenPropertyInfo ,
constructWebSettingsEnableFullscreen ,
getWebSettingsEnableFullscreen ,
setWebSettingsEnableFullscreen ,
WebSettingsEnableHtml5DatabasePropertyInfo,
constructWebSettingsEnableHtml5Database ,
getWebSettingsEnableHtml5Database ,
setWebSettingsEnableHtml5Database ,
WebSettingsEnableHtml5LocalStoragePropertyInfo,
constructWebSettingsEnableHtml5LocalStorage,
getWebSettingsEnableHtml5LocalStorage ,
setWebSettingsEnableHtml5LocalStorage ,
WebSettingsEnableHyperlinkAuditingPropertyInfo,
constructWebSettingsEnableHyperlinkAuditing,
getWebSettingsEnableHyperlinkAuditing ,
setWebSettingsEnableHyperlinkAuditing ,
WebSettingsEnableJavaAppletPropertyInfo ,
constructWebSettingsEnableJavaApplet ,
getWebSettingsEnableJavaApplet ,
setWebSettingsEnableJavaApplet ,
WebSettingsEnableMediaStreamPropertyInfo,
constructWebSettingsEnableMediaStream ,
getWebSettingsEnableMediaStream ,
setWebSettingsEnableMediaStream ,
WebSettingsEnableMediasourcePropertyInfo,
constructWebSettingsEnableMediasource ,
getWebSettingsEnableMediasource ,
setWebSettingsEnableMediasource ,
WebSettingsEnableOfflineWebApplicationCachePropertyInfo,
constructWebSettingsEnableOfflineWebApplicationCache,
getWebSettingsEnableOfflineWebApplicationCache,
setWebSettingsEnableOfflineWebApplicationCache,
WebSettingsEnablePageCachePropertyInfo ,
constructWebSettingsEnablePageCache ,
getWebSettingsEnablePageCache ,
setWebSettingsEnablePageCache ,
WebSettingsEnablePluginsPropertyInfo ,
constructWebSettingsEnablePlugins ,
getWebSettingsEnablePlugins ,
setWebSettingsEnablePlugins ,
WebSettingsEnablePrivateBrowsingPropertyInfo,
constructWebSettingsEnablePrivateBrowsing,
getWebSettingsEnablePrivateBrowsing ,
setWebSettingsEnablePrivateBrowsing ,
WebSettingsEnableRunningOfInsecureContentPropertyInfo,
constructWebSettingsEnableRunningOfInsecureContent,
getWebSettingsEnableRunningOfInsecureContent,
setWebSettingsEnableRunningOfInsecureContent,
WebSettingsEnableScriptsPropertyInfo ,
constructWebSettingsEnableScripts ,
getWebSettingsEnableScripts ,
setWebSettingsEnableScripts ,
WebSettingsEnableSiteSpecificQuirksPropertyInfo,
constructWebSettingsEnableSiteSpecificQuirks,
getWebSettingsEnableSiteSpecificQuirks ,
setWebSettingsEnableSiteSpecificQuirks ,
WebSettingsEnableSmoothScrollingPropertyInfo,
constructWebSettingsEnableSmoothScrolling,
getWebSettingsEnableSmoothScrolling ,
setWebSettingsEnableSmoothScrolling ,
WebSettingsEnableSpatialNavigationPropertyInfo,
constructWebSettingsEnableSpatialNavigation,
getWebSettingsEnableSpatialNavigation ,
setWebSettingsEnableSpatialNavigation ,
WebSettingsEnableSpellCheckingPropertyInfo,
constructWebSettingsEnableSpellChecking ,
getWebSettingsEnableSpellChecking ,
setWebSettingsEnableSpellChecking ,
WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo,
constructWebSettingsEnableUniversalAccessFromFileUris,
getWebSettingsEnableUniversalAccessFromFileUris,
setWebSettingsEnableUniversalAccessFromFileUris,
WebSettingsEnableWebaudioPropertyInfo ,
constructWebSettingsEnableWebaudio ,
getWebSettingsEnableWebaudio ,
setWebSettingsEnableWebaudio ,
WebSettingsEnableWebglPropertyInfo ,
constructWebSettingsEnableWebgl ,
getWebSettingsEnableWebgl ,
setWebSettingsEnableWebgl ,
WebSettingsEnableXssAuditorPropertyInfo ,
constructWebSettingsEnableXssAuditor ,
getWebSettingsEnableXssAuditor ,
setWebSettingsEnableXssAuditor ,
WebSettingsEnforce96DpiPropertyInfo ,
constructWebSettingsEnforce96Dpi ,
getWebSettingsEnforce96Dpi ,
setWebSettingsEnforce96Dpi ,
WebSettingsFantasyFontFamilyPropertyInfo,
constructWebSettingsFantasyFontFamily ,
getWebSettingsFantasyFontFamily ,
setWebSettingsFantasyFontFamily ,
WebSettingsHtml5LocalStorageDatabasePathPropertyInfo,
constructWebSettingsHtml5LocalStorageDatabasePath,
getWebSettingsHtml5LocalStorageDatabasePath,
setWebSettingsHtml5LocalStorageDatabasePath,
WebSettingsJavascriptCanAccessClipboardPropertyInfo,
constructWebSettingsJavascriptCanAccessClipboard,
getWebSettingsJavascriptCanAccessClipboard,
setWebSettingsJavascriptCanAccessClipboard,
WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo,
constructWebSettingsJavascriptCanOpenWindowsAutomatically,
getWebSettingsJavascriptCanOpenWindowsAutomatically,
setWebSettingsJavascriptCanOpenWindowsAutomatically,
WebSettingsMediaPlaybackAllowsInlinePropertyInfo,
constructWebSettingsMediaPlaybackAllowsInline,
getWebSettingsMediaPlaybackAllowsInline ,
setWebSettingsMediaPlaybackAllowsInline ,
WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo,
constructWebSettingsMediaPlaybackRequiresUserGesture,
getWebSettingsMediaPlaybackRequiresUserGesture,
setWebSettingsMediaPlaybackRequiresUserGesture,
WebSettingsMinimumFontSizePropertyInfo ,
constructWebSettingsMinimumFontSize ,
getWebSettingsMinimumFontSize ,
setWebSettingsMinimumFontSize ,
WebSettingsMinimumLogicalFontSizePropertyInfo,
constructWebSettingsMinimumLogicalFontSize,
getWebSettingsMinimumLogicalFontSize ,
setWebSettingsMinimumLogicalFontSize ,
WebSettingsMonospaceFontFamilyPropertyInfo,
constructWebSettingsMonospaceFontFamily ,
getWebSettingsMonospaceFontFamily ,
setWebSettingsMonospaceFontFamily ,
WebSettingsPrintBackgroundsPropertyInfo ,
constructWebSettingsPrintBackgrounds ,
getWebSettingsPrintBackgrounds ,
setWebSettingsPrintBackgrounds ,
WebSettingsResizableTextAreasPropertyInfo,
constructWebSettingsResizableTextAreas ,
getWebSettingsResizableTextAreas ,
setWebSettingsResizableTextAreas ,
WebSettingsRespectImageOrientationPropertyInfo,
constructWebSettingsRespectImageOrientation,
getWebSettingsRespectImageOrientation ,
setWebSettingsRespectImageOrientation ,
WebSettingsSansSerifFontFamilyPropertyInfo,
constructWebSettingsSansSerifFontFamily ,
getWebSettingsSansSerifFontFamily ,
setWebSettingsSansSerifFontFamily ,
WebSettingsSerifFontFamilyPropertyInfo ,
constructWebSettingsSerifFontFamily ,
getWebSettingsSerifFontFamily ,
setWebSettingsSerifFontFamily ,
WebSettingsSpellCheckingLanguagesPropertyInfo,
constructWebSettingsSpellCheckingLanguages,
getWebSettingsSpellCheckingLanguages ,
setWebSettingsSpellCheckingLanguages ,
WebSettingsTabKeyCyclesThroughElementsPropertyInfo,
constructWebSettingsTabKeyCyclesThroughElements,
getWebSettingsTabKeyCyclesThroughElements,
setWebSettingsTabKeyCyclesThroughElements,
WebSettingsUserAgentPropertyInfo ,
constructWebSettingsUserAgent ,
getWebSettingsUserAgent ,
setWebSettingsUserAgent ,
WebSettingsUserStylesheetUriPropertyInfo,
constructWebSettingsUserStylesheetUri ,
getWebSettingsUserStylesheetUri ,
setWebSettingsUserStylesheetUri ,
WebSettingsZoomStepPropertyInfo ,
constructWebSettingsZoomStep ,
getWebSettingsZoomStep ,
setWebSettingsZoomStep ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.WebKit.Types
import GI.WebKit.Callbacks
import qualified GI.GObject as GObject
newtype WebSettings = WebSettings (ForeignPtr WebSettings)
foreign import ccall "webkit_web_settings_get_type"
c_webkit_web_settings_get_type :: IO GType
type instance ParentTypes WebSettings = WebSettingsParentTypes
type WebSettingsParentTypes = '[GObject.Object]
instance GObject WebSettings where
gobjectIsInitiallyUnowned _ = False
gobjectType _ = c_webkit_web_settings_get_type
class GObject o => WebSettingsK o
instance (GObject o, IsDescendantOf WebSettings o) => WebSettingsK o
toWebSettings :: WebSettingsK o => o -> IO WebSettings
toWebSettings = unsafeCastTo WebSettings
noWebSettings :: Maybe WebSettings
noWebSettings = Nothing
getWebSettingsAutoLoadImages :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsAutoLoadImages obj = liftIO $ getObjectPropertyBool obj "auto-load-images"
setWebSettingsAutoLoadImages :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsAutoLoadImages obj val = liftIO $ setObjectPropertyBool obj "auto-load-images" val
constructWebSettingsAutoLoadImages :: Bool -> IO ([Char], GValue)
constructWebSettingsAutoLoadImages val = constructObjectPropertyBool "auto-load-images" val
data WebSettingsAutoLoadImagesPropertyInfo
instance AttrInfo WebSettingsAutoLoadImagesPropertyInfo where
type AttrAllowedOps WebSettingsAutoLoadImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = WebSettingsK
type AttrGetType WebSettingsAutoLoadImagesPropertyInfo = Bool
type AttrLabel WebSettingsAutoLoadImagesPropertyInfo = "WebSettings::auto-load-images"
attrGet _ = getWebSettingsAutoLoadImages
attrSet _ = setWebSettingsAutoLoadImages
attrConstruct _ = constructWebSettingsAutoLoadImages
getWebSettingsAutoResizeWindow :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsAutoResizeWindow obj = liftIO $ getObjectPropertyBool obj "auto-resize-window"
setWebSettingsAutoResizeWindow :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsAutoResizeWindow obj val = liftIO $ setObjectPropertyBool obj "auto-resize-window" val
constructWebSettingsAutoResizeWindow :: Bool -> IO ([Char], GValue)
constructWebSettingsAutoResizeWindow val = constructObjectPropertyBool "auto-resize-window" val
data WebSettingsAutoResizeWindowPropertyInfo
instance AttrInfo WebSettingsAutoResizeWindowPropertyInfo where
type AttrAllowedOps WebSettingsAutoResizeWindowPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = WebSettingsK
type AttrGetType WebSettingsAutoResizeWindowPropertyInfo = Bool
type AttrLabel WebSettingsAutoResizeWindowPropertyInfo = "WebSettings::auto-resize-window"
attrGet _ = getWebSettingsAutoResizeWindow
attrSet _ = setWebSettingsAutoResizeWindow
attrConstruct _ = constructWebSettingsAutoResizeWindow
getWebSettingsAutoShrinkImages :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsAutoShrinkImages obj = liftIO $ getObjectPropertyBool obj "auto-shrink-images"
setWebSettingsAutoShrinkImages :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsAutoShrinkImages obj val = liftIO $ setObjectPropertyBool obj "auto-shrink-images" val
constructWebSettingsAutoShrinkImages :: Bool -> IO ([Char], GValue)
constructWebSettingsAutoShrinkImages val = constructObjectPropertyBool "auto-shrink-images" val
data WebSettingsAutoShrinkImagesPropertyInfo
instance AttrInfo WebSettingsAutoShrinkImagesPropertyInfo where
type AttrAllowedOps WebSettingsAutoShrinkImagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = WebSettingsK
type AttrGetType WebSettingsAutoShrinkImagesPropertyInfo = Bool
type AttrLabel WebSettingsAutoShrinkImagesPropertyInfo = "WebSettings::auto-shrink-images"
attrGet _ = getWebSettingsAutoShrinkImages
attrSet _ = setWebSettingsAutoShrinkImages
attrConstruct _ = constructWebSettingsAutoShrinkImages
getWebSettingsCursiveFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsCursiveFontFamily obj = liftIO $ getObjectPropertyString obj "cursive-font-family"
setWebSettingsCursiveFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsCursiveFontFamily obj val = liftIO $ setObjectPropertyString obj "cursive-font-family" val
constructWebSettingsCursiveFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsCursiveFontFamily val = constructObjectPropertyString "cursive-font-family" val
data WebSettingsCursiveFontFamilyPropertyInfo
instance AttrInfo WebSettingsCursiveFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsCursiveFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsCursiveFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsCursiveFontFamilyPropertyInfo = "WebSettings::cursive-font-family"
attrGet _ = getWebSettingsCursiveFontFamily
attrSet _ = setWebSettingsCursiveFontFamily
attrConstruct _ = constructWebSettingsCursiveFontFamily
getWebSettingsDefaultEncoding :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsDefaultEncoding obj = liftIO $ getObjectPropertyString obj "default-encoding"
setWebSettingsDefaultEncoding :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsDefaultEncoding obj val = liftIO $ setObjectPropertyString obj "default-encoding" val
constructWebSettingsDefaultEncoding :: T.Text -> IO ([Char], GValue)
constructWebSettingsDefaultEncoding val = constructObjectPropertyString "default-encoding" val
data WebSettingsDefaultEncodingPropertyInfo
instance AttrInfo WebSettingsDefaultEncodingPropertyInfo where
type AttrAllowedOps WebSettingsDefaultEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsDefaultEncodingPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsDefaultEncodingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsDefaultEncodingPropertyInfo = T.Text
type AttrLabel WebSettingsDefaultEncodingPropertyInfo = "WebSettings::default-encoding"
attrGet _ = getWebSettingsDefaultEncoding
attrSet _ = setWebSettingsDefaultEncoding
attrConstruct _ = constructWebSettingsDefaultEncoding
getWebSettingsDefaultFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsDefaultFontFamily obj = liftIO $ getObjectPropertyString obj "default-font-family"
setWebSettingsDefaultFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsDefaultFontFamily obj val = liftIO $ setObjectPropertyString obj "default-font-family" val
constructWebSettingsDefaultFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsDefaultFontFamily val = constructObjectPropertyString "default-font-family" val
data WebSettingsDefaultFontFamilyPropertyInfo
instance AttrInfo WebSettingsDefaultFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsDefaultFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsDefaultFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsDefaultFontFamilyPropertyInfo = "WebSettings::default-font-family"
attrGet _ = getWebSettingsDefaultFontFamily
attrSet _ = setWebSettingsDefaultFontFamily
attrConstruct _ = constructWebSettingsDefaultFontFamily
getWebSettingsDefaultFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32
getWebSettingsDefaultFontSize obj = liftIO $ getObjectPropertyCInt obj "default-font-size"
setWebSettingsDefaultFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()
setWebSettingsDefaultFontSize obj val = liftIO $ setObjectPropertyCInt obj "default-font-size" val
constructWebSettingsDefaultFontSize :: Int32 -> IO ([Char], GValue)
constructWebSettingsDefaultFontSize val = constructObjectPropertyCInt "default-font-size" val
data WebSettingsDefaultFontSizePropertyInfo
instance AttrInfo WebSettingsDefaultFontSizePropertyInfo where
type AttrAllowedOps WebSettingsDefaultFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsDefaultFontSizePropertyInfo = (~) Int32
type AttrBaseTypeConstraint WebSettingsDefaultFontSizePropertyInfo = WebSettingsK
type AttrGetType WebSettingsDefaultFontSizePropertyInfo = Int32
type AttrLabel WebSettingsDefaultFontSizePropertyInfo = "WebSettings::default-font-size"
attrGet _ = getWebSettingsDefaultFontSize
attrSet _ = setWebSettingsDefaultFontSize
attrConstruct _ = constructWebSettingsDefaultFontSize
getWebSettingsDefaultMonospaceFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32
getWebSettingsDefaultMonospaceFontSize obj = liftIO $ getObjectPropertyCInt obj "default-monospace-font-size"
setWebSettingsDefaultMonospaceFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()
setWebSettingsDefaultMonospaceFontSize obj val = liftIO $ setObjectPropertyCInt obj "default-monospace-font-size" val
constructWebSettingsDefaultMonospaceFontSize :: Int32 -> IO ([Char], GValue)
constructWebSettingsDefaultMonospaceFontSize val = constructObjectPropertyCInt "default-monospace-font-size" val
data WebSettingsDefaultMonospaceFontSizePropertyInfo
instance AttrInfo WebSettingsDefaultMonospaceFontSizePropertyInfo where
type AttrAllowedOps WebSettingsDefaultMonospaceFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = (~) Int32
type AttrBaseTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = WebSettingsK
type AttrGetType WebSettingsDefaultMonospaceFontSizePropertyInfo = Int32
type AttrLabel WebSettingsDefaultMonospaceFontSizePropertyInfo = "WebSettings::default-monospace-font-size"
attrGet _ = getWebSettingsDefaultMonospaceFontSize
attrSet _ = setWebSettingsDefaultMonospaceFontSize
attrConstruct _ = constructWebSettingsDefaultMonospaceFontSize
getWebSettingsEditingBehavior :: (MonadIO m, WebSettingsK o) => o -> m EditingBehavior
getWebSettingsEditingBehavior obj = liftIO $ getObjectPropertyEnum obj "editing-behavior"
setWebSettingsEditingBehavior :: (MonadIO m, WebSettingsK o) => o -> EditingBehavior -> m ()
setWebSettingsEditingBehavior obj val = liftIO $ setObjectPropertyEnum obj "editing-behavior" val
constructWebSettingsEditingBehavior :: EditingBehavior -> IO ([Char], GValue)
constructWebSettingsEditingBehavior val = constructObjectPropertyEnum "editing-behavior" val
data WebSettingsEditingBehaviorPropertyInfo
instance AttrInfo WebSettingsEditingBehaviorPropertyInfo where
type AttrAllowedOps WebSettingsEditingBehaviorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEditingBehaviorPropertyInfo = (~) EditingBehavior
type AttrBaseTypeConstraint WebSettingsEditingBehaviorPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEditingBehaviorPropertyInfo = EditingBehavior
type AttrLabel WebSettingsEditingBehaviorPropertyInfo = "WebSettings::editing-behavior"
attrGet _ = getWebSettingsEditingBehavior
attrSet _ = setWebSettingsEditingBehavior
attrConstruct _ = constructWebSettingsEditingBehavior
getWebSettingsEnableAcceleratedCompositing :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableAcceleratedCompositing obj = liftIO $ getObjectPropertyBool obj "enable-accelerated-compositing"
setWebSettingsEnableAcceleratedCompositing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableAcceleratedCompositing obj val = liftIO $ setObjectPropertyBool obj "enable-accelerated-compositing" val
constructWebSettingsEnableAcceleratedCompositing :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableAcceleratedCompositing val = constructObjectPropertyBool "enable-accelerated-compositing" val
data WebSettingsEnableAcceleratedCompositingPropertyInfo
instance AttrInfo WebSettingsEnableAcceleratedCompositingPropertyInfo where
type AttrAllowedOps WebSettingsEnableAcceleratedCompositingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableAcceleratedCompositingPropertyInfo = Bool
type AttrLabel WebSettingsEnableAcceleratedCompositingPropertyInfo = "WebSettings::enable-accelerated-compositing"
attrGet _ = getWebSettingsEnableAcceleratedCompositing
attrSet _ = setWebSettingsEnableAcceleratedCompositing
attrConstruct _ = constructWebSettingsEnableAcceleratedCompositing
getWebSettingsEnableCaretBrowsing :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableCaretBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-caret-browsing"
setWebSettingsEnableCaretBrowsing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableCaretBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-caret-browsing" val
constructWebSettingsEnableCaretBrowsing :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableCaretBrowsing val = constructObjectPropertyBool "enable-caret-browsing" val
data WebSettingsEnableCaretBrowsingPropertyInfo
instance AttrInfo WebSettingsEnableCaretBrowsingPropertyInfo where
type AttrAllowedOps WebSettingsEnableCaretBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableCaretBrowsingPropertyInfo = Bool
type AttrLabel WebSettingsEnableCaretBrowsingPropertyInfo = "WebSettings::enable-caret-browsing"
attrGet _ = getWebSettingsEnableCaretBrowsing
attrSet _ = setWebSettingsEnableCaretBrowsing
attrConstruct _ = constructWebSettingsEnableCaretBrowsing
getWebSettingsEnableDefaultContextMenu :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableDefaultContextMenu obj = liftIO $ getObjectPropertyBool obj "enable-default-context-menu"
setWebSettingsEnableDefaultContextMenu :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableDefaultContextMenu obj val = liftIO $ setObjectPropertyBool obj "enable-default-context-menu" val
constructWebSettingsEnableDefaultContextMenu :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableDefaultContextMenu val = constructObjectPropertyBool "enable-default-context-menu" val
data WebSettingsEnableDefaultContextMenuPropertyInfo
instance AttrInfo WebSettingsEnableDefaultContextMenuPropertyInfo where
type AttrAllowedOps WebSettingsEnableDefaultContextMenuPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableDefaultContextMenuPropertyInfo = Bool
type AttrLabel WebSettingsEnableDefaultContextMenuPropertyInfo = "WebSettings::enable-default-context-menu"
attrGet _ = getWebSettingsEnableDefaultContextMenu
attrSet _ = setWebSettingsEnableDefaultContextMenu
attrConstruct _ = constructWebSettingsEnableDefaultContextMenu
getWebSettingsEnableDeveloperExtras :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableDeveloperExtras obj = liftIO $ getObjectPropertyBool obj "enable-developer-extras"
setWebSettingsEnableDeveloperExtras :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableDeveloperExtras obj val = liftIO $ setObjectPropertyBool obj "enable-developer-extras" val
constructWebSettingsEnableDeveloperExtras :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableDeveloperExtras val = constructObjectPropertyBool "enable-developer-extras" val
data WebSettingsEnableDeveloperExtrasPropertyInfo
instance AttrInfo WebSettingsEnableDeveloperExtrasPropertyInfo where
type AttrAllowedOps WebSettingsEnableDeveloperExtrasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableDeveloperExtrasPropertyInfo = Bool
type AttrLabel WebSettingsEnableDeveloperExtrasPropertyInfo = "WebSettings::enable-developer-extras"
attrGet _ = getWebSettingsEnableDeveloperExtras
attrSet _ = setWebSettingsEnableDeveloperExtras
attrConstruct _ = constructWebSettingsEnableDeveloperExtras
getWebSettingsEnableDisplayOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableDisplayOfInsecureContent obj = liftIO $ getObjectPropertyBool obj "enable-display-of-insecure-content"
setWebSettingsEnableDisplayOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableDisplayOfInsecureContent obj val = liftIO $ setObjectPropertyBool obj "enable-display-of-insecure-content" val
constructWebSettingsEnableDisplayOfInsecureContent :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableDisplayOfInsecureContent val = constructObjectPropertyBool "enable-display-of-insecure-content" val
data WebSettingsEnableDisplayOfInsecureContentPropertyInfo
instance AttrInfo WebSettingsEnableDisplayOfInsecureContentPropertyInfo where
type AttrAllowedOps WebSettingsEnableDisplayOfInsecureContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableDisplayOfInsecureContentPropertyInfo = Bool
type AttrLabel WebSettingsEnableDisplayOfInsecureContentPropertyInfo = "WebSettings::enable-display-of-insecure-content"
attrGet _ = getWebSettingsEnableDisplayOfInsecureContent
attrSet _ = setWebSettingsEnableDisplayOfInsecureContent
attrConstruct _ = constructWebSettingsEnableDisplayOfInsecureContent
getWebSettingsEnableDnsPrefetching :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableDnsPrefetching obj = liftIO $ getObjectPropertyBool obj "enable-dns-prefetching"
setWebSettingsEnableDnsPrefetching :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableDnsPrefetching obj val = liftIO $ setObjectPropertyBool obj "enable-dns-prefetching" val
constructWebSettingsEnableDnsPrefetching :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableDnsPrefetching val = constructObjectPropertyBool "enable-dns-prefetching" val
data WebSettingsEnableDnsPrefetchingPropertyInfo
instance AttrInfo WebSettingsEnableDnsPrefetchingPropertyInfo where
type AttrAllowedOps WebSettingsEnableDnsPrefetchingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableDnsPrefetchingPropertyInfo = Bool
type AttrLabel WebSettingsEnableDnsPrefetchingPropertyInfo = "WebSettings::enable-dns-prefetching"
attrGet _ = getWebSettingsEnableDnsPrefetching
attrSet _ = setWebSettingsEnableDnsPrefetching
attrConstruct _ = constructWebSettingsEnableDnsPrefetching
getWebSettingsEnableDomPaste :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableDomPaste obj = liftIO $ getObjectPropertyBool obj "enable-dom-paste"
setWebSettingsEnableDomPaste :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableDomPaste obj val = liftIO $ setObjectPropertyBool obj "enable-dom-paste" val
constructWebSettingsEnableDomPaste :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableDomPaste val = constructObjectPropertyBool "enable-dom-paste" val
data WebSettingsEnableDomPastePropertyInfo
instance AttrInfo WebSettingsEnableDomPastePropertyInfo where
type AttrAllowedOps WebSettingsEnableDomPastePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableDomPastePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableDomPastePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableDomPastePropertyInfo = Bool
type AttrLabel WebSettingsEnableDomPastePropertyInfo = "WebSettings::enable-dom-paste"
attrGet _ = getWebSettingsEnableDomPaste
attrSet _ = setWebSettingsEnableDomPaste
attrConstruct _ = constructWebSettingsEnableDomPaste
getWebSettingsEnableFileAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableFileAccessFromFileUris obj = liftIO $ getObjectPropertyBool obj "enable-file-access-from-file-uris"
setWebSettingsEnableFileAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableFileAccessFromFileUris obj val = liftIO $ setObjectPropertyBool obj "enable-file-access-from-file-uris" val
constructWebSettingsEnableFileAccessFromFileUris :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableFileAccessFromFileUris val = constructObjectPropertyBool "enable-file-access-from-file-uris" val
data WebSettingsEnableFileAccessFromFileUrisPropertyInfo
instance AttrInfo WebSettingsEnableFileAccessFromFileUrisPropertyInfo where
type AttrAllowedOps WebSettingsEnableFileAccessFromFileUrisPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableFileAccessFromFileUrisPropertyInfo = Bool
type AttrLabel WebSettingsEnableFileAccessFromFileUrisPropertyInfo = "WebSettings::enable-file-access-from-file-uris"
attrGet _ = getWebSettingsEnableFileAccessFromFileUris
attrSet _ = setWebSettingsEnableFileAccessFromFileUris
attrConstruct _ = constructWebSettingsEnableFileAccessFromFileUris
getWebSettingsEnableFrameFlattening :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableFrameFlattening obj = liftIO $ getObjectPropertyBool obj "enable-frame-flattening"
setWebSettingsEnableFrameFlattening :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableFrameFlattening obj val = liftIO $ setObjectPropertyBool obj "enable-frame-flattening" val
constructWebSettingsEnableFrameFlattening :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableFrameFlattening val = constructObjectPropertyBool "enable-frame-flattening" val
data WebSettingsEnableFrameFlatteningPropertyInfo
instance AttrInfo WebSettingsEnableFrameFlatteningPropertyInfo where
type AttrAllowedOps WebSettingsEnableFrameFlatteningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableFrameFlatteningPropertyInfo = Bool
type AttrLabel WebSettingsEnableFrameFlatteningPropertyInfo = "WebSettings::enable-frame-flattening"
attrGet _ = getWebSettingsEnableFrameFlattening
attrSet _ = setWebSettingsEnableFrameFlattening
attrConstruct _ = constructWebSettingsEnableFrameFlattening
getWebSettingsEnableFullscreen :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableFullscreen obj = liftIO $ getObjectPropertyBool obj "enable-fullscreen"
setWebSettingsEnableFullscreen :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableFullscreen obj val = liftIO $ setObjectPropertyBool obj "enable-fullscreen" val
constructWebSettingsEnableFullscreen :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableFullscreen val = constructObjectPropertyBool "enable-fullscreen" val
data WebSettingsEnableFullscreenPropertyInfo
instance AttrInfo WebSettingsEnableFullscreenPropertyInfo where
type AttrAllowedOps WebSettingsEnableFullscreenPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableFullscreenPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableFullscreenPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableFullscreenPropertyInfo = Bool
type AttrLabel WebSettingsEnableFullscreenPropertyInfo = "WebSettings::enable-fullscreen"
attrGet _ = getWebSettingsEnableFullscreen
attrSet _ = setWebSettingsEnableFullscreen
attrConstruct _ = constructWebSettingsEnableFullscreen
getWebSettingsEnableHtml5Database :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableHtml5Database obj = liftIO $ getObjectPropertyBool obj "enable-html5-database"
setWebSettingsEnableHtml5Database :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableHtml5Database obj val = liftIO $ setObjectPropertyBool obj "enable-html5-database" val
constructWebSettingsEnableHtml5Database :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableHtml5Database val = constructObjectPropertyBool "enable-html5-database" val
data WebSettingsEnableHtml5DatabasePropertyInfo
instance AttrInfo WebSettingsEnableHtml5DatabasePropertyInfo where
type AttrAllowedOps WebSettingsEnableHtml5DatabasePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableHtml5DatabasePropertyInfo = Bool
type AttrLabel WebSettingsEnableHtml5DatabasePropertyInfo = "WebSettings::enable-html5-database"
attrGet _ = getWebSettingsEnableHtml5Database
attrSet _ = setWebSettingsEnableHtml5Database
attrConstruct _ = constructWebSettingsEnableHtml5Database
getWebSettingsEnableHtml5LocalStorage :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableHtml5LocalStorage obj = liftIO $ getObjectPropertyBool obj "enable-html5-local-storage"
setWebSettingsEnableHtml5LocalStorage :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableHtml5LocalStorage obj val = liftIO $ setObjectPropertyBool obj "enable-html5-local-storage" val
constructWebSettingsEnableHtml5LocalStorage :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableHtml5LocalStorage val = constructObjectPropertyBool "enable-html5-local-storage" val
data WebSettingsEnableHtml5LocalStoragePropertyInfo
instance AttrInfo WebSettingsEnableHtml5LocalStoragePropertyInfo where
type AttrAllowedOps WebSettingsEnableHtml5LocalStoragePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableHtml5LocalStoragePropertyInfo = Bool
type AttrLabel WebSettingsEnableHtml5LocalStoragePropertyInfo = "WebSettings::enable-html5-local-storage"
attrGet _ = getWebSettingsEnableHtml5LocalStorage
attrSet _ = setWebSettingsEnableHtml5LocalStorage
attrConstruct _ = constructWebSettingsEnableHtml5LocalStorage
getWebSettingsEnableHyperlinkAuditing :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableHyperlinkAuditing obj = liftIO $ getObjectPropertyBool obj "enable-hyperlink-auditing"
setWebSettingsEnableHyperlinkAuditing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableHyperlinkAuditing obj val = liftIO $ setObjectPropertyBool obj "enable-hyperlink-auditing" val
constructWebSettingsEnableHyperlinkAuditing :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableHyperlinkAuditing val = constructObjectPropertyBool "enable-hyperlink-auditing" val
data WebSettingsEnableHyperlinkAuditingPropertyInfo
instance AttrInfo WebSettingsEnableHyperlinkAuditingPropertyInfo where
type AttrAllowedOps WebSettingsEnableHyperlinkAuditingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableHyperlinkAuditingPropertyInfo = Bool
type AttrLabel WebSettingsEnableHyperlinkAuditingPropertyInfo = "WebSettings::enable-hyperlink-auditing"
attrGet _ = getWebSettingsEnableHyperlinkAuditing
attrSet _ = setWebSettingsEnableHyperlinkAuditing
attrConstruct _ = constructWebSettingsEnableHyperlinkAuditing
getWebSettingsEnableJavaApplet :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableJavaApplet obj = liftIO $ getObjectPropertyBool obj "enable-java-applet"
setWebSettingsEnableJavaApplet :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableJavaApplet obj val = liftIO $ setObjectPropertyBool obj "enable-java-applet" val
constructWebSettingsEnableJavaApplet :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableJavaApplet val = constructObjectPropertyBool "enable-java-applet" val
data WebSettingsEnableJavaAppletPropertyInfo
instance AttrInfo WebSettingsEnableJavaAppletPropertyInfo where
type AttrAllowedOps WebSettingsEnableJavaAppletPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableJavaAppletPropertyInfo = Bool
type AttrLabel WebSettingsEnableJavaAppletPropertyInfo = "WebSettings::enable-java-applet"
attrGet _ = getWebSettingsEnableJavaApplet
attrSet _ = setWebSettingsEnableJavaApplet
attrConstruct _ = constructWebSettingsEnableJavaApplet
getWebSettingsEnableMediaStream :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableMediaStream obj = liftIO $ getObjectPropertyBool obj "enable-media-stream"
setWebSettingsEnableMediaStream :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableMediaStream obj val = liftIO $ setObjectPropertyBool obj "enable-media-stream" val
constructWebSettingsEnableMediaStream :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableMediaStream val = constructObjectPropertyBool "enable-media-stream" val
data WebSettingsEnableMediaStreamPropertyInfo
instance AttrInfo WebSettingsEnableMediaStreamPropertyInfo where
type AttrAllowedOps WebSettingsEnableMediaStreamPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableMediaStreamPropertyInfo = Bool
type AttrLabel WebSettingsEnableMediaStreamPropertyInfo = "WebSettings::enable-media-stream"
attrGet _ = getWebSettingsEnableMediaStream
attrSet _ = setWebSettingsEnableMediaStream
attrConstruct _ = constructWebSettingsEnableMediaStream
getWebSettingsEnableMediasource :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableMediasource obj = liftIO $ getObjectPropertyBool obj "enable-mediasource"
setWebSettingsEnableMediasource :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableMediasource obj val = liftIO $ setObjectPropertyBool obj "enable-mediasource" val
constructWebSettingsEnableMediasource :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableMediasource val = constructObjectPropertyBool "enable-mediasource" val
data WebSettingsEnableMediasourcePropertyInfo
instance AttrInfo WebSettingsEnableMediasourcePropertyInfo where
type AttrAllowedOps WebSettingsEnableMediasourcePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableMediasourcePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableMediasourcePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableMediasourcePropertyInfo = Bool
type AttrLabel WebSettingsEnableMediasourcePropertyInfo = "WebSettings::enable-mediasource"
attrGet _ = getWebSettingsEnableMediasource
attrSet _ = setWebSettingsEnableMediasource
attrConstruct _ = constructWebSettingsEnableMediasource
getWebSettingsEnableOfflineWebApplicationCache :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableOfflineWebApplicationCache obj = liftIO $ getObjectPropertyBool obj "enable-offline-web-application-cache"
setWebSettingsEnableOfflineWebApplicationCache :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableOfflineWebApplicationCache obj val = liftIO $ setObjectPropertyBool obj "enable-offline-web-application-cache" val
constructWebSettingsEnableOfflineWebApplicationCache :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableOfflineWebApplicationCache val = constructObjectPropertyBool "enable-offline-web-application-cache" val
data WebSettingsEnableOfflineWebApplicationCachePropertyInfo
instance AttrInfo WebSettingsEnableOfflineWebApplicationCachePropertyInfo where
type AttrAllowedOps WebSettingsEnableOfflineWebApplicationCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableOfflineWebApplicationCachePropertyInfo = Bool
type AttrLabel WebSettingsEnableOfflineWebApplicationCachePropertyInfo = "WebSettings::enable-offline-web-application-cache"
attrGet _ = getWebSettingsEnableOfflineWebApplicationCache
attrSet _ = setWebSettingsEnableOfflineWebApplicationCache
attrConstruct _ = constructWebSettingsEnableOfflineWebApplicationCache
getWebSettingsEnablePageCache :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnablePageCache obj = liftIO $ getObjectPropertyBool obj "enable-page-cache"
setWebSettingsEnablePageCache :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnablePageCache obj val = liftIO $ setObjectPropertyBool obj "enable-page-cache" val
constructWebSettingsEnablePageCache :: Bool -> IO ([Char], GValue)
constructWebSettingsEnablePageCache val = constructObjectPropertyBool "enable-page-cache" val
data WebSettingsEnablePageCachePropertyInfo
instance AttrInfo WebSettingsEnablePageCachePropertyInfo where
type AttrAllowedOps WebSettingsEnablePageCachePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnablePageCachePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnablePageCachePropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnablePageCachePropertyInfo = Bool
type AttrLabel WebSettingsEnablePageCachePropertyInfo = "WebSettings::enable-page-cache"
attrGet _ = getWebSettingsEnablePageCache
attrSet _ = setWebSettingsEnablePageCache
attrConstruct _ = constructWebSettingsEnablePageCache
getWebSettingsEnablePlugins :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnablePlugins obj = liftIO $ getObjectPropertyBool obj "enable-plugins"
setWebSettingsEnablePlugins :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnablePlugins obj val = liftIO $ setObjectPropertyBool obj "enable-plugins" val
constructWebSettingsEnablePlugins :: Bool -> IO ([Char], GValue)
constructWebSettingsEnablePlugins val = constructObjectPropertyBool "enable-plugins" val
data WebSettingsEnablePluginsPropertyInfo
instance AttrInfo WebSettingsEnablePluginsPropertyInfo where
type AttrAllowedOps WebSettingsEnablePluginsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnablePluginsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnablePluginsPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnablePluginsPropertyInfo = Bool
type AttrLabel WebSettingsEnablePluginsPropertyInfo = "WebSettings::enable-plugins"
attrGet _ = getWebSettingsEnablePlugins
attrSet _ = setWebSettingsEnablePlugins
attrConstruct _ = constructWebSettingsEnablePlugins
getWebSettingsEnablePrivateBrowsing :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnablePrivateBrowsing obj = liftIO $ getObjectPropertyBool obj "enable-private-browsing"
setWebSettingsEnablePrivateBrowsing :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnablePrivateBrowsing obj val = liftIO $ setObjectPropertyBool obj "enable-private-browsing" val
constructWebSettingsEnablePrivateBrowsing :: Bool -> IO ([Char], GValue)
constructWebSettingsEnablePrivateBrowsing val = constructObjectPropertyBool "enable-private-browsing" val
data WebSettingsEnablePrivateBrowsingPropertyInfo
instance AttrInfo WebSettingsEnablePrivateBrowsingPropertyInfo where
type AttrAllowedOps WebSettingsEnablePrivateBrowsingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnablePrivateBrowsingPropertyInfo = Bool
type AttrLabel WebSettingsEnablePrivateBrowsingPropertyInfo = "WebSettings::enable-private-browsing"
attrGet _ = getWebSettingsEnablePrivateBrowsing
attrSet _ = setWebSettingsEnablePrivateBrowsing
attrConstruct _ = constructWebSettingsEnablePrivateBrowsing
getWebSettingsEnableRunningOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableRunningOfInsecureContent obj = liftIO $ getObjectPropertyBool obj "enable-running-of-insecure-content"
setWebSettingsEnableRunningOfInsecureContent :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableRunningOfInsecureContent obj val = liftIO $ setObjectPropertyBool obj "enable-running-of-insecure-content" val
constructWebSettingsEnableRunningOfInsecureContent :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableRunningOfInsecureContent val = constructObjectPropertyBool "enable-running-of-insecure-content" val
data WebSettingsEnableRunningOfInsecureContentPropertyInfo
instance AttrInfo WebSettingsEnableRunningOfInsecureContentPropertyInfo where
type AttrAllowedOps WebSettingsEnableRunningOfInsecureContentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableRunningOfInsecureContentPropertyInfo = Bool
type AttrLabel WebSettingsEnableRunningOfInsecureContentPropertyInfo = "WebSettings::enable-running-of-insecure-content"
attrGet _ = getWebSettingsEnableRunningOfInsecureContent
attrSet _ = setWebSettingsEnableRunningOfInsecureContent
attrConstruct _ = constructWebSettingsEnableRunningOfInsecureContent
getWebSettingsEnableScripts :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableScripts obj = liftIO $ getObjectPropertyBool obj "enable-scripts"
setWebSettingsEnableScripts :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableScripts obj val = liftIO $ setObjectPropertyBool obj "enable-scripts" val
constructWebSettingsEnableScripts :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableScripts val = constructObjectPropertyBool "enable-scripts" val
data WebSettingsEnableScriptsPropertyInfo
instance AttrInfo WebSettingsEnableScriptsPropertyInfo where
type AttrAllowedOps WebSettingsEnableScriptsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableScriptsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableScriptsPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableScriptsPropertyInfo = Bool
type AttrLabel WebSettingsEnableScriptsPropertyInfo = "WebSettings::enable-scripts"
attrGet _ = getWebSettingsEnableScripts
attrSet _ = setWebSettingsEnableScripts
attrConstruct _ = constructWebSettingsEnableScripts
getWebSettingsEnableSiteSpecificQuirks :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableSiteSpecificQuirks obj = liftIO $ getObjectPropertyBool obj "enable-site-specific-quirks"
setWebSettingsEnableSiteSpecificQuirks :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableSiteSpecificQuirks obj val = liftIO $ setObjectPropertyBool obj "enable-site-specific-quirks" val
constructWebSettingsEnableSiteSpecificQuirks :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableSiteSpecificQuirks val = constructObjectPropertyBool "enable-site-specific-quirks" val
data WebSettingsEnableSiteSpecificQuirksPropertyInfo
instance AttrInfo WebSettingsEnableSiteSpecificQuirksPropertyInfo where
type AttrAllowedOps WebSettingsEnableSiteSpecificQuirksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableSiteSpecificQuirksPropertyInfo = Bool
type AttrLabel WebSettingsEnableSiteSpecificQuirksPropertyInfo = "WebSettings::enable-site-specific-quirks"
attrGet _ = getWebSettingsEnableSiteSpecificQuirks
attrSet _ = setWebSettingsEnableSiteSpecificQuirks
attrConstruct _ = constructWebSettingsEnableSiteSpecificQuirks
getWebSettingsEnableSmoothScrolling :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableSmoothScrolling obj = liftIO $ getObjectPropertyBool obj "enable-smooth-scrolling"
setWebSettingsEnableSmoothScrolling :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableSmoothScrolling obj val = liftIO $ setObjectPropertyBool obj "enable-smooth-scrolling" val
constructWebSettingsEnableSmoothScrolling :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableSmoothScrolling val = constructObjectPropertyBool "enable-smooth-scrolling" val
data WebSettingsEnableSmoothScrollingPropertyInfo
instance AttrInfo WebSettingsEnableSmoothScrollingPropertyInfo where
type AttrAllowedOps WebSettingsEnableSmoothScrollingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableSmoothScrollingPropertyInfo = Bool
type AttrLabel WebSettingsEnableSmoothScrollingPropertyInfo = "WebSettings::enable-smooth-scrolling"
attrGet _ = getWebSettingsEnableSmoothScrolling
attrSet _ = setWebSettingsEnableSmoothScrolling
attrConstruct _ = constructWebSettingsEnableSmoothScrolling
getWebSettingsEnableSpatialNavigation :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableSpatialNavigation obj = liftIO $ getObjectPropertyBool obj "enable-spatial-navigation"
setWebSettingsEnableSpatialNavigation :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableSpatialNavigation obj val = liftIO $ setObjectPropertyBool obj "enable-spatial-navigation" val
constructWebSettingsEnableSpatialNavigation :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableSpatialNavigation val = constructObjectPropertyBool "enable-spatial-navigation" val
data WebSettingsEnableSpatialNavigationPropertyInfo
instance AttrInfo WebSettingsEnableSpatialNavigationPropertyInfo where
type AttrAllowedOps WebSettingsEnableSpatialNavigationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableSpatialNavigationPropertyInfo = Bool
type AttrLabel WebSettingsEnableSpatialNavigationPropertyInfo = "WebSettings::enable-spatial-navigation"
attrGet _ = getWebSettingsEnableSpatialNavigation
attrSet _ = setWebSettingsEnableSpatialNavigation
attrConstruct _ = constructWebSettingsEnableSpatialNavigation
getWebSettingsEnableSpellChecking :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableSpellChecking obj = liftIO $ getObjectPropertyBool obj "enable-spell-checking"
setWebSettingsEnableSpellChecking :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableSpellChecking obj val = liftIO $ setObjectPropertyBool obj "enable-spell-checking" val
constructWebSettingsEnableSpellChecking :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableSpellChecking val = constructObjectPropertyBool "enable-spell-checking" val
data WebSettingsEnableSpellCheckingPropertyInfo
instance AttrInfo WebSettingsEnableSpellCheckingPropertyInfo where
type AttrAllowedOps WebSettingsEnableSpellCheckingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableSpellCheckingPropertyInfo = Bool
type AttrLabel WebSettingsEnableSpellCheckingPropertyInfo = "WebSettings::enable-spell-checking"
attrGet _ = getWebSettingsEnableSpellChecking
attrSet _ = setWebSettingsEnableSpellChecking
attrConstruct _ = constructWebSettingsEnableSpellChecking
getWebSettingsEnableUniversalAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableUniversalAccessFromFileUris obj = liftIO $ getObjectPropertyBool obj "enable-universal-access-from-file-uris"
setWebSettingsEnableUniversalAccessFromFileUris :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableUniversalAccessFromFileUris obj val = liftIO $ setObjectPropertyBool obj "enable-universal-access-from-file-uris" val
constructWebSettingsEnableUniversalAccessFromFileUris :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableUniversalAccessFromFileUris val = constructObjectPropertyBool "enable-universal-access-from-file-uris" val
data WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo
instance AttrInfo WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo where
type AttrAllowedOps WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = Bool
type AttrLabel WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = "WebSettings::enable-universal-access-from-file-uris"
attrGet _ = getWebSettingsEnableUniversalAccessFromFileUris
attrSet _ = setWebSettingsEnableUniversalAccessFromFileUris
attrConstruct _ = constructWebSettingsEnableUniversalAccessFromFileUris
getWebSettingsEnableWebaudio :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableWebaudio obj = liftIO $ getObjectPropertyBool obj "enable-webaudio"
setWebSettingsEnableWebaudio :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableWebaudio obj val = liftIO $ setObjectPropertyBool obj "enable-webaudio" val
constructWebSettingsEnableWebaudio :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableWebaudio val = constructObjectPropertyBool "enable-webaudio" val
data WebSettingsEnableWebaudioPropertyInfo
instance AttrInfo WebSettingsEnableWebaudioPropertyInfo where
type AttrAllowedOps WebSettingsEnableWebaudioPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableWebaudioPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableWebaudioPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableWebaudioPropertyInfo = Bool
type AttrLabel WebSettingsEnableWebaudioPropertyInfo = "WebSettings::enable-webaudio"
attrGet _ = getWebSettingsEnableWebaudio
attrSet _ = setWebSettingsEnableWebaudio
attrConstruct _ = constructWebSettingsEnableWebaudio
getWebSettingsEnableWebgl :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableWebgl obj = liftIO $ getObjectPropertyBool obj "enable-webgl"
setWebSettingsEnableWebgl :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableWebgl obj val = liftIO $ setObjectPropertyBool obj "enable-webgl" val
constructWebSettingsEnableWebgl :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableWebgl val = constructObjectPropertyBool "enable-webgl" val
data WebSettingsEnableWebglPropertyInfo
instance AttrInfo WebSettingsEnableWebglPropertyInfo where
type AttrAllowedOps WebSettingsEnableWebglPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableWebglPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableWebglPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableWebglPropertyInfo = Bool
type AttrLabel WebSettingsEnableWebglPropertyInfo = "WebSettings::enable-webgl"
attrGet _ = getWebSettingsEnableWebgl
attrSet _ = setWebSettingsEnableWebgl
attrConstruct _ = constructWebSettingsEnableWebgl
getWebSettingsEnableXssAuditor :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnableXssAuditor obj = liftIO $ getObjectPropertyBool obj "enable-xss-auditor"
setWebSettingsEnableXssAuditor :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnableXssAuditor obj val = liftIO $ setObjectPropertyBool obj "enable-xss-auditor" val
constructWebSettingsEnableXssAuditor :: Bool -> IO ([Char], GValue)
constructWebSettingsEnableXssAuditor val = constructObjectPropertyBool "enable-xss-auditor" val
data WebSettingsEnableXssAuditorPropertyInfo
instance AttrInfo WebSettingsEnableXssAuditorPropertyInfo where
type AttrAllowedOps WebSettingsEnableXssAuditorPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnableXssAuditorPropertyInfo = Bool
type AttrLabel WebSettingsEnableXssAuditorPropertyInfo = "WebSettings::enable-xss-auditor"
attrGet _ = getWebSettingsEnableXssAuditor
attrSet _ = setWebSettingsEnableXssAuditor
attrConstruct _ = constructWebSettingsEnableXssAuditor
getWebSettingsEnforce96Dpi :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsEnforce96Dpi obj = liftIO $ getObjectPropertyBool obj "enforce-96-dpi"
setWebSettingsEnforce96Dpi :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsEnforce96Dpi obj val = liftIO $ setObjectPropertyBool obj "enforce-96-dpi" val
constructWebSettingsEnforce96Dpi :: Bool -> IO ([Char], GValue)
constructWebSettingsEnforce96Dpi val = constructObjectPropertyBool "enforce-96-dpi" val
data WebSettingsEnforce96DpiPropertyInfo
instance AttrInfo WebSettingsEnforce96DpiPropertyInfo where
type AttrAllowedOps WebSettingsEnforce96DpiPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsEnforce96DpiPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsEnforce96DpiPropertyInfo = WebSettingsK
type AttrGetType WebSettingsEnforce96DpiPropertyInfo = Bool
type AttrLabel WebSettingsEnforce96DpiPropertyInfo = "WebSettings::enforce-96-dpi"
attrGet _ = getWebSettingsEnforce96Dpi
attrSet _ = setWebSettingsEnforce96Dpi
attrConstruct _ = constructWebSettingsEnforce96Dpi
getWebSettingsFantasyFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsFantasyFontFamily obj = liftIO $ getObjectPropertyString obj "fantasy-font-family"
setWebSettingsFantasyFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsFantasyFontFamily obj val = liftIO $ setObjectPropertyString obj "fantasy-font-family" val
constructWebSettingsFantasyFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsFantasyFontFamily val = constructObjectPropertyString "fantasy-font-family" val
data WebSettingsFantasyFontFamilyPropertyInfo
instance AttrInfo WebSettingsFantasyFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsFantasyFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsFantasyFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsFantasyFontFamilyPropertyInfo = "WebSettings::fantasy-font-family"
attrGet _ = getWebSettingsFantasyFontFamily
attrSet _ = setWebSettingsFantasyFontFamily
attrConstruct _ = constructWebSettingsFantasyFontFamily
getWebSettingsHtml5LocalStorageDatabasePath :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsHtml5LocalStorageDatabasePath obj = liftIO $ getObjectPropertyString obj "html5-local-storage-database-path"
setWebSettingsHtml5LocalStorageDatabasePath :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsHtml5LocalStorageDatabasePath obj val = liftIO $ setObjectPropertyString obj "html5-local-storage-database-path" val
constructWebSettingsHtml5LocalStorageDatabasePath :: T.Text -> IO ([Char], GValue)
constructWebSettingsHtml5LocalStorageDatabasePath val = constructObjectPropertyString "html5-local-storage-database-path" val
data WebSettingsHtml5LocalStorageDatabasePathPropertyInfo
instance AttrInfo WebSettingsHtml5LocalStorageDatabasePathPropertyInfo where
type AttrAllowedOps WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = WebSettingsK
type AttrGetType WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = T.Text
type AttrLabel WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = "WebSettings::html5-local-storage-database-path"
attrGet _ = getWebSettingsHtml5LocalStorageDatabasePath
attrSet _ = setWebSettingsHtml5LocalStorageDatabasePath
attrConstruct _ = constructWebSettingsHtml5LocalStorageDatabasePath
getWebSettingsJavascriptCanAccessClipboard :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsJavascriptCanAccessClipboard obj = liftIO $ getObjectPropertyBool obj "javascript-can-access-clipboard"
setWebSettingsJavascriptCanAccessClipboard :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsJavascriptCanAccessClipboard obj val = liftIO $ setObjectPropertyBool obj "javascript-can-access-clipboard" val
constructWebSettingsJavascriptCanAccessClipboard :: Bool -> IO ([Char], GValue)
constructWebSettingsJavascriptCanAccessClipboard val = constructObjectPropertyBool "javascript-can-access-clipboard" val
data WebSettingsJavascriptCanAccessClipboardPropertyInfo
instance AttrInfo WebSettingsJavascriptCanAccessClipboardPropertyInfo where
type AttrAllowedOps WebSettingsJavascriptCanAccessClipboardPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = WebSettingsK
type AttrGetType WebSettingsJavascriptCanAccessClipboardPropertyInfo = Bool
type AttrLabel WebSettingsJavascriptCanAccessClipboardPropertyInfo = "WebSettings::javascript-can-access-clipboard"
attrGet _ = getWebSettingsJavascriptCanAccessClipboard
attrSet _ = setWebSettingsJavascriptCanAccessClipboard
attrConstruct _ = constructWebSettingsJavascriptCanAccessClipboard
getWebSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsJavascriptCanOpenWindowsAutomatically obj = liftIO $ getObjectPropertyBool obj "javascript-can-open-windows-automatically"
setWebSettingsJavascriptCanOpenWindowsAutomatically :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsJavascriptCanOpenWindowsAutomatically obj val = liftIO $ setObjectPropertyBool obj "javascript-can-open-windows-automatically" val
constructWebSettingsJavascriptCanOpenWindowsAutomatically :: Bool -> IO ([Char], GValue)
constructWebSettingsJavascriptCanOpenWindowsAutomatically val = constructObjectPropertyBool "javascript-can-open-windows-automatically" val
data WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo
instance AttrInfo WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo where
type AttrAllowedOps WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = Bool
type AttrLabel WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = "WebSettings::javascript-can-open-windows-automatically"
attrGet _ = getWebSettingsJavascriptCanOpenWindowsAutomatically
attrSet _ = setWebSettingsJavascriptCanOpenWindowsAutomatically
attrConstruct _ = constructWebSettingsJavascriptCanOpenWindowsAutomatically
getWebSettingsMediaPlaybackAllowsInline :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsMediaPlaybackAllowsInline obj = liftIO $ getObjectPropertyBool obj "media-playback-allows-inline"
setWebSettingsMediaPlaybackAllowsInline :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsMediaPlaybackAllowsInline obj val = liftIO $ setObjectPropertyBool obj "media-playback-allows-inline" val
constructWebSettingsMediaPlaybackAllowsInline :: Bool -> IO ([Char], GValue)
constructWebSettingsMediaPlaybackAllowsInline val = constructObjectPropertyBool "media-playback-allows-inline" val
data WebSettingsMediaPlaybackAllowsInlinePropertyInfo
instance AttrInfo WebSettingsMediaPlaybackAllowsInlinePropertyInfo where
type AttrAllowedOps WebSettingsMediaPlaybackAllowsInlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = WebSettingsK
type AttrGetType WebSettingsMediaPlaybackAllowsInlinePropertyInfo = Bool
type AttrLabel WebSettingsMediaPlaybackAllowsInlinePropertyInfo = "WebSettings::media-playback-allows-inline"
attrGet _ = getWebSettingsMediaPlaybackAllowsInline
attrSet _ = setWebSettingsMediaPlaybackAllowsInline
attrConstruct _ = constructWebSettingsMediaPlaybackAllowsInline
getWebSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsMediaPlaybackRequiresUserGesture obj = liftIO $ getObjectPropertyBool obj "media-playback-requires-user-gesture"
setWebSettingsMediaPlaybackRequiresUserGesture :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsMediaPlaybackRequiresUserGesture obj val = liftIO $ setObjectPropertyBool obj "media-playback-requires-user-gesture" val
constructWebSettingsMediaPlaybackRequiresUserGesture :: Bool -> IO ([Char], GValue)
constructWebSettingsMediaPlaybackRequiresUserGesture val = constructObjectPropertyBool "media-playback-requires-user-gesture" val
data WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo
instance AttrInfo WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo where
type AttrAllowedOps WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = WebSettingsK
type AttrGetType WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = Bool
type AttrLabel WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = "WebSettings::media-playback-requires-user-gesture"
attrGet _ = getWebSettingsMediaPlaybackRequiresUserGesture
attrSet _ = setWebSettingsMediaPlaybackRequiresUserGesture
attrConstruct _ = constructWebSettingsMediaPlaybackRequiresUserGesture
getWebSettingsMinimumFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32
getWebSettingsMinimumFontSize obj = liftIO $ getObjectPropertyCInt obj "minimum-font-size"
setWebSettingsMinimumFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()
setWebSettingsMinimumFontSize obj val = liftIO $ setObjectPropertyCInt obj "minimum-font-size" val
constructWebSettingsMinimumFontSize :: Int32 -> IO ([Char], GValue)
constructWebSettingsMinimumFontSize val = constructObjectPropertyCInt "minimum-font-size" val
data WebSettingsMinimumFontSizePropertyInfo
instance AttrInfo WebSettingsMinimumFontSizePropertyInfo where
type AttrAllowedOps WebSettingsMinimumFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsMinimumFontSizePropertyInfo = (~) Int32
type AttrBaseTypeConstraint WebSettingsMinimumFontSizePropertyInfo = WebSettingsK
type AttrGetType WebSettingsMinimumFontSizePropertyInfo = Int32
type AttrLabel WebSettingsMinimumFontSizePropertyInfo = "WebSettings::minimum-font-size"
attrGet _ = getWebSettingsMinimumFontSize
attrSet _ = setWebSettingsMinimumFontSize
attrConstruct _ = constructWebSettingsMinimumFontSize
getWebSettingsMinimumLogicalFontSize :: (MonadIO m, WebSettingsK o) => o -> m Int32
getWebSettingsMinimumLogicalFontSize obj = liftIO $ getObjectPropertyCInt obj "minimum-logical-font-size"
setWebSettingsMinimumLogicalFontSize :: (MonadIO m, WebSettingsK o) => o -> Int32 -> m ()
setWebSettingsMinimumLogicalFontSize obj val = liftIO $ setObjectPropertyCInt obj "minimum-logical-font-size" val
constructWebSettingsMinimumLogicalFontSize :: Int32 -> IO ([Char], GValue)
constructWebSettingsMinimumLogicalFontSize val = constructObjectPropertyCInt "minimum-logical-font-size" val
data WebSettingsMinimumLogicalFontSizePropertyInfo
instance AttrInfo WebSettingsMinimumLogicalFontSizePropertyInfo where
type AttrAllowedOps WebSettingsMinimumLogicalFontSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = (~) Int32
type AttrBaseTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = WebSettingsK
type AttrGetType WebSettingsMinimumLogicalFontSizePropertyInfo = Int32
type AttrLabel WebSettingsMinimumLogicalFontSizePropertyInfo = "WebSettings::minimum-logical-font-size"
attrGet _ = getWebSettingsMinimumLogicalFontSize
attrSet _ = setWebSettingsMinimumLogicalFontSize
attrConstruct _ = constructWebSettingsMinimumLogicalFontSize
getWebSettingsMonospaceFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsMonospaceFontFamily obj = liftIO $ getObjectPropertyString obj "monospace-font-family"
setWebSettingsMonospaceFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsMonospaceFontFamily obj val = liftIO $ setObjectPropertyString obj "monospace-font-family" val
constructWebSettingsMonospaceFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsMonospaceFontFamily val = constructObjectPropertyString "monospace-font-family" val
data WebSettingsMonospaceFontFamilyPropertyInfo
instance AttrInfo WebSettingsMonospaceFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsMonospaceFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsMonospaceFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsMonospaceFontFamilyPropertyInfo = "WebSettings::monospace-font-family"
attrGet _ = getWebSettingsMonospaceFontFamily
attrSet _ = setWebSettingsMonospaceFontFamily
attrConstruct _ = constructWebSettingsMonospaceFontFamily
getWebSettingsPrintBackgrounds :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsPrintBackgrounds obj = liftIO $ getObjectPropertyBool obj "print-backgrounds"
setWebSettingsPrintBackgrounds :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsPrintBackgrounds obj val = liftIO $ setObjectPropertyBool obj "print-backgrounds" val
constructWebSettingsPrintBackgrounds :: Bool -> IO ([Char], GValue)
constructWebSettingsPrintBackgrounds val = constructObjectPropertyBool "print-backgrounds" val
data WebSettingsPrintBackgroundsPropertyInfo
instance AttrInfo WebSettingsPrintBackgroundsPropertyInfo where
type AttrAllowedOps WebSettingsPrintBackgroundsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = WebSettingsK
type AttrGetType WebSettingsPrintBackgroundsPropertyInfo = Bool
type AttrLabel WebSettingsPrintBackgroundsPropertyInfo = "WebSettings::print-backgrounds"
attrGet _ = getWebSettingsPrintBackgrounds
attrSet _ = setWebSettingsPrintBackgrounds
attrConstruct _ = constructWebSettingsPrintBackgrounds
getWebSettingsResizableTextAreas :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsResizableTextAreas obj = liftIO $ getObjectPropertyBool obj "resizable-text-areas"
setWebSettingsResizableTextAreas :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsResizableTextAreas obj val = liftIO $ setObjectPropertyBool obj "resizable-text-areas" val
constructWebSettingsResizableTextAreas :: Bool -> IO ([Char], GValue)
constructWebSettingsResizableTextAreas val = constructObjectPropertyBool "resizable-text-areas" val
data WebSettingsResizableTextAreasPropertyInfo
instance AttrInfo WebSettingsResizableTextAreasPropertyInfo where
type AttrAllowedOps WebSettingsResizableTextAreasPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsResizableTextAreasPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsResizableTextAreasPropertyInfo = WebSettingsK
type AttrGetType WebSettingsResizableTextAreasPropertyInfo = Bool
type AttrLabel WebSettingsResizableTextAreasPropertyInfo = "WebSettings::resizable-text-areas"
attrGet _ = getWebSettingsResizableTextAreas
attrSet _ = setWebSettingsResizableTextAreas
attrConstruct _ = constructWebSettingsResizableTextAreas
getWebSettingsRespectImageOrientation :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsRespectImageOrientation obj = liftIO $ getObjectPropertyBool obj "respect-image-orientation"
setWebSettingsRespectImageOrientation :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsRespectImageOrientation obj val = liftIO $ setObjectPropertyBool obj "respect-image-orientation" val
constructWebSettingsRespectImageOrientation :: Bool -> IO ([Char], GValue)
constructWebSettingsRespectImageOrientation val = constructObjectPropertyBool "respect-image-orientation" val
data WebSettingsRespectImageOrientationPropertyInfo
instance AttrInfo WebSettingsRespectImageOrientationPropertyInfo where
type AttrAllowedOps WebSettingsRespectImageOrientationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = WebSettingsK
type AttrGetType WebSettingsRespectImageOrientationPropertyInfo = Bool
type AttrLabel WebSettingsRespectImageOrientationPropertyInfo = "WebSettings::respect-image-orientation"
attrGet _ = getWebSettingsRespectImageOrientation
attrSet _ = setWebSettingsRespectImageOrientation
attrConstruct _ = constructWebSettingsRespectImageOrientation
getWebSettingsSansSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsSansSerifFontFamily obj = liftIO $ getObjectPropertyString obj "sans-serif-font-family"
setWebSettingsSansSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsSansSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "sans-serif-font-family" val
constructWebSettingsSansSerifFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsSansSerifFontFamily val = constructObjectPropertyString "sans-serif-font-family" val
data WebSettingsSansSerifFontFamilyPropertyInfo
instance AttrInfo WebSettingsSansSerifFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsSansSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsSansSerifFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsSansSerifFontFamilyPropertyInfo = "WebSettings::sans-serif-font-family"
attrGet _ = getWebSettingsSansSerifFontFamily
attrSet _ = setWebSettingsSansSerifFontFamily
attrConstruct _ = constructWebSettingsSansSerifFontFamily
getWebSettingsSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsSerifFontFamily obj = liftIO $ getObjectPropertyString obj "serif-font-family"
setWebSettingsSerifFontFamily :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsSerifFontFamily obj val = liftIO $ setObjectPropertyString obj "serif-font-family" val
constructWebSettingsSerifFontFamily :: T.Text -> IO ([Char], GValue)
constructWebSettingsSerifFontFamily val = constructObjectPropertyString "serif-font-family" val
data WebSettingsSerifFontFamilyPropertyInfo
instance AttrInfo WebSettingsSerifFontFamilyPropertyInfo where
type AttrAllowedOps WebSettingsSerifFontFamilyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = WebSettingsK
type AttrGetType WebSettingsSerifFontFamilyPropertyInfo = T.Text
type AttrLabel WebSettingsSerifFontFamilyPropertyInfo = "WebSettings::serif-font-family"
attrGet _ = getWebSettingsSerifFontFamily
attrSet _ = setWebSettingsSerifFontFamily
attrConstruct _ = constructWebSettingsSerifFontFamily
getWebSettingsSpellCheckingLanguages :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsSpellCheckingLanguages obj = liftIO $ getObjectPropertyString obj "spell-checking-languages"
setWebSettingsSpellCheckingLanguages :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsSpellCheckingLanguages obj val = liftIO $ setObjectPropertyString obj "spell-checking-languages" val
constructWebSettingsSpellCheckingLanguages :: T.Text -> IO ([Char], GValue)
constructWebSettingsSpellCheckingLanguages val = constructObjectPropertyString "spell-checking-languages" val
data WebSettingsSpellCheckingLanguagesPropertyInfo
instance AttrInfo WebSettingsSpellCheckingLanguagesPropertyInfo where
type AttrAllowedOps WebSettingsSpellCheckingLanguagesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = WebSettingsK
type AttrGetType WebSettingsSpellCheckingLanguagesPropertyInfo = T.Text
type AttrLabel WebSettingsSpellCheckingLanguagesPropertyInfo = "WebSettings::spell-checking-languages"
attrGet _ = getWebSettingsSpellCheckingLanguages
attrSet _ = setWebSettingsSpellCheckingLanguages
attrConstruct _ = constructWebSettingsSpellCheckingLanguages
getWebSettingsTabKeyCyclesThroughElements :: (MonadIO m, WebSettingsK o) => o -> m Bool
getWebSettingsTabKeyCyclesThroughElements obj = liftIO $ getObjectPropertyBool obj "tab-key-cycles-through-elements"
setWebSettingsTabKeyCyclesThroughElements :: (MonadIO m, WebSettingsK o) => o -> Bool -> m ()
setWebSettingsTabKeyCyclesThroughElements obj val = liftIO $ setObjectPropertyBool obj "tab-key-cycles-through-elements" val
constructWebSettingsTabKeyCyclesThroughElements :: Bool -> IO ([Char], GValue)
constructWebSettingsTabKeyCyclesThroughElements val = constructObjectPropertyBool "tab-key-cycles-through-elements" val
data WebSettingsTabKeyCyclesThroughElementsPropertyInfo
instance AttrInfo WebSettingsTabKeyCyclesThroughElementsPropertyInfo where
type AttrAllowedOps WebSettingsTabKeyCyclesThroughElementsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = WebSettingsK
type AttrGetType WebSettingsTabKeyCyclesThroughElementsPropertyInfo = Bool
type AttrLabel WebSettingsTabKeyCyclesThroughElementsPropertyInfo = "WebSettings::tab-key-cycles-through-elements"
attrGet _ = getWebSettingsTabKeyCyclesThroughElements
attrSet _ = setWebSettingsTabKeyCyclesThroughElements
attrConstruct _ = constructWebSettingsTabKeyCyclesThroughElements
getWebSettingsUserAgent :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsUserAgent obj = liftIO $ getObjectPropertyString obj "user-agent"
setWebSettingsUserAgent :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsUserAgent obj val = liftIO $ setObjectPropertyString obj "user-agent" val
constructWebSettingsUserAgent :: T.Text -> IO ([Char], GValue)
constructWebSettingsUserAgent val = constructObjectPropertyString "user-agent" val
data WebSettingsUserAgentPropertyInfo
instance AttrInfo WebSettingsUserAgentPropertyInfo where
type AttrAllowedOps WebSettingsUserAgentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsUserAgentPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsUserAgentPropertyInfo = WebSettingsK
type AttrGetType WebSettingsUserAgentPropertyInfo = T.Text
type AttrLabel WebSettingsUserAgentPropertyInfo = "WebSettings::user-agent"
attrGet _ = getWebSettingsUserAgent
attrSet _ = setWebSettingsUserAgent
attrConstruct _ = constructWebSettingsUserAgent
getWebSettingsUserStylesheetUri :: (MonadIO m, WebSettingsK o) => o -> m T.Text
getWebSettingsUserStylesheetUri obj = liftIO $ getObjectPropertyString obj "user-stylesheet-uri"
setWebSettingsUserStylesheetUri :: (MonadIO m, WebSettingsK o) => o -> T.Text -> m ()
setWebSettingsUserStylesheetUri obj val = liftIO $ setObjectPropertyString obj "user-stylesheet-uri" val
constructWebSettingsUserStylesheetUri :: T.Text -> IO ([Char], GValue)
constructWebSettingsUserStylesheetUri val = constructObjectPropertyString "user-stylesheet-uri" val
data WebSettingsUserStylesheetUriPropertyInfo
instance AttrInfo WebSettingsUserStylesheetUriPropertyInfo where
type AttrAllowedOps WebSettingsUserStylesheetUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = WebSettingsK
type AttrGetType WebSettingsUserStylesheetUriPropertyInfo = T.Text
type AttrLabel WebSettingsUserStylesheetUriPropertyInfo = "WebSettings::user-stylesheet-uri"
attrGet _ = getWebSettingsUserStylesheetUri
attrSet _ = setWebSettingsUserStylesheetUri
attrConstruct _ = constructWebSettingsUserStylesheetUri
getWebSettingsZoomStep :: (MonadIO m, WebSettingsK o) => o -> m Float
getWebSettingsZoomStep obj = liftIO $ getObjectPropertyFloat obj "zoom-step"
setWebSettingsZoomStep :: (MonadIO m, WebSettingsK o) => o -> Float -> m ()
setWebSettingsZoomStep obj val = liftIO $ setObjectPropertyFloat obj "zoom-step" val
constructWebSettingsZoomStep :: Float -> IO ([Char], GValue)
constructWebSettingsZoomStep val = constructObjectPropertyFloat "zoom-step" val
data WebSettingsZoomStepPropertyInfo
instance AttrInfo WebSettingsZoomStepPropertyInfo where
type AttrAllowedOps WebSettingsZoomStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint WebSettingsZoomStepPropertyInfo = (~) Float
type AttrBaseTypeConstraint WebSettingsZoomStepPropertyInfo = WebSettingsK
type AttrGetType WebSettingsZoomStepPropertyInfo = Float
type AttrLabel WebSettingsZoomStepPropertyInfo = "WebSettings::zoom-step"
attrGet _ = getWebSettingsZoomStep
attrSet _ = setWebSettingsZoomStep
attrConstruct _ = constructWebSettingsZoomStep
type instance AttributeList WebSettings = WebSettingsAttributeList
type WebSettingsAttributeList = ('[ '("auto-load-images", WebSettingsAutoLoadImagesPropertyInfo), '("auto-resize-window", WebSettingsAutoResizeWindowPropertyInfo), '("auto-shrink-images", WebSettingsAutoShrinkImagesPropertyInfo), '("cursive-font-family", WebSettingsCursiveFontFamilyPropertyInfo), '("default-encoding", WebSettingsDefaultEncodingPropertyInfo), '("default-font-family", WebSettingsDefaultFontFamilyPropertyInfo), '("default-font-size", WebSettingsDefaultFontSizePropertyInfo), '("default-monospace-font-size", WebSettingsDefaultMonospaceFontSizePropertyInfo), '("editing-behavior", WebSettingsEditingBehaviorPropertyInfo), '("enable-accelerated-compositing", WebSettingsEnableAcceleratedCompositingPropertyInfo), '("enable-caret-browsing", WebSettingsEnableCaretBrowsingPropertyInfo), '("enable-default-context-menu", WebSettingsEnableDefaultContextMenuPropertyInfo), '("enable-developer-extras", WebSettingsEnableDeveloperExtrasPropertyInfo), '("enable-display-of-insecure-content", WebSettingsEnableDisplayOfInsecureContentPropertyInfo), '("enable-dns-prefetching", WebSettingsEnableDnsPrefetchingPropertyInfo), '("enable-dom-paste", WebSettingsEnableDomPastePropertyInfo), '("enable-file-access-from-file-uris", WebSettingsEnableFileAccessFromFileUrisPropertyInfo), '("enable-frame-flattening", WebSettingsEnableFrameFlatteningPropertyInfo), '("enable-fullscreen", WebSettingsEnableFullscreenPropertyInfo), '("enable-html5-database", WebSettingsEnableHtml5DatabasePropertyInfo), '("enable-html5-local-storage", WebSettingsEnableHtml5LocalStoragePropertyInfo), '("enable-hyperlink-auditing", WebSettingsEnableHyperlinkAuditingPropertyInfo), '("enable-java-applet", WebSettingsEnableJavaAppletPropertyInfo), '("enable-media-stream", WebSettingsEnableMediaStreamPropertyInfo), '("enable-mediasource", WebSettingsEnableMediasourcePropertyInfo), '("enable-offline-web-application-cache", WebSettingsEnableOfflineWebApplicationCachePropertyInfo), '("enable-page-cache", WebSettingsEnablePageCachePropertyInfo), '("enable-plugins", WebSettingsEnablePluginsPropertyInfo), '("enable-private-browsing", WebSettingsEnablePrivateBrowsingPropertyInfo), '("enable-running-of-insecure-content", WebSettingsEnableRunningOfInsecureContentPropertyInfo), '("enable-scripts", WebSettingsEnableScriptsPropertyInfo), '("enable-site-specific-quirks", WebSettingsEnableSiteSpecificQuirksPropertyInfo), '("enable-smooth-scrolling", WebSettingsEnableSmoothScrollingPropertyInfo), '("enable-spatial-navigation", WebSettingsEnableSpatialNavigationPropertyInfo), '("enable-spell-checking", WebSettingsEnableSpellCheckingPropertyInfo), '("enable-universal-access-from-file-uris", WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo), '("enable-webaudio", WebSettingsEnableWebaudioPropertyInfo), '("enable-webgl", WebSettingsEnableWebglPropertyInfo), '("enable-xss-auditor", WebSettingsEnableXssAuditorPropertyInfo), '("enforce-96-dpi", WebSettingsEnforce96DpiPropertyInfo), '("fantasy-font-family", WebSettingsFantasyFontFamilyPropertyInfo), '("html5-local-storage-database-path", WebSettingsHtml5LocalStorageDatabasePathPropertyInfo), '("javascript-can-access-clipboard", WebSettingsJavascriptCanAccessClipboardPropertyInfo), '("javascript-can-open-windows-automatically", WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo), '("media-playback-allows-inline", WebSettingsMediaPlaybackAllowsInlinePropertyInfo), '("media-playback-requires-user-gesture", WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo), '("minimum-font-size", WebSettingsMinimumFontSizePropertyInfo), '("minimum-logical-font-size", WebSettingsMinimumLogicalFontSizePropertyInfo), '("monospace-font-family", WebSettingsMonospaceFontFamilyPropertyInfo), '("print-backgrounds", WebSettingsPrintBackgroundsPropertyInfo), '("resizable-text-areas", WebSettingsResizableTextAreasPropertyInfo), '("respect-image-orientation", WebSettingsRespectImageOrientationPropertyInfo), '("sans-serif-font-family", WebSettingsSansSerifFontFamilyPropertyInfo), '("serif-font-family", WebSettingsSerifFontFamilyPropertyInfo), '("spell-checking-languages", WebSettingsSpellCheckingLanguagesPropertyInfo), '("tab-key-cycles-through-elements", WebSettingsTabKeyCyclesThroughElementsPropertyInfo), '("user-agent", WebSettingsUserAgentPropertyInfo), '("user-stylesheet-uri", WebSettingsUserStylesheetUriPropertyInfo), '("zoom-step", WebSettingsZoomStepPropertyInfo)] :: [(Symbol, *)])
type instance SignalList WebSettings = WebSettingsSignalList
type WebSettingsSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "webkit_web_settings_new" webkit_web_settings_new ::
IO (Ptr WebSettings)
webSettingsNew ::
(MonadIO m) =>
m WebSettings
webSettingsNew = liftIO $ do
result <- webkit_web_settings_new
checkUnexpectedReturnNULL "webkit_web_settings_new" result
result' <- (wrapObject WebSettings) result
return result'
foreign import ccall "webkit_web_settings_copy" webkit_web_settings_copy ::
Ptr WebSettings ->
IO (Ptr WebSettings)
webSettingsCopy ::
(MonadIO m, WebSettingsK a) =>
a ->
m WebSettings
webSettingsCopy _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_web_settings_copy _obj'
checkUnexpectedReturnNULL "webkit_web_settings_copy" result
result' <- (wrapObject WebSettings) result
touchManagedPtr _obj
return result'
foreign import ccall "webkit_web_settings_get_user_agent" webkit_web_settings_get_user_agent ::
Ptr WebSettings ->
IO CString
webSettingsGetUserAgent ::
(MonadIO m, WebSettingsK a) =>
a ->
m T.Text
webSettingsGetUserAgent _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
result <- webkit_web_settings_get_user_agent _obj'
checkUnexpectedReturnNULL "webkit_web_settings_get_user_agent" result
result' <- cstringToText result
touchManagedPtr _obj
return result'