{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.AboutDialog
(
AboutDialog(..) ,
IsAboutDialog ,
toAboutDialog ,
#if defined(ENABLE_OVERLOADING)
ResolveAboutDialogMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
AboutDialogAddCreditSectionMethodInfo ,
#endif
aboutDialogAddCreditSection ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetArtistsMethodInfo ,
#endif
aboutDialogGetArtists ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetAuthorsMethodInfo ,
#endif
aboutDialogGetAuthors ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetCommentsMethodInfo ,
#endif
aboutDialogGetComments ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetCopyrightMethodInfo ,
#endif
aboutDialogGetCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetDocumentersMethodInfo ,
#endif
aboutDialogGetDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetLicenseMethodInfo ,
#endif
aboutDialogGetLicense ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetLicenseTypeMethodInfo ,
#endif
aboutDialogGetLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetLogoMethodInfo ,
#endif
aboutDialogGetLogo ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetLogoIconNameMethodInfo ,
#endif
aboutDialogGetLogoIconName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetProgramNameMethodInfo ,
#endif
aboutDialogGetProgramName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetTranslatorCreditsMethodInfo,
#endif
aboutDialogGetTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetVersionMethodInfo ,
#endif
aboutDialogGetVersion ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetWebsiteMethodInfo ,
#endif
aboutDialogGetWebsite ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetWebsiteLabelMethodInfo ,
#endif
aboutDialogGetWebsiteLabel ,
#if defined(ENABLE_OVERLOADING)
AboutDialogGetWrapLicenseMethodInfo ,
#endif
aboutDialogGetWrapLicense ,
aboutDialogNew ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetArtistsMethodInfo ,
#endif
aboutDialogSetArtists ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetAuthorsMethodInfo ,
#endif
aboutDialogSetAuthors ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetCommentsMethodInfo ,
#endif
aboutDialogSetComments ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetCopyrightMethodInfo ,
#endif
aboutDialogSetCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetDocumentersMethodInfo ,
#endif
aboutDialogSetDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetLicenseMethodInfo ,
#endif
aboutDialogSetLicense ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetLicenseTypeMethodInfo ,
#endif
aboutDialogSetLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetLogoMethodInfo ,
#endif
aboutDialogSetLogo ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetLogoIconNameMethodInfo ,
#endif
aboutDialogSetLogoIconName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetProgramNameMethodInfo ,
#endif
aboutDialogSetProgramName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetTranslatorCreditsMethodInfo,
#endif
aboutDialogSetTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetVersionMethodInfo ,
#endif
aboutDialogSetVersion ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetWebsiteMethodInfo ,
#endif
aboutDialogSetWebsite ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetWebsiteLabelMethodInfo ,
#endif
aboutDialogSetWebsiteLabel ,
#if defined(ENABLE_OVERLOADING)
AboutDialogSetWrapLicenseMethodInfo ,
#endif
aboutDialogSetWrapLicense ,
#if defined(ENABLE_OVERLOADING)
AboutDialogArtistsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogArtists ,
#endif
constructAboutDialogArtists ,
getAboutDialogArtists ,
setAboutDialogArtists ,
#if defined(ENABLE_OVERLOADING)
AboutDialogAuthorsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogAuthors ,
#endif
constructAboutDialogAuthors ,
getAboutDialogAuthors ,
setAboutDialogAuthors ,
#if defined(ENABLE_OVERLOADING)
AboutDialogCommentsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogComments ,
#endif
clearAboutDialogComments ,
constructAboutDialogComments ,
getAboutDialogComments ,
setAboutDialogComments ,
#if defined(ENABLE_OVERLOADING)
AboutDialogCopyrightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogCopyright ,
#endif
clearAboutDialogCopyright ,
constructAboutDialogCopyright ,
getAboutDialogCopyright ,
setAboutDialogCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutDialogDocumentersPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogDocumenters ,
#endif
constructAboutDialogDocumenters ,
getAboutDialogDocumenters ,
setAboutDialogDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutDialogLicensePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogLicense ,
#endif
clearAboutDialogLicense ,
constructAboutDialogLicense ,
getAboutDialogLicense ,
setAboutDialogLicense ,
#if defined(ENABLE_OVERLOADING)
AboutDialogLicenseTypePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogLicenseType ,
#endif
constructAboutDialogLicenseType ,
getAboutDialogLicenseType ,
setAboutDialogLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutDialogLogoPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogLogo ,
#endif
clearAboutDialogLogo ,
constructAboutDialogLogo ,
getAboutDialogLogo ,
setAboutDialogLogo ,
#if defined(ENABLE_OVERLOADING)
AboutDialogLogoIconNamePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogLogoIconName ,
#endif
clearAboutDialogLogoIconName ,
constructAboutDialogLogoIconName ,
getAboutDialogLogoIconName ,
setAboutDialogLogoIconName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogProgramNamePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogProgramName ,
#endif
constructAboutDialogProgramName ,
getAboutDialogProgramName ,
setAboutDialogProgramName ,
#if defined(ENABLE_OVERLOADING)
AboutDialogTranslatorCreditsPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogTranslatorCredits ,
#endif
clearAboutDialogTranslatorCredits ,
constructAboutDialogTranslatorCredits ,
getAboutDialogTranslatorCredits ,
setAboutDialogTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutDialogVersionPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogVersion ,
#endif
clearAboutDialogVersion ,
constructAboutDialogVersion ,
getAboutDialogVersion ,
setAboutDialogVersion ,
#if defined(ENABLE_OVERLOADING)
AboutDialogWebsitePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogWebsite ,
#endif
clearAboutDialogWebsite ,
constructAboutDialogWebsite ,
getAboutDialogWebsite ,
setAboutDialogWebsite ,
#if defined(ENABLE_OVERLOADING)
AboutDialogWebsiteLabelPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogWebsiteLabel ,
#endif
constructAboutDialogWebsiteLabel ,
getAboutDialogWebsiteLabel ,
setAboutDialogWebsiteLabel ,
#if defined(ENABLE_OVERLOADING)
AboutDialogWrapLicensePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogWrapLicense ,
#endif
constructAboutDialogWrapLicense ,
getAboutDialogWrapLicense ,
setAboutDialogWrapLicense ,
AboutDialogActivateLinkCallback ,
#if defined(ENABLE_OVERLOADING)
AboutDialogActivateLinkSignalInfo ,
#endif
afterAboutDialogActivateLink ,
onAboutDialogActivateLink ,
) 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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Bin as Gtk.Bin
import {-# SOURCE #-} qualified GI.Gtk.Objects.Container as Gtk.Container
import {-# SOURCE #-} qualified GI.Gtk.Objects.Dialog as Gtk.Dialog
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Objects.Window as Gtk.Window
newtype AboutDialog = AboutDialog (SP.ManagedPtr AboutDialog)
deriving (AboutDialog -> AboutDialog -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AboutDialog -> AboutDialog -> Bool
$c/= :: AboutDialog -> AboutDialog -> Bool
== :: AboutDialog -> AboutDialog -> Bool
$c== :: AboutDialog -> AboutDialog -> Bool
Eq)
instance SP.ManagedPtrNewtype AboutDialog where
toManagedPtr :: AboutDialog -> ManagedPtr AboutDialog
toManagedPtr (AboutDialog ManagedPtr AboutDialog
p) = ManagedPtr AboutDialog
p
foreign import ccall "gtk_about_dialog_get_type"
c_gtk_about_dialog_get_type :: IO B.Types.GType
instance B.Types.TypedObject AboutDialog where
glibType :: IO GType
glibType = IO GType
c_gtk_about_dialog_get_type
instance B.Types.GObject AboutDialog
class (SP.GObject o, O.IsDescendantOf AboutDialog o) => IsAboutDialog o
instance (SP.GObject o, O.IsDescendantOf AboutDialog o) => IsAboutDialog o
instance O.HasParentTypes AboutDialog
type instance O.ParentTypes AboutDialog = '[Gtk.Dialog.Dialog, Gtk.Window.Window, Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toAboutDialog :: (MIO.MonadIO m, IsAboutDialog o) => o -> m AboutDialog
toAboutDialog :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m AboutDialog
toAboutDialog = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr AboutDialog -> AboutDialog
AboutDialog
instance B.GValue.IsGValue (Maybe AboutDialog) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_about_dialog_get_type
gvalueSet_ :: Ptr GValue -> Maybe AboutDialog -> IO ()
gvalueSet_ Ptr GValue
gv Maybe AboutDialog
P.Nothing = forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (forall a. Ptr a
FP.nullPtr :: FP.Ptr AboutDialog)
gvalueSet_ Ptr GValue
gv (P.Just AboutDialog
obj) = forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr AboutDialog
obj (forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe AboutDialog)
gvalueGet_ Ptr GValue
gv = do
Ptr AboutDialog
ptr <- forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr AboutDialog)
if Ptr AboutDialog
ptr forall a. Eq a => a -> a -> Bool
/= forall a. Ptr a
FP.nullPtr
then forall a. a -> Maybe a
P.Just forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr AboutDialog -> AboutDialog
AboutDialog Ptr AboutDialog
ptr
else forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveAboutDialogMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveAboutDialogMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveAboutDialogMethod "activateDefault" o = Gtk.Window.WindowActivateDefaultMethodInfo
ResolveAboutDialogMethod "activateFocus" o = Gtk.Window.WindowActivateFocusMethodInfo
ResolveAboutDialogMethod "activateKey" o = Gtk.Window.WindowActivateKeyMethodInfo
ResolveAboutDialogMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveAboutDialogMethod "addAccelGroup" o = Gtk.Window.WindowAddAccelGroupMethodInfo
ResolveAboutDialogMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveAboutDialogMethod "addActionWidget" o = Gtk.Dialog.DialogAddActionWidgetMethodInfo
ResolveAboutDialogMethod "addButton" o = Gtk.Dialog.DialogAddButtonMethodInfo
ResolveAboutDialogMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveAboutDialogMethod "addCreditSection" o = AboutDialogAddCreditSectionMethodInfo
ResolveAboutDialogMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveAboutDialogMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveAboutDialogMethod "addMnemonic" o = Gtk.Window.WindowAddMnemonicMethodInfo
ResolveAboutDialogMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveAboutDialogMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveAboutDialogMethod "beginMoveDrag" o = Gtk.Window.WindowBeginMoveDragMethodInfo
ResolveAboutDialogMethod "beginResizeDrag" o = Gtk.Window.WindowBeginResizeDragMethodInfo
ResolveAboutDialogMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveAboutDialogMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveAboutDialogMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveAboutDialogMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveAboutDialogMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveAboutDialogMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveAboutDialogMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveAboutDialogMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveAboutDialogMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveAboutDialogMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveAboutDialogMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveAboutDialogMethod "close" o = Gtk.Window.WindowCloseMethodInfo
ResolveAboutDialogMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveAboutDialogMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveAboutDialogMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveAboutDialogMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveAboutDialogMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveAboutDialogMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveAboutDialogMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveAboutDialogMethod "deiconify" o = Gtk.Window.WindowDeiconifyMethodInfo
ResolveAboutDialogMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveAboutDialogMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveAboutDialogMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveAboutDialogMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveAboutDialogMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveAboutDialogMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveAboutDialogMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveAboutDialogMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveAboutDialogMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveAboutDialogMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveAboutDialogMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveAboutDialogMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveAboutDialogMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveAboutDialogMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveAboutDialogMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveAboutDialogMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveAboutDialogMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveAboutDialogMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveAboutDialogMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveAboutDialogMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveAboutDialogMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveAboutDialogMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveAboutDialogMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveAboutDialogMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveAboutDialogMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveAboutDialogMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveAboutDialogMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveAboutDialogMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveAboutDialogMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveAboutDialogMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveAboutDialogMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveAboutDialogMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveAboutDialogMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveAboutDialogMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveAboutDialogMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveAboutDialogMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveAboutDialogMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveAboutDialogMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveAboutDialogMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveAboutDialogMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveAboutDialogMethod "fullscreen" o = Gtk.Window.WindowFullscreenMethodInfo
ResolveAboutDialogMethod "fullscreenOnMonitor" o = Gtk.Window.WindowFullscreenOnMonitorMethodInfo
ResolveAboutDialogMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveAboutDialogMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveAboutDialogMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveAboutDialogMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveAboutDialogMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveAboutDialogMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveAboutDialogMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveAboutDialogMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveAboutDialogMethod "hasGroup" o = Gtk.Window.WindowHasGroupMethodInfo
ResolveAboutDialogMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveAboutDialogMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveAboutDialogMethod "hasToplevelFocus" o = Gtk.Window.WindowHasToplevelFocusMethodInfo
ResolveAboutDialogMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveAboutDialogMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveAboutDialogMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveAboutDialogMethod "iconify" o = Gtk.Window.WindowIconifyMethodInfo
ResolveAboutDialogMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveAboutDialogMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveAboutDialogMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveAboutDialogMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveAboutDialogMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveAboutDialogMethod "isActive" o = Gtk.Window.WindowIsActiveMethodInfo
ResolveAboutDialogMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveAboutDialogMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveAboutDialogMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveAboutDialogMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveAboutDialogMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveAboutDialogMethod "isMaximized" o = Gtk.Window.WindowIsMaximizedMethodInfo
ResolveAboutDialogMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveAboutDialogMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveAboutDialogMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveAboutDialogMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveAboutDialogMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveAboutDialogMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveAboutDialogMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveAboutDialogMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveAboutDialogMethod "maximize" o = Gtk.Window.WindowMaximizeMethodInfo
ResolveAboutDialogMethod "mnemonicActivate" o = Gtk.Window.WindowMnemonicActivateMethodInfo
ResolveAboutDialogMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveAboutDialogMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveAboutDialogMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveAboutDialogMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveAboutDialogMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveAboutDialogMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveAboutDialogMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveAboutDialogMethod "move" o = Gtk.Window.WindowMoveMethodInfo
ResolveAboutDialogMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveAboutDialogMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveAboutDialogMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveAboutDialogMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveAboutDialogMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveAboutDialogMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveAboutDialogMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveAboutDialogMethod "parseGeometry" o = Gtk.Window.WindowParseGeometryMethodInfo
ResolveAboutDialogMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveAboutDialogMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveAboutDialogMethod "present" o = Gtk.Window.WindowPresentMethodInfo
ResolveAboutDialogMethod "presentWithTime" o = Gtk.Window.WindowPresentWithTimeMethodInfo
ResolveAboutDialogMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveAboutDialogMethod "propagateKeyEvent" o = Gtk.Window.WindowPropagateKeyEventMethodInfo
ResolveAboutDialogMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveAboutDialogMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveAboutDialogMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveAboutDialogMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveAboutDialogMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveAboutDialogMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveAboutDialogMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveAboutDialogMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveAboutDialogMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveAboutDialogMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveAboutDialogMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveAboutDialogMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveAboutDialogMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveAboutDialogMethod "removeAccelGroup" o = Gtk.Window.WindowRemoveAccelGroupMethodInfo
ResolveAboutDialogMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveAboutDialogMethod "removeMnemonic" o = Gtk.Window.WindowRemoveMnemonicMethodInfo
ResolveAboutDialogMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveAboutDialogMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveAboutDialogMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveAboutDialogMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveAboutDialogMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveAboutDialogMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveAboutDialogMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveAboutDialogMethod "reshowWithInitialSize" o = Gtk.Window.WindowReshowWithInitialSizeMethodInfo
ResolveAboutDialogMethod "resize" o = Gtk.Window.WindowResizeMethodInfo
ResolveAboutDialogMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveAboutDialogMethod "resizeGripIsVisible" o = Gtk.Window.WindowResizeGripIsVisibleMethodInfo
ResolveAboutDialogMethod "resizeToGeometry" o = Gtk.Window.WindowResizeToGeometryMethodInfo
ResolveAboutDialogMethod "response" o = Gtk.Dialog.DialogResponseMethodInfo
ResolveAboutDialogMethod "run" o = Gtk.Dialog.DialogRunMethodInfo
ResolveAboutDialogMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveAboutDialogMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveAboutDialogMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveAboutDialogMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveAboutDialogMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveAboutDialogMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveAboutDialogMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveAboutDialogMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveAboutDialogMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveAboutDialogMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveAboutDialogMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveAboutDialogMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveAboutDialogMethod "stick" o = Gtk.Window.WindowStickMethodInfo
ResolveAboutDialogMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveAboutDialogMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveAboutDialogMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveAboutDialogMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveAboutDialogMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveAboutDialogMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveAboutDialogMethod "unfullscreen" o = Gtk.Window.WindowUnfullscreenMethodInfo
ResolveAboutDialogMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveAboutDialogMethod "unmaximize" o = Gtk.Window.WindowUnmaximizeMethodInfo
ResolveAboutDialogMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveAboutDialogMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveAboutDialogMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveAboutDialogMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveAboutDialogMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveAboutDialogMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveAboutDialogMethod "unstick" o = Gtk.Window.WindowUnstickMethodInfo
ResolveAboutDialogMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveAboutDialogMethod "getAcceptFocus" o = Gtk.Window.WindowGetAcceptFocusMethodInfo
ResolveAboutDialogMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveAboutDialogMethod "getActionArea" o = Gtk.Dialog.DialogGetActionAreaMethodInfo
ResolveAboutDialogMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveAboutDialogMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveAboutDialogMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveAboutDialogMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveAboutDialogMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveAboutDialogMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveAboutDialogMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveAboutDialogMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveAboutDialogMethod "getApplication" o = Gtk.Window.WindowGetApplicationMethodInfo
ResolveAboutDialogMethod "getArtists" o = AboutDialogGetArtistsMethodInfo
ResolveAboutDialogMethod "getAttachedTo" o = Gtk.Window.WindowGetAttachedToMethodInfo
ResolveAboutDialogMethod "getAuthors" o = AboutDialogGetAuthorsMethodInfo
ResolveAboutDialogMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveAboutDialogMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveAboutDialogMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveAboutDialogMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveAboutDialogMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveAboutDialogMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveAboutDialogMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveAboutDialogMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveAboutDialogMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveAboutDialogMethod "getComments" o = AboutDialogGetCommentsMethodInfo
ResolveAboutDialogMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveAboutDialogMethod "getContentArea" o = Gtk.Dialog.DialogGetContentAreaMethodInfo
ResolveAboutDialogMethod "getCopyright" o = AboutDialogGetCopyrightMethodInfo
ResolveAboutDialogMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveAboutDialogMethod "getDecorated" o = Gtk.Window.WindowGetDecoratedMethodInfo
ResolveAboutDialogMethod "getDefaultSize" o = Gtk.Window.WindowGetDefaultSizeMethodInfo
ResolveAboutDialogMethod "getDefaultWidget" o = Gtk.Window.WindowGetDefaultWidgetMethodInfo
ResolveAboutDialogMethod "getDeletable" o = Gtk.Window.WindowGetDeletableMethodInfo
ResolveAboutDialogMethod "getDestroyWithParent" o = Gtk.Window.WindowGetDestroyWithParentMethodInfo
ResolveAboutDialogMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveAboutDialogMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveAboutDialogMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveAboutDialogMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveAboutDialogMethod "getDocumenters" o = AboutDialogGetDocumentersMethodInfo
ResolveAboutDialogMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveAboutDialogMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveAboutDialogMethod "getFocus" o = Gtk.Window.WindowGetFocusMethodInfo
ResolveAboutDialogMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveAboutDialogMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveAboutDialogMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveAboutDialogMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveAboutDialogMethod "getFocusOnMap" o = Gtk.Window.WindowGetFocusOnMapMethodInfo
ResolveAboutDialogMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveAboutDialogMethod "getFocusVisible" o = Gtk.Window.WindowGetFocusVisibleMethodInfo
ResolveAboutDialogMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveAboutDialogMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveAboutDialogMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveAboutDialogMethod "getGravity" o = Gtk.Window.WindowGetGravityMethodInfo
ResolveAboutDialogMethod "getGroup" o = Gtk.Window.WindowGetGroupMethodInfo
ResolveAboutDialogMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveAboutDialogMethod "getHasResizeGrip" o = Gtk.Window.WindowGetHasResizeGripMethodInfo
ResolveAboutDialogMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveAboutDialogMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveAboutDialogMethod "getHeaderBar" o = Gtk.Dialog.DialogGetHeaderBarMethodInfo
ResolveAboutDialogMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveAboutDialogMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveAboutDialogMethod "getHideTitlebarWhenMaximized" o = Gtk.Window.WindowGetHideTitlebarWhenMaximizedMethodInfo
ResolveAboutDialogMethod "getIcon" o = Gtk.Window.WindowGetIconMethodInfo
ResolveAboutDialogMethod "getIconList" o = Gtk.Window.WindowGetIconListMethodInfo
ResolveAboutDialogMethod "getIconName" o = Gtk.Window.WindowGetIconNameMethodInfo
ResolveAboutDialogMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveAboutDialogMethod "getLicense" o = AboutDialogGetLicenseMethodInfo
ResolveAboutDialogMethod "getLicenseType" o = AboutDialogGetLicenseTypeMethodInfo
ResolveAboutDialogMethod "getLogo" o = AboutDialogGetLogoMethodInfo
ResolveAboutDialogMethod "getLogoIconName" o = AboutDialogGetLogoIconNameMethodInfo
ResolveAboutDialogMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveAboutDialogMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveAboutDialogMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveAboutDialogMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveAboutDialogMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveAboutDialogMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveAboutDialogMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveAboutDialogMethod "getMnemonicModifier" o = Gtk.Window.WindowGetMnemonicModifierMethodInfo
ResolveAboutDialogMethod "getMnemonicsVisible" o = Gtk.Window.WindowGetMnemonicsVisibleMethodInfo
ResolveAboutDialogMethod "getModal" o = Gtk.Window.WindowGetModalMethodInfo
ResolveAboutDialogMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveAboutDialogMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveAboutDialogMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveAboutDialogMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveAboutDialogMethod "getOpacity" o = Gtk.Window.WindowGetOpacityMethodInfo
ResolveAboutDialogMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveAboutDialogMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveAboutDialogMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveAboutDialogMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveAboutDialogMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveAboutDialogMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveAboutDialogMethod "getPosition" o = Gtk.Window.WindowGetPositionMethodInfo
ResolveAboutDialogMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveAboutDialogMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveAboutDialogMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveAboutDialogMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveAboutDialogMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveAboutDialogMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveAboutDialogMethod "getProgramName" o = AboutDialogGetProgramNameMethodInfo
ResolveAboutDialogMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveAboutDialogMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveAboutDialogMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveAboutDialogMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveAboutDialogMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveAboutDialogMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveAboutDialogMethod "getResizable" o = Gtk.Window.WindowGetResizableMethodInfo
ResolveAboutDialogMethod "getResizeGripArea" o = Gtk.Window.WindowGetResizeGripAreaMethodInfo
ResolveAboutDialogMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveAboutDialogMethod "getResponseForWidget" o = Gtk.Dialog.DialogGetResponseForWidgetMethodInfo
ResolveAboutDialogMethod "getRole" o = Gtk.Window.WindowGetRoleMethodInfo
ResolveAboutDialogMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveAboutDialogMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveAboutDialogMethod "getScreen" o = Gtk.Window.WindowGetScreenMethodInfo
ResolveAboutDialogMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveAboutDialogMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveAboutDialogMethod "getSize" o = Gtk.Window.WindowGetSizeMethodInfo
ResolveAboutDialogMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveAboutDialogMethod "getSkipPagerHint" o = Gtk.Window.WindowGetSkipPagerHintMethodInfo
ResolveAboutDialogMethod "getSkipTaskbarHint" o = Gtk.Window.WindowGetSkipTaskbarHintMethodInfo
ResolveAboutDialogMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveAboutDialogMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveAboutDialogMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveAboutDialogMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveAboutDialogMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveAboutDialogMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveAboutDialogMethod "getTitle" o = Gtk.Window.WindowGetTitleMethodInfo
ResolveAboutDialogMethod "getTitlebar" o = Gtk.Window.WindowGetTitlebarMethodInfo
ResolveAboutDialogMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveAboutDialogMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveAboutDialogMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveAboutDialogMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveAboutDialogMethod "getTransientFor" o = Gtk.Window.WindowGetTransientForMethodInfo
ResolveAboutDialogMethod "getTranslatorCredits" o = AboutDialogGetTranslatorCreditsMethodInfo
ResolveAboutDialogMethod "getTypeHint" o = Gtk.Window.WindowGetTypeHintMethodInfo
ResolveAboutDialogMethod "getUrgencyHint" o = Gtk.Window.WindowGetUrgencyHintMethodInfo
ResolveAboutDialogMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveAboutDialogMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveAboutDialogMethod "getVersion" o = AboutDialogGetVersionMethodInfo
ResolveAboutDialogMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveAboutDialogMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveAboutDialogMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveAboutDialogMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveAboutDialogMethod "getWebsite" o = AboutDialogGetWebsiteMethodInfo
ResolveAboutDialogMethod "getWebsiteLabel" o = AboutDialogGetWebsiteLabelMethodInfo
ResolveAboutDialogMethod "getWidgetForResponse" o = Gtk.Dialog.DialogGetWidgetForResponseMethodInfo
ResolveAboutDialogMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveAboutDialogMethod "getWindowType" o = Gtk.Window.WindowGetWindowTypeMethodInfo
ResolveAboutDialogMethod "getWrapLicense" o = AboutDialogGetWrapLicenseMethodInfo
ResolveAboutDialogMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveAboutDialogMethod "setAcceptFocus" o = Gtk.Window.WindowSetAcceptFocusMethodInfo
ResolveAboutDialogMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveAboutDialogMethod "setAlternativeButtonOrderFromArray" o = Gtk.Dialog.DialogSetAlternativeButtonOrderFromArrayMethodInfo
ResolveAboutDialogMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveAboutDialogMethod "setApplication" o = Gtk.Window.WindowSetApplicationMethodInfo
ResolveAboutDialogMethod "setArtists" o = AboutDialogSetArtistsMethodInfo
ResolveAboutDialogMethod "setAttachedTo" o = Gtk.Window.WindowSetAttachedToMethodInfo
ResolveAboutDialogMethod "setAuthors" o = AboutDialogSetAuthorsMethodInfo
ResolveAboutDialogMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveAboutDialogMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveAboutDialogMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveAboutDialogMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveAboutDialogMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveAboutDialogMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveAboutDialogMethod "setComments" o = AboutDialogSetCommentsMethodInfo
ResolveAboutDialogMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveAboutDialogMethod "setCopyright" o = AboutDialogSetCopyrightMethodInfo
ResolveAboutDialogMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveAboutDialogMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveAboutDialogMethod "setDecorated" o = Gtk.Window.WindowSetDecoratedMethodInfo
ResolveAboutDialogMethod "setDefault" o = Gtk.Window.WindowSetDefaultMethodInfo
ResolveAboutDialogMethod "setDefaultGeometry" o = Gtk.Window.WindowSetDefaultGeometryMethodInfo
ResolveAboutDialogMethod "setDefaultResponse" o = Gtk.Dialog.DialogSetDefaultResponseMethodInfo
ResolveAboutDialogMethod "setDefaultSize" o = Gtk.Window.WindowSetDefaultSizeMethodInfo
ResolveAboutDialogMethod "setDeletable" o = Gtk.Window.WindowSetDeletableMethodInfo
ResolveAboutDialogMethod "setDestroyWithParent" o = Gtk.Window.WindowSetDestroyWithParentMethodInfo
ResolveAboutDialogMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveAboutDialogMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveAboutDialogMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveAboutDialogMethod "setDocumenters" o = AboutDialogSetDocumentersMethodInfo
ResolveAboutDialogMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveAboutDialogMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveAboutDialogMethod "setFocus" o = Gtk.Window.WindowSetFocusMethodInfo
ResolveAboutDialogMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveAboutDialogMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveAboutDialogMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveAboutDialogMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveAboutDialogMethod "setFocusOnMap" o = Gtk.Window.WindowSetFocusOnMapMethodInfo
ResolveAboutDialogMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveAboutDialogMethod "setFocusVisible" o = Gtk.Window.WindowSetFocusVisibleMethodInfo
ResolveAboutDialogMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveAboutDialogMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveAboutDialogMethod "setGeometryHints" o = Gtk.Window.WindowSetGeometryHintsMethodInfo
ResolveAboutDialogMethod "setGravity" o = Gtk.Window.WindowSetGravityMethodInfo
ResolveAboutDialogMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveAboutDialogMethod "setHasResizeGrip" o = Gtk.Window.WindowSetHasResizeGripMethodInfo
ResolveAboutDialogMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveAboutDialogMethod "setHasUserRefCount" o = Gtk.Window.WindowSetHasUserRefCountMethodInfo
ResolveAboutDialogMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveAboutDialogMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveAboutDialogMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveAboutDialogMethod "setHideTitlebarWhenMaximized" o = Gtk.Window.WindowSetHideTitlebarWhenMaximizedMethodInfo
ResolveAboutDialogMethod "setIcon" o = Gtk.Window.WindowSetIconMethodInfo
ResolveAboutDialogMethod "setIconFromFile" o = Gtk.Window.WindowSetIconFromFileMethodInfo
ResolveAboutDialogMethod "setIconList" o = Gtk.Window.WindowSetIconListMethodInfo
ResolveAboutDialogMethod "setIconName" o = Gtk.Window.WindowSetIconNameMethodInfo
ResolveAboutDialogMethod "setKeepAbove" o = Gtk.Window.WindowSetKeepAboveMethodInfo
ResolveAboutDialogMethod "setKeepBelow" o = Gtk.Window.WindowSetKeepBelowMethodInfo
ResolveAboutDialogMethod "setLicense" o = AboutDialogSetLicenseMethodInfo
ResolveAboutDialogMethod "setLicenseType" o = AboutDialogSetLicenseTypeMethodInfo
ResolveAboutDialogMethod "setLogo" o = AboutDialogSetLogoMethodInfo
ResolveAboutDialogMethod "setLogoIconName" o = AboutDialogSetLogoIconNameMethodInfo
ResolveAboutDialogMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveAboutDialogMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveAboutDialogMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveAboutDialogMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveAboutDialogMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveAboutDialogMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveAboutDialogMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveAboutDialogMethod "setMnemonicModifier" o = Gtk.Window.WindowSetMnemonicModifierMethodInfo
ResolveAboutDialogMethod "setMnemonicsVisible" o = Gtk.Window.WindowSetMnemonicsVisibleMethodInfo
ResolveAboutDialogMethod "setModal" o = Gtk.Window.WindowSetModalMethodInfo
ResolveAboutDialogMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveAboutDialogMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveAboutDialogMethod "setOpacity" o = Gtk.Window.WindowSetOpacityMethodInfo
ResolveAboutDialogMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveAboutDialogMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveAboutDialogMethod "setPosition" o = Gtk.Window.WindowSetPositionMethodInfo
ResolveAboutDialogMethod "setProgramName" o = AboutDialogSetProgramNameMethodInfo
ResolveAboutDialogMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveAboutDialogMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveAboutDialogMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveAboutDialogMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveAboutDialogMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveAboutDialogMethod "setResizable" o = Gtk.Window.WindowSetResizableMethodInfo
ResolveAboutDialogMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveAboutDialogMethod "setResponseSensitive" o = Gtk.Dialog.DialogSetResponseSensitiveMethodInfo
ResolveAboutDialogMethod "setRole" o = Gtk.Window.WindowSetRoleMethodInfo
ResolveAboutDialogMethod "setScreen" o = Gtk.Window.WindowSetScreenMethodInfo
ResolveAboutDialogMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveAboutDialogMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveAboutDialogMethod "setSkipPagerHint" o = Gtk.Window.WindowSetSkipPagerHintMethodInfo
ResolveAboutDialogMethod "setSkipTaskbarHint" o = Gtk.Window.WindowSetSkipTaskbarHintMethodInfo
ResolveAboutDialogMethod "setStartupId" o = Gtk.Window.WindowSetStartupIdMethodInfo
ResolveAboutDialogMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveAboutDialogMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveAboutDialogMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveAboutDialogMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveAboutDialogMethod "setTitle" o = Gtk.Window.WindowSetTitleMethodInfo
ResolveAboutDialogMethod "setTitlebar" o = Gtk.Window.WindowSetTitlebarMethodInfo
ResolveAboutDialogMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveAboutDialogMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveAboutDialogMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveAboutDialogMethod "setTransientFor" o = Gtk.Window.WindowSetTransientForMethodInfo
ResolveAboutDialogMethod "setTranslatorCredits" o = AboutDialogSetTranslatorCreditsMethodInfo
ResolveAboutDialogMethod "setTypeHint" o = Gtk.Window.WindowSetTypeHintMethodInfo
ResolveAboutDialogMethod "setUrgencyHint" o = Gtk.Window.WindowSetUrgencyHintMethodInfo
ResolveAboutDialogMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveAboutDialogMethod "setVersion" o = AboutDialogSetVersionMethodInfo
ResolveAboutDialogMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveAboutDialogMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveAboutDialogMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveAboutDialogMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveAboutDialogMethod "setWebsite" o = AboutDialogSetWebsiteMethodInfo
ResolveAboutDialogMethod "setWebsiteLabel" o = AboutDialogSetWebsiteLabelMethodInfo
ResolveAboutDialogMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveAboutDialogMethod "setWmclass" o = Gtk.Window.WindowSetWmclassMethodInfo
ResolveAboutDialogMethod "setWrapLicense" o = AboutDialogSetWrapLicenseMethodInfo
ResolveAboutDialogMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethod info AboutDialog p) => OL.IsLabel t (AboutDialog -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethod info AboutDialog p, R.HasField t AboutDialog p) => R.HasField t AboutDialog p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethodInfo info AboutDialog) => OL.IsLabel t (O.MethodProxy info AboutDialog) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
type AboutDialogActivateLinkCallback =
T.Text
-> IO Bool
type C_AboutDialogActivateLinkCallback =
Ptr AboutDialog ->
CString ->
Ptr () ->
IO CInt
foreign import ccall "wrapper"
mk_AboutDialogActivateLinkCallback :: C_AboutDialogActivateLinkCallback -> IO (FunPtr C_AboutDialogActivateLinkCallback)
wrap_AboutDialogActivateLinkCallback ::
GObject a => (a -> AboutDialogActivateLinkCallback) ->
C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback :: forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
gi'cb Ptr AboutDialog
gi'selfPtr CString
uri Ptr ()
_ = do
Text
uri' <- HasCallStack => CString -> IO Text
cstringToText CString
uri
Bool
result <- forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient Ptr AboutDialog
gi'selfPtr forall a b. (a -> b) -> a -> b
$ \AboutDialog
gi'self -> a -> AboutDialogActivateLinkCallback
gi'cb (coerce :: forall a b. Coercible a b => a -> b
Coerce.coerce AboutDialog
gi'self) Text
uri'
let result' :: CInt
result' = (forall a b. (Integral a, Num b) => a -> b
P.fromIntegral forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Enum a => a -> Int
P.fromEnum) Bool
result
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
onAboutDialogActivateLink :: (IsAboutDialog a, MonadIO m) => a -> ((?self :: a) => AboutDialogActivateLinkCallback) -> m SignalHandlerId
onAboutDialogActivateLink :: forall a (m :: * -> *).
(IsAboutDialog a, MonadIO m) =>
a
-> ((?self::a) => AboutDialogActivateLinkCallback)
-> m SignalHandlerId
onAboutDialogActivateLink a
obj (?self::a) => AboutDialogActivateLinkCallback
cb = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> AboutDialogActivateLinkCallback
wrapped a
self = let ?self = a
self in (?self::a) => AboutDialogActivateLinkCallback
cb
let wrapped' :: C_AboutDialogActivateLinkCallback
wrapped' = forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
wrapped
FunPtr C_AboutDialogActivateLinkCallback
wrapped'' <- C_AboutDialogActivateLinkCallback
-> IO (FunPtr C_AboutDialogActivateLinkCallback)
mk_AboutDialogActivateLinkCallback C_AboutDialogActivateLinkCallback
wrapped'
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate-link" FunPtr C_AboutDialogActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectBefore forall a. Maybe a
Nothing
afterAboutDialogActivateLink :: (IsAboutDialog a, MonadIO m) => a -> ((?self :: a) => AboutDialogActivateLinkCallback) -> m SignalHandlerId
afterAboutDialogActivateLink :: forall a (m :: * -> *).
(IsAboutDialog a, MonadIO m) =>
a
-> ((?self::a) => AboutDialogActivateLinkCallback)
-> m SignalHandlerId
afterAboutDialogActivateLink a
obj (?self::a) => AboutDialogActivateLinkCallback
cb = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> AboutDialogActivateLinkCallback
wrapped a
self = let ?self = a
self in (?self::a) => AboutDialogActivateLinkCallback
cb
let wrapped' :: C_AboutDialogActivateLinkCallback
wrapped' = forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
wrapped
FunPtr C_AboutDialogActivateLinkCallback
wrapped'' <- C_AboutDialogActivateLinkCallback
-> IO (FunPtr C_AboutDialogActivateLinkCallback)
mk_AboutDialogActivateLinkCallback C_AboutDialogActivateLinkCallback
wrapped'
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate-link" FunPtr C_AboutDialogActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectAfter forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data AboutDialogActivateLinkSignalInfo
instance SignalInfo AboutDialogActivateLinkSignalInfo where
type HaskellCallbackType AboutDialogActivateLinkSignalInfo = AboutDialogActivateLinkCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_AboutDialogActivateLinkCallback cb
cb'' <- mk_AboutDialogActivateLinkCallback cb'
connectSignalFunPtr obj "activate-link" cb'' connectMode detail
dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog::activate-link"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:signal:activateLink"})
#endif
getAboutDialogArtists :: (MonadIO m, IsAboutDialog o) => o -> m [T.Text]
getAboutDialogArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m [Text]
getAboutDialogArtists o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogArtists" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"artists"
setAboutDialogArtists :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogArtists o
obj [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"artists" (forall a. a -> Maybe a
Just [Text]
val)
constructAboutDialogArtists :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogArtists :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogArtists [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"artists" (forall a. a -> Maybe a
P.Just [Text]
val)
#if defined(ENABLE_OVERLOADING)
data AboutDialogArtistsPropertyInfo
instance AttrInfo AboutDialogArtistsPropertyInfo where
type AttrAllowedOps AboutDialogArtistsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogArtistsPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogArtistsPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutDialogArtistsPropertyInfo = (~) [T.Text]
type AttrTransferType AboutDialogArtistsPropertyInfo = [T.Text]
type AttrGetType AboutDialogArtistsPropertyInfo = [T.Text]
type AttrLabel AboutDialogArtistsPropertyInfo = "artists"
type AttrOrigin AboutDialogArtistsPropertyInfo = AboutDialog
attrGet = getAboutDialogArtists
attrSet = setAboutDialogArtists
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogArtists
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.artists"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:artists"
})
#endif
getAboutDialogAuthors :: (MonadIO m, IsAboutDialog o) => o -> m [T.Text]
getAboutDialogAuthors :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m [Text]
getAboutDialogAuthors o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogAuthors" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"authors"
setAboutDialogAuthors :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogAuthors :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogAuthors o
obj [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"authors" (forall a. a -> Maybe a
Just [Text]
val)
constructAboutDialogAuthors :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogAuthors :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogAuthors [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"authors" (forall a. a -> Maybe a
P.Just [Text]
val)
#if defined(ENABLE_OVERLOADING)
data AboutDialogAuthorsPropertyInfo
instance AttrInfo AboutDialogAuthorsPropertyInfo where
type AttrAllowedOps AboutDialogAuthorsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogAuthorsPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogAuthorsPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutDialogAuthorsPropertyInfo = (~) [T.Text]
type AttrTransferType AboutDialogAuthorsPropertyInfo = [T.Text]
type AttrGetType AboutDialogAuthorsPropertyInfo = [T.Text]
type AttrLabel AboutDialogAuthorsPropertyInfo = "authors"
type AttrOrigin AboutDialogAuthorsPropertyInfo = AboutDialog
attrGet = getAboutDialogAuthors
attrSet = setAboutDialogAuthors
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogAuthors
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.authors"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:authors"
})
#endif
getAboutDialogComments :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogComments" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"comments"
setAboutDialogComments :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"comments" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogComments :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"comments" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogComments :: (MonadIO m, IsAboutDialog o) => o -> m ()
o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"comments" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogCommentsPropertyInfo
instance AttrInfo AboutDialogCommentsPropertyInfo where
type AttrAllowedOps AboutDialogCommentsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogCommentsPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogCommentsPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogCommentsPropertyInfo = (~) T.Text
type AttrTransferType AboutDialogCommentsPropertyInfo = T.Text
type AttrGetType AboutDialogCommentsPropertyInfo = T.Text
type AttrLabel AboutDialogCommentsPropertyInfo = "comments"
type AttrOrigin AboutDialogCommentsPropertyInfo = AboutDialog
attrGet = getAboutDialogComments
attrSet = setAboutDialogComments
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogComments
attrClear = clearAboutDialogComments
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.comments"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:comments"
})
#endif
getAboutDialogCopyright :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogCopyright :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogCopyright o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogCopyright" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"copyright"
setAboutDialogCopyright :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogCopyright :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogCopyright o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"copyright" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogCopyright :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogCopyright :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogCopyright Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"copyright" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogCopyright :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogCopyright :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogCopyright o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"copyright" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogCopyrightPropertyInfo
instance AttrInfo AboutDialogCopyrightPropertyInfo where
type AttrAllowedOps AboutDialogCopyrightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogCopyrightPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogCopyrightPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogCopyrightPropertyInfo = (~) T.Text
type AttrTransferType AboutDialogCopyrightPropertyInfo = T.Text
type AttrGetType AboutDialogCopyrightPropertyInfo = T.Text
type AttrLabel AboutDialogCopyrightPropertyInfo = "copyright"
type AttrOrigin AboutDialogCopyrightPropertyInfo = AboutDialog
attrGet = getAboutDialogCopyright
attrSet = setAboutDialogCopyright
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogCopyright
attrClear = clearAboutDialogCopyright
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.copyright"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:copyright"
})
#endif
getAboutDialogDocumenters :: (MonadIO m, IsAboutDialog o) => o -> m [T.Text]
getAboutDialogDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m [Text]
getAboutDialogDocumenters o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogDocumenters" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"documenters"
setAboutDialogDocumenters :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogDocumenters o
obj [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"documenters" (forall a. a -> Maybe a
Just [Text]
val)
constructAboutDialogDocumenters :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogDocumenters :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogDocumenters [Text]
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"documenters" (forall a. a -> Maybe a
P.Just [Text]
val)
#if defined(ENABLE_OVERLOADING)
data AboutDialogDocumentersPropertyInfo
instance AttrInfo AboutDialogDocumentersPropertyInfo where
type AttrAllowedOps AboutDialogDocumentersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogDocumentersPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogDocumentersPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutDialogDocumentersPropertyInfo = (~) [T.Text]
type AttrTransferType AboutDialogDocumentersPropertyInfo = [T.Text]
type AttrGetType AboutDialogDocumentersPropertyInfo = [T.Text]
type AttrLabel AboutDialogDocumentersPropertyInfo = "documenters"
type AttrOrigin AboutDialogDocumentersPropertyInfo = AboutDialog
attrGet = getAboutDialogDocumenters
attrSet = setAboutDialogDocumenters
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogDocumenters
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.documenters"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:documenters"
})
#endif
getAboutDialogLicense :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogLicense :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogLicense o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogLicense" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"license"
setAboutDialogLicense :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogLicense :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogLicense o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"license" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogLicense :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogLicense :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogLicense Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"license" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogLicense :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLicense :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLicense o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"license" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogLicensePropertyInfo
instance AttrInfo AboutDialogLicensePropertyInfo where
type AttrAllowedOps AboutDialogLicensePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogLicensePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogLicensePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogLicensePropertyInfo = (~) T.Text
type AttrTransferType AboutDialogLicensePropertyInfo = T.Text
type AttrGetType AboutDialogLicensePropertyInfo = T.Text
type AttrLabel AboutDialogLicensePropertyInfo = "license"
type AttrOrigin AboutDialogLicensePropertyInfo = AboutDialog
attrGet = getAboutDialogLicense
attrSet = setAboutDialogLicense
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogLicense
attrClear = clearAboutDialogLicense
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.license"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:license"
})
#endif
getAboutDialogLicenseType :: (MonadIO m, IsAboutDialog o) => o -> m Gtk.Enums.License
getAboutDialogLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m License
getAboutDialogLicenseType o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"license-type"
setAboutDialogLicenseType :: (MonadIO m, IsAboutDialog o) => o -> Gtk.Enums.License -> m ()
setAboutDialogLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> License -> m ()
setAboutDialogLicenseType o
obj License
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"license-type" License
val
constructAboutDialogLicenseType :: (IsAboutDialog o, MIO.MonadIO m) => Gtk.Enums.License -> m (GValueConstruct o)
constructAboutDialogLicenseType :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
License -> m (GValueConstruct o)
constructAboutDialogLicenseType License
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"license-type" License
val
#if defined(ENABLE_OVERLOADING)
data AboutDialogLicenseTypePropertyInfo
instance AttrInfo AboutDialogLicenseTypePropertyInfo where
type AttrAllowedOps AboutDialogLicenseTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogLicenseTypePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogLicenseTypePropertyInfo = (~) Gtk.Enums.License
type AttrTransferTypeConstraint AboutDialogLicenseTypePropertyInfo = (~) Gtk.Enums.License
type AttrTransferType AboutDialogLicenseTypePropertyInfo = Gtk.Enums.License
type AttrGetType AboutDialogLicenseTypePropertyInfo = Gtk.Enums.License
type AttrLabel AboutDialogLicenseTypePropertyInfo = "license-type"
type AttrOrigin AboutDialogLicenseTypePropertyInfo = AboutDialog
attrGet = getAboutDialogLicenseType
attrSet = setAboutDialogLicenseType
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogLicenseType
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.licenseType"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:licenseType"
})
#endif
getAboutDialogLogo :: (MonadIO m, IsAboutDialog o) => o -> m GdkPixbuf.Pixbuf.Pixbuf
getAboutDialogLogo :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m Pixbuf
getAboutDialogLogo o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogLogo" forall a b. (a -> b) -> a -> b
$ forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"logo" ManagedPtr Pixbuf -> Pixbuf
GdkPixbuf.Pixbuf.Pixbuf
setAboutDialogLogo :: (MonadIO m, IsAboutDialog o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setAboutDialogLogo :: forall (m :: * -> *) o a.
(MonadIO m, IsAboutDialog o, IsPixbuf a) =>
o -> a -> m ()
setAboutDialogLogo o
obj a
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"logo" (forall a. a -> Maybe a
Just a
val)
constructAboutDialogLogo :: (IsAboutDialog o, MIO.MonadIO m, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> m (GValueConstruct o)
constructAboutDialogLogo :: forall o (m :: * -> *) a.
(IsAboutDialog o, MonadIO m, IsPixbuf a) =>
a -> m (GValueConstruct o)
constructAboutDialogLogo a
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"logo" (forall a. a -> Maybe a
P.Just a
val)
clearAboutDialogLogo :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLogo :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLogo o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"logo" (forall a. Maybe a
Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if defined(ENABLE_OVERLOADING)
data AboutDialogLogoPropertyInfo
instance AttrInfo AboutDialogLogoPropertyInfo where
type AttrAllowedOps AboutDialogLogoPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogLogoPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogLogoPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrTransferTypeConstraint AboutDialogLogoPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrTransferType AboutDialogLogoPropertyInfo = GdkPixbuf.Pixbuf.Pixbuf
type AttrGetType AboutDialogLogoPropertyInfo = GdkPixbuf.Pixbuf.Pixbuf
type AttrLabel AboutDialogLogoPropertyInfo = "logo"
type AttrOrigin AboutDialogLogoPropertyInfo = AboutDialog
attrGet = getAboutDialogLogo
attrSet = setAboutDialogLogo
attrTransfer _ v = do
unsafeCastTo GdkPixbuf.Pixbuf.Pixbuf v
attrConstruct = constructAboutDialogLogo
attrClear = clearAboutDialogLogo
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.logo"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:logo"
})
#endif
getAboutDialogLogoIconName :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogLogoIconName :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogLogoIconName o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogLogoIconName" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"logo-icon-name"
setAboutDialogLogoIconName :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogLogoIconName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogLogoIconName o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"logo-icon-name" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogLogoIconName :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogLogoIconName :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogLogoIconName Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"logo-icon-name" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogLogoIconName :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLogoIconName :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogLogoIconName o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"logo-icon-name" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogLogoIconNamePropertyInfo
instance AttrInfo AboutDialogLogoIconNamePropertyInfo where
type AttrAllowedOps AboutDialogLogoIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogLogoIconNamePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogLogoIconNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogLogoIconNamePropertyInfo = (~) T.Text
type AttrTransferType AboutDialogLogoIconNamePropertyInfo = T.Text
type AttrGetType AboutDialogLogoIconNamePropertyInfo = T.Text
type AttrLabel AboutDialogLogoIconNamePropertyInfo = "logo-icon-name"
type AttrOrigin AboutDialogLogoIconNamePropertyInfo = AboutDialog
attrGet = getAboutDialogLogoIconName
attrSet = setAboutDialogLogoIconName
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogLogoIconName
attrClear = clearAboutDialogLogoIconName
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.logoIconName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:logoIconName"
})
#endif
getAboutDialogProgramName :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogProgramName :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogProgramName o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogProgramName" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"program-name"
setAboutDialogProgramName :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogProgramName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogProgramName o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"program-name" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogProgramName :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogProgramName :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogProgramName Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"program-name" (forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutDialogProgramNamePropertyInfo
instance AttrInfo AboutDialogProgramNamePropertyInfo where
type AttrAllowedOps AboutDialogProgramNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogProgramNamePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogProgramNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogProgramNamePropertyInfo = (~) T.Text
type AttrTransferType AboutDialogProgramNamePropertyInfo = T.Text
type AttrGetType AboutDialogProgramNamePropertyInfo = T.Text
type AttrLabel AboutDialogProgramNamePropertyInfo = "program-name"
type AttrOrigin AboutDialogProgramNamePropertyInfo = AboutDialog
attrGet = getAboutDialogProgramName
attrSet = setAboutDialogProgramName
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogProgramName
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.programName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:programName"
})
#endif
getAboutDialogTranslatorCredits :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogTranslatorCredits :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogTranslatorCredits o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogTranslatorCredits" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"translator-credits"
setAboutDialogTranslatorCredits :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogTranslatorCredits :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogTranslatorCredits o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"translator-credits" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogTranslatorCredits :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogTranslatorCredits :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogTranslatorCredits Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"translator-credits" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogTranslatorCredits :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogTranslatorCredits :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogTranslatorCredits o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"translator-credits" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogTranslatorCreditsPropertyInfo
instance AttrInfo AboutDialogTranslatorCreditsPropertyInfo where
type AttrAllowedOps AboutDialogTranslatorCreditsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = (~) T.Text
type AttrTransferType AboutDialogTranslatorCreditsPropertyInfo = T.Text
type AttrGetType AboutDialogTranslatorCreditsPropertyInfo = T.Text
type AttrLabel AboutDialogTranslatorCreditsPropertyInfo = "translator-credits"
type AttrOrigin AboutDialogTranslatorCreditsPropertyInfo = AboutDialog
attrGet = getAboutDialogTranslatorCredits
attrSet = setAboutDialogTranslatorCredits
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogTranslatorCredits
attrClear = clearAboutDialogTranslatorCredits
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.translatorCredits"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:translatorCredits"
})
#endif
getAboutDialogVersion :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogVersion o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogVersion" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"version"
setAboutDialogVersion :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogVersion :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogVersion o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"version" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogVersion :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogVersion :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogVersion Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"version" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogVersion :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogVersion o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"version" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogVersionPropertyInfo
instance AttrInfo AboutDialogVersionPropertyInfo where
type AttrAllowedOps AboutDialogVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogVersionPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogVersionPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogVersionPropertyInfo = (~) T.Text
type AttrTransferType AboutDialogVersionPropertyInfo = T.Text
type AttrGetType AboutDialogVersionPropertyInfo = T.Text
type AttrLabel AboutDialogVersionPropertyInfo = "version"
type AttrOrigin AboutDialogVersionPropertyInfo = AboutDialog
attrGet = getAboutDialogVersion
attrSet = setAboutDialogVersion
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogVersion
attrClear = clearAboutDialogVersion
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.version"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:version"
})
#endif
getAboutDialogWebsite :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogWebsite :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogWebsite o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogWebsite" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"website"
setAboutDialogWebsite :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogWebsite :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogWebsite o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"website" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogWebsite :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogWebsite :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogWebsite Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"website" (forall a. a -> Maybe a
P.Just Text
val)
clearAboutDialogWebsite :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogWebsite :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogWebsite o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"website" (forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data AboutDialogWebsitePropertyInfo
instance AttrInfo AboutDialogWebsitePropertyInfo where
type AttrAllowedOps AboutDialogWebsitePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutDialogWebsitePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogWebsitePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogWebsitePropertyInfo = (~) T.Text
type AttrTransferType AboutDialogWebsitePropertyInfo = T.Text
type AttrGetType AboutDialogWebsitePropertyInfo = T.Text
type AttrLabel AboutDialogWebsitePropertyInfo = "website"
type AttrOrigin AboutDialogWebsitePropertyInfo = AboutDialog
attrGet = getAboutDialogWebsite
attrSet = setAboutDialogWebsite
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogWebsite
attrClear = clearAboutDialogWebsite
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.website"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:website"
})
#endif
getAboutDialogWebsiteLabel :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogWebsiteLabel :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogWebsiteLabel o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutDialogWebsiteLabel" forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"website-label"
setAboutDialogWebsiteLabel :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogWebsiteLabel :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogWebsiteLabel o
obj Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"website-label" (forall a. a -> Maybe a
Just Text
val)
constructAboutDialogWebsiteLabel :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogWebsiteLabel :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogWebsiteLabel Text
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"website-label" (forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutDialogWebsiteLabelPropertyInfo
instance AttrInfo AboutDialogWebsiteLabelPropertyInfo where
type AttrAllowedOps AboutDialogWebsiteLabelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogWebsiteLabelPropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogWebsiteLabelPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutDialogWebsiteLabelPropertyInfo = (~) T.Text
type AttrTransferType AboutDialogWebsiteLabelPropertyInfo = T.Text
type AttrGetType AboutDialogWebsiteLabelPropertyInfo = T.Text
type AttrLabel AboutDialogWebsiteLabelPropertyInfo = "website-label"
type AttrOrigin AboutDialogWebsiteLabelPropertyInfo = AboutDialog
attrGet = getAboutDialogWebsiteLabel
attrSet = setAboutDialogWebsiteLabel
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogWebsiteLabel
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.websiteLabel"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:websiteLabel"
})
#endif
getAboutDialogWrapLicense :: (MonadIO m, IsAboutDialog o) => o -> m Bool
getAboutDialogWrapLicense :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Bool
getAboutDialogWrapLicense o
obj = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"wrap-license"
setAboutDialogWrapLicense :: (MonadIO m, IsAboutDialog o) => o -> Bool -> m ()
setAboutDialogWrapLicense :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Bool -> m ()
setAboutDialogWrapLicense o
obj Bool
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"wrap-license" Bool
val
constructAboutDialogWrapLicense :: (IsAboutDialog o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructAboutDialogWrapLicense :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructAboutDialogWrapLicense Bool
val = forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ do
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO forall a b. (a -> b) -> a -> b
$ forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"wrap-license" Bool
val
#if defined(ENABLE_OVERLOADING)
data AboutDialogWrapLicensePropertyInfo
instance AttrInfo AboutDialogWrapLicensePropertyInfo where
type AttrAllowedOps AboutDialogWrapLicensePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutDialogWrapLicensePropertyInfo = IsAboutDialog
type AttrSetTypeConstraint AboutDialogWrapLicensePropertyInfo = (~) Bool
type AttrTransferTypeConstraint AboutDialogWrapLicensePropertyInfo = (~) Bool
type AttrTransferType AboutDialogWrapLicensePropertyInfo = Bool
type AttrGetType AboutDialogWrapLicensePropertyInfo = Bool
type AttrLabel AboutDialogWrapLicensePropertyInfo = "wrap-license"
type AttrOrigin AboutDialogWrapLicensePropertyInfo = AboutDialog
attrGet = getAboutDialogWrapLicense
attrSet = setAboutDialogWrapLicense
attrTransfer _ v = do
return v
attrConstruct = constructAboutDialogWrapLicense
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.wrapLicense"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#g:attr:wrapLicense"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList AboutDialog
type instance O.AttributeList AboutDialog = AboutDialogAttributeList
type AboutDialogAttributeList = ('[ '("acceptFocus", Gtk.Window.WindowAcceptFocusPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("application", Gtk.Window.WindowApplicationPropertyInfo), '("artists", AboutDialogArtistsPropertyInfo), '("attachedTo", Gtk.Window.WindowAttachedToPropertyInfo), '("authors", AboutDialogAuthorsPropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("comments", AboutDialogCommentsPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("copyright", AboutDialogCopyrightPropertyInfo), '("decorated", Gtk.Window.WindowDecoratedPropertyInfo), '("defaultHeight", Gtk.Window.WindowDefaultHeightPropertyInfo), '("defaultWidth", Gtk.Window.WindowDefaultWidthPropertyInfo), '("deletable", Gtk.Window.WindowDeletablePropertyInfo), '("destroyWithParent", Gtk.Window.WindowDestroyWithParentPropertyInfo), '("documenters", AboutDialogDocumentersPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusOnMap", Gtk.Window.WindowFocusOnMapPropertyInfo), '("focusVisible", Gtk.Window.WindowFocusVisiblePropertyInfo), '("gravity", Gtk.Window.WindowGravityPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasResizeGrip", Gtk.Window.WindowHasResizeGripPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("hasToplevelFocus", Gtk.Window.WindowHasToplevelFocusPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("hideTitlebarWhenMaximized", Gtk.Window.WindowHideTitlebarWhenMaximizedPropertyInfo), '("icon", Gtk.Window.WindowIconPropertyInfo), '("iconName", Gtk.Window.WindowIconNamePropertyInfo), '("isActive", Gtk.Window.WindowIsActivePropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("isMaximized", Gtk.Window.WindowIsMaximizedPropertyInfo), '("license", AboutDialogLicensePropertyInfo), '("licenseType", AboutDialogLicenseTypePropertyInfo), '("logo", AboutDialogLogoPropertyInfo), '("logoIconName", AboutDialogLogoIconNamePropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("mnemonicsVisible", Gtk.Window.WindowMnemonicsVisiblePropertyInfo), '("modal", Gtk.Window.WindowModalPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("programName", AboutDialogProgramNamePropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizable", Gtk.Window.WindowResizablePropertyInfo), '("resizeGripVisible", Gtk.Window.WindowResizeGripVisiblePropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("role", Gtk.Window.WindowRolePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("screen", Gtk.Window.WindowScreenPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("skipPagerHint", Gtk.Window.WindowSkipPagerHintPropertyInfo), '("skipTaskbarHint", Gtk.Window.WindowSkipTaskbarHintPropertyInfo), '("startupId", Gtk.Window.WindowStartupIdPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("title", Gtk.Window.WindowTitlePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("transientFor", Gtk.Window.WindowTransientForPropertyInfo), '("translatorCredits", AboutDialogTranslatorCreditsPropertyInfo), '("type", Gtk.Window.WindowTypePropertyInfo), '("typeHint", Gtk.Window.WindowTypeHintPropertyInfo), '("urgencyHint", Gtk.Window.WindowUrgencyHintPropertyInfo), '("useHeaderBar", Gtk.Dialog.DialogUseHeaderBarPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("version", AboutDialogVersionPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("website", AboutDialogWebsitePropertyInfo), '("websiteLabel", AboutDialogWebsiteLabelPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("windowPosition", Gtk.Window.WindowWindowPositionPropertyInfo), '("wrapLicense", AboutDialogWrapLicensePropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
aboutDialogArtists :: AttrLabelProxy "artists"
aboutDialogArtists = AttrLabelProxy
aboutDialogAuthors :: AttrLabelProxy "authors"
aboutDialogAuthors = AttrLabelProxy
aboutDialogComments :: AttrLabelProxy "comments"
aboutDialogComments = AttrLabelProxy
aboutDialogCopyright :: AttrLabelProxy "copyright"
aboutDialogCopyright = AttrLabelProxy
aboutDialogDocumenters :: AttrLabelProxy "documenters"
aboutDialogDocumenters = AttrLabelProxy
aboutDialogLicense :: AttrLabelProxy "license"
aboutDialogLicense = AttrLabelProxy
aboutDialogLicenseType :: AttrLabelProxy "licenseType"
aboutDialogLicenseType = AttrLabelProxy
aboutDialogLogo :: AttrLabelProxy "logo"
aboutDialogLogo = AttrLabelProxy
aboutDialogLogoIconName :: AttrLabelProxy "logoIconName"
aboutDialogLogoIconName = AttrLabelProxy
aboutDialogProgramName :: AttrLabelProxy "programName"
aboutDialogProgramName = AttrLabelProxy
aboutDialogTranslatorCredits :: AttrLabelProxy "translatorCredits"
aboutDialogTranslatorCredits = AttrLabelProxy
aboutDialogVersion :: AttrLabelProxy "version"
aboutDialogVersion = AttrLabelProxy
aboutDialogWebsite :: AttrLabelProxy "website"
aboutDialogWebsite = AttrLabelProxy
aboutDialogWebsiteLabel :: AttrLabelProxy "websiteLabel"
aboutDialogWebsiteLabel = AttrLabelProxy
aboutDialogWrapLicense :: AttrLabelProxy "wrapLicense"
aboutDialogWrapLicense = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList AboutDialog = AboutDialogSignalList
type AboutDialogSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activateDefault", Gtk.Window.WindowActivateDefaultSignalInfo), '("activateFocus", Gtk.Window.WindowActivateFocusSignalInfo), '("activateLink", AboutDialogActivateLinkSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("close", Gtk.Dialog.DialogCloseSignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enableDebugging", Gtk.Window.WindowEnableDebuggingSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("keysChanged", Gtk.Window.WindowKeysChangedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("response", Gtk.Dialog.DialogResponseSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setFocus", Gtk.Window.WindowSetFocusSignalInfo), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, DK.Type)])
#endif
foreign import ccall "gtk_about_dialog_new" gtk_about_dialog_new ::
IO (Ptr AboutDialog)
aboutDialogNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m AboutDialog
aboutDialogNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m AboutDialog
aboutDialogNew = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
result <- IO (Ptr AboutDialog)
gtk_about_dialog_new
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogNew" Ptr AboutDialog
result
AboutDialog
result' <- (forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr AboutDialog -> AboutDialog
AboutDialog) Ptr AboutDialog
result
forall (m :: * -> *) a. Monad m => a -> m a
return AboutDialog
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_about_dialog_add_credit_section" gtk_about_dialog_add_credit_section ::
Ptr AboutDialog ->
CString ->
Ptr CString ->
IO ()
aboutDialogAddCreditSection ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> T.Text
-> [T.Text]
-> m ()
aboutDialogAddCreditSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> [Text] -> m ()
aboutDialogAddCreditSection a
about Text
sectionName [Text]
people = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
sectionName' <- Text -> IO CString
textToCString Text
sectionName
Ptr CString
people' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
people
Ptr AboutDialog -> CString -> Ptr CString -> IO ()
gtk_about_dialog_add_credit_section Ptr AboutDialog
about' CString
sectionName' Ptr CString
people'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
sectionName'
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogAddCreditSectionMethodInfo
instance (signature ~ (T.Text -> [T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogAddCreditSectionMethodInfo a signature where
overloadedMethod = aboutDialogAddCreditSection
instance O.OverloadedMethodInfo AboutDialogAddCreditSectionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogAddCreditSection",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogAddCreditSection"
})
#endif
foreign import ccall "gtk_about_dialog_get_artists" gtk_about_dialog_get_artists ::
Ptr AboutDialog ->
IO (Ptr CString)
aboutDialogGetArtists ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m [T.Text]
aboutDialogGetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m [Text]
aboutDialogGetArtists a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
gtk_about_dialog_get_artists Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetArtists" Ptr CString
result
[Text]
result' <- HasCallStack => Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetArtistsMethodInfo
instance (signature ~ (m [T.Text]), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetArtistsMethodInfo a signature where
overloadedMethod = aboutDialogGetArtists
instance O.OverloadedMethodInfo AboutDialogGetArtistsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetArtists",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetArtists"
})
#endif
foreign import ccall "gtk_about_dialog_get_authors" gtk_about_dialog_get_authors ::
Ptr AboutDialog ->
IO (Ptr CString)
aboutDialogGetAuthors ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m [T.Text]
aboutDialogGetAuthors :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m [Text]
aboutDialogGetAuthors a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
gtk_about_dialog_get_authors Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetAuthors" Ptr CString
result
[Text]
result' <- HasCallStack => Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetAuthorsMethodInfo
instance (signature ~ (m [T.Text]), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetAuthorsMethodInfo a signature where
overloadedMethod = aboutDialogGetAuthors
instance O.OverloadedMethodInfo AboutDialogGetAuthorsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetAuthors",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetAuthors"
})
#endif
foreign import ccall "gtk_about_dialog_get_comments" ::
Ptr AboutDialog ->
IO CString
aboutDialogGetComments ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_comments Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetComments" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetCommentsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetCommentsMethodInfo a signature where
overloadedMethod = aboutDialogGetComments
instance O.OverloadedMethodInfo AboutDialogGetCommentsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetComments",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetComments"
})
#endif
foreign import ccall "gtk_about_dialog_get_copyright" gtk_about_dialog_get_copyright ::
Ptr AboutDialog ->
IO CString
aboutDialogGetCopyright ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetCopyright a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_copyright Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetCopyright" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetCopyrightMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetCopyrightMethodInfo a signature where
overloadedMethod = aboutDialogGetCopyright
instance O.OverloadedMethodInfo AboutDialogGetCopyrightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetCopyright",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetCopyright"
})
#endif
foreign import ccall "gtk_about_dialog_get_documenters" gtk_about_dialog_get_documenters ::
Ptr AboutDialog ->
IO (Ptr CString)
aboutDialogGetDocumenters ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m [T.Text]
aboutDialogGetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m [Text]
aboutDialogGetDocumenters a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
gtk_about_dialog_get_documenters Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetDocumenters" Ptr CString
result
[Text]
result' <- HasCallStack => Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetDocumentersMethodInfo
instance (signature ~ (m [T.Text]), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDocumentersMethodInfo a signature where
overloadedMethod = aboutDialogGetDocumenters
instance O.OverloadedMethodInfo AboutDialogGetDocumentersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetDocumenters",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetDocumenters"
})
#endif
foreign import ccall "gtk_about_dialog_get_license" gtk_about_dialog_get_license ::
Ptr AboutDialog ->
IO CString
aboutDialogGetLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetLicense a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_license Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetLicense" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetLicenseMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLicenseMethodInfo a signature where
overloadedMethod = aboutDialogGetLicense
instance O.OverloadedMethodInfo AboutDialogGetLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetLicense"
})
#endif
foreign import ccall "gtk_about_dialog_get_license_type" gtk_about_dialog_get_license_type ::
Ptr AboutDialog ->
IO CUInt
aboutDialogGetLicenseType ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m Gtk.Enums.License
aboutDialogGetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m License
aboutDialogGetLicenseType a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CUInt
result <- Ptr AboutDialog -> IO CUInt
gtk_about_dialog_get_license_type Ptr AboutDialog
about'
let result' :: License
result' = (forall a. Enum a => Int -> a
toEnum forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return License
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetLicenseTypeMethodInfo
instance (signature ~ (m Gtk.Enums.License), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLicenseTypeMethodInfo a signature where
overloadedMethod = aboutDialogGetLicenseType
instance O.OverloadedMethodInfo AboutDialogGetLicenseTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetLicenseType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetLicenseType"
})
#endif
foreign import ccall "gtk_about_dialog_get_logo" gtk_about_dialog_get_logo ::
Ptr AboutDialog ->
IO (Ptr GdkPixbuf.Pixbuf.Pixbuf)
aboutDialogGetLogo ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m GdkPixbuf.Pixbuf.Pixbuf
aboutDialogGetLogo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Pixbuf
aboutDialogGetLogo a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr Pixbuf
result <- Ptr AboutDialog -> IO (Ptr Pixbuf)
gtk_about_dialog_get_logo Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetLogo" Ptr Pixbuf
result
Pixbuf
result' <- (forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Pixbuf -> Pixbuf
GdkPixbuf.Pixbuf.Pixbuf) Ptr Pixbuf
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Pixbuf
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetLogoMethodInfo
instance (signature ~ (m GdkPixbuf.Pixbuf.Pixbuf), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLogoMethodInfo a signature where
overloadedMethod = aboutDialogGetLogo
instance O.OverloadedMethodInfo AboutDialogGetLogoMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetLogo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetLogo"
})
#endif
foreign import ccall "gtk_about_dialog_get_logo_icon_name" gtk_about_dialog_get_logo_icon_name ::
Ptr AboutDialog ->
IO CString
aboutDialogGetLogoIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetLogoIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetLogoIconName a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_logo_icon_name Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetLogoIconName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetLogoIconNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLogoIconNameMethodInfo a signature where
overloadedMethod = aboutDialogGetLogoIconName
instance O.OverloadedMethodInfo AboutDialogGetLogoIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetLogoIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetLogoIconName"
})
#endif
foreign import ccall "gtk_about_dialog_get_program_name" gtk_about_dialog_get_program_name ::
Ptr AboutDialog ->
IO CString
aboutDialogGetProgramName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetProgramName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetProgramName a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_program_name Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetProgramName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetProgramNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetProgramNameMethodInfo a signature where
overloadedMethod = aboutDialogGetProgramName
instance O.OverloadedMethodInfo AboutDialogGetProgramNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetProgramName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetProgramName"
})
#endif
foreign import ccall "gtk_about_dialog_get_translator_credits" gtk_about_dialog_get_translator_credits ::
Ptr AboutDialog ->
IO CString
aboutDialogGetTranslatorCredits ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetTranslatorCredits a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_translator_credits Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetTranslatorCredits" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetTranslatorCreditsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetTranslatorCreditsMethodInfo a signature where
overloadedMethod = aboutDialogGetTranslatorCredits
instance O.OverloadedMethodInfo AboutDialogGetTranslatorCreditsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetTranslatorCredits",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetTranslatorCredits"
})
#endif
foreign import ccall "gtk_about_dialog_get_version" gtk_about_dialog_get_version ::
Ptr AboutDialog ->
IO CString
aboutDialogGetVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetVersion a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_version Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetVersion" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetVersionMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetVersionMethodInfo a signature where
overloadedMethod = aboutDialogGetVersion
instance O.OverloadedMethodInfo AboutDialogGetVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetVersion"
})
#endif
foreign import ccall "gtk_about_dialog_get_website" gtk_about_dialog_get_website ::
Ptr AboutDialog ->
IO CString
aboutDialogGetWebsite ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetWebsite a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_website Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetWebsite" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetWebsiteMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetWebsiteMethodInfo a signature where
overloadedMethod = aboutDialogGetWebsite
instance O.OverloadedMethodInfo AboutDialogGetWebsiteMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetWebsite",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetWebsite"
})
#endif
foreign import ccall "gtk_about_dialog_get_website_label" gtk_about_dialog_get_website_label ::
Ptr AboutDialog ->
IO CString
aboutDialogGetWebsiteLabel ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m T.Text
aboutDialogGetWebsiteLabel :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetWebsiteLabel a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
result <- Ptr AboutDialog -> IO CString
gtk_about_dialog_get_website_label Ptr AboutDialog
about'
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetWebsiteLabel" CString
result
Text
result' <- HasCallStack => CString -> IO Text
cstringToText CString
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetWebsiteLabelMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetWebsiteLabelMethodInfo a signature where
overloadedMethod = aboutDialogGetWebsiteLabel
instance O.OverloadedMethodInfo AboutDialogGetWebsiteLabelMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetWebsiteLabel",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetWebsiteLabel"
})
#endif
foreign import ccall "gtk_about_dialog_get_wrap_license" gtk_about_dialog_get_wrap_license ::
Ptr AboutDialog ->
IO CInt
aboutDialogGetWrapLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> m Bool
aboutDialogGetWrapLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Bool
aboutDialogGetWrapLicense a
about = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CInt
result <- Ptr AboutDialog -> IO CInt
gtk_about_dialog_get_wrap_license Ptr AboutDialog
about'
let result' :: Bool
result' = (forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data AboutDialogGetWrapLicenseMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetWrapLicenseMethodInfo a signature where
overloadedMethod = aboutDialogGetWrapLicense
instance O.OverloadedMethodInfo AboutDialogGetWrapLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogGetWrapLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogGetWrapLicense"
})
#endif
foreign import ccall "gtk_about_dialog_set_artists" gtk_about_dialog_set_artists ::
Ptr AboutDialog ->
Ptr CString ->
IO ()
aboutDialogSetArtists ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> [T.Text]
-> m ()
aboutDialogSetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> [Text] -> m ()
aboutDialogSetArtists a
about [Text]
artists = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
artists' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
artists
Ptr AboutDialog -> Ptr CString -> IO ()
gtk_about_dialog_set_artists Ptr AboutDialog
about' Ptr CString
artists'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray forall a. Ptr a -> IO ()
freeMem Ptr CString
artists'
forall a. Ptr a -> IO ()
freeMem Ptr CString
artists'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetArtistsMethodInfo
instance (signature ~ ([T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetArtistsMethodInfo a signature where
overloadedMethod = aboutDialogSetArtists
instance O.OverloadedMethodInfo AboutDialogSetArtistsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetArtists",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetArtists"
})
#endif
foreign import ccall "gtk_about_dialog_set_authors" gtk_about_dialog_set_authors ::
Ptr AboutDialog ->
Ptr CString ->
IO ()
aboutDialogSetAuthors ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> [T.Text]
-> m ()
aboutDialogSetAuthors :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> [Text] -> m ()
aboutDialogSetAuthors a
about [Text]
authors = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
authors' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
authors
Ptr AboutDialog -> Ptr CString -> IO ()
gtk_about_dialog_set_authors Ptr AboutDialog
about' Ptr CString
authors'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray forall a. Ptr a -> IO ()
freeMem Ptr CString
authors'
forall a. Ptr a -> IO ()
freeMem Ptr CString
authors'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetAuthorsMethodInfo
instance (signature ~ ([T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetAuthorsMethodInfo a signature where
overloadedMethod = aboutDialogSetAuthors
instance O.OverloadedMethodInfo AboutDialogSetAuthorsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetAuthors",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetAuthors"
})
#endif
foreign import ccall "gtk_about_dialog_set_comments" ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetComments ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
a
about Maybe Text
comments = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeComments <- case Maybe Text
comments of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jComments -> do
CString
jComments' <- Text -> IO CString
textToCString Text
jComments
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jComments'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_comments Ptr AboutDialog
about' CString
maybeComments
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeComments
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetCommentsMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetCommentsMethodInfo a signature where
overloadedMethod = aboutDialogSetComments
instance O.OverloadedMethodInfo AboutDialogSetCommentsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetComments",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetComments"
})
#endif
foreign import ccall "gtk_about_dialog_set_copyright" gtk_about_dialog_set_copyright ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetCopyright ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetCopyright a
about Maybe Text
copyright = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeCopyright <- case Maybe Text
copyright of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jCopyright -> do
CString
jCopyright' <- Text -> IO CString
textToCString Text
jCopyright
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jCopyright'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_copyright Ptr AboutDialog
about' CString
maybeCopyright
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeCopyright
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetCopyrightMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetCopyrightMethodInfo a signature where
overloadedMethod = aboutDialogSetCopyright
instance O.OverloadedMethodInfo AboutDialogSetCopyrightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetCopyright",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetCopyright"
})
#endif
foreign import ccall "gtk_about_dialog_set_documenters" gtk_about_dialog_set_documenters ::
Ptr AboutDialog ->
Ptr CString ->
IO ()
aboutDialogSetDocumenters ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> [T.Text]
-> m ()
aboutDialogSetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> [Text] -> m ()
aboutDialogSetDocumenters a
about [Text]
documenters = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr CString
documenters' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
documenters
Ptr AboutDialog -> Ptr CString -> IO ()
gtk_about_dialog_set_documenters Ptr AboutDialog
about' Ptr CString
documenters'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray forall a. Ptr a -> IO ()
freeMem Ptr CString
documenters'
forall a. Ptr a -> IO ()
freeMem Ptr CString
documenters'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetDocumentersMethodInfo
instance (signature ~ ([T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDocumentersMethodInfo a signature where
overloadedMethod = aboutDialogSetDocumenters
instance O.OverloadedMethodInfo AboutDialogSetDocumentersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetDocumenters",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetDocumenters"
})
#endif
foreign import ccall "gtk_about_dialog_set_license" gtk_about_dialog_set_license ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetLicense a
about Maybe Text
license = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeLicense <- case Maybe Text
license of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jLicense -> do
CString
jLicense' <- Text -> IO CString
textToCString Text
jLicense
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jLicense'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_license Ptr AboutDialog
about' CString
maybeLicense
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeLicense
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetLicenseMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetLicenseMethodInfo a signature where
overloadedMethod = aboutDialogSetLicense
instance O.OverloadedMethodInfo AboutDialogSetLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetLicense"
})
#endif
foreign import ccall "gtk_about_dialog_set_license_type" gtk_about_dialog_set_license_type ::
Ptr AboutDialog ->
CUInt ->
IO ()
aboutDialogSetLicenseType ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Gtk.Enums.License
-> m ()
aboutDialogSetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> License -> m ()
aboutDialogSetLicenseType a
about License
licenseType = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
let licenseType' :: CUInt
licenseType' = (forall a b. (Integral a, Num b) => a -> b
fromIntegral forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Enum a => a -> Int
fromEnum) License
licenseType
Ptr AboutDialog -> CUInt -> IO ()
gtk_about_dialog_set_license_type Ptr AboutDialog
about' CUInt
licenseType'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetLicenseTypeMethodInfo
instance (signature ~ (Gtk.Enums.License -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetLicenseTypeMethodInfo a signature where
overloadedMethod = aboutDialogSetLicenseType
instance O.OverloadedMethodInfo AboutDialogSetLicenseTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetLicenseType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetLicenseType"
})
#endif
foreign import ccall "gtk_about_dialog_set_logo" gtk_about_dialog_set_logo ::
Ptr AboutDialog ->
Ptr GdkPixbuf.Pixbuf.Pixbuf ->
IO ()
aboutDialogSetLogo ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a, GdkPixbuf.Pixbuf.IsPixbuf b) =>
a
-> Maybe (b)
-> m ()
aboutDialogSetLogo :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsAboutDialog a, IsPixbuf b) =>
a -> Maybe b -> m ()
aboutDialogSetLogo a
about Maybe b
logo = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
Ptr Pixbuf
maybeLogo <- case Maybe b
logo of
Maybe b
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just b
jLogo -> do
Ptr Pixbuf
jLogo' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jLogo
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Pixbuf
jLogo'
Ptr AboutDialog -> Ptr Pixbuf -> IO ()
gtk_about_dialog_set_logo Ptr AboutDialog
about' Ptr Pixbuf
maybeLogo
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
logo forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetLogoMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsAboutDialog a, GdkPixbuf.Pixbuf.IsPixbuf b) => O.OverloadedMethod AboutDialogSetLogoMethodInfo a signature where
overloadedMethod = aboutDialogSetLogo
instance O.OverloadedMethodInfo AboutDialogSetLogoMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetLogo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetLogo"
})
#endif
foreign import ccall "gtk_about_dialog_set_logo_icon_name" gtk_about_dialog_set_logo_icon_name ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetLogoIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetLogoIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetLogoIconName a
about Maybe Text
iconName = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeIconName <- case Maybe Text
iconName of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jIconName -> do
CString
jIconName' <- Text -> IO CString
textToCString Text
jIconName
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jIconName'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_logo_icon_name Ptr AboutDialog
about' CString
maybeIconName
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeIconName
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetLogoIconNameMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetLogoIconNameMethodInfo a signature where
overloadedMethod = aboutDialogSetLogoIconName
instance O.OverloadedMethodInfo AboutDialogSetLogoIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetLogoIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetLogoIconName"
})
#endif
foreign import ccall "gtk_about_dialog_set_program_name" gtk_about_dialog_set_program_name ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetProgramName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> T.Text
-> m ()
aboutDialogSetProgramName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetProgramName a
about Text
name = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
name' <- Text -> IO CString
textToCString Text
name
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_program_name Ptr AboutDialog
about' CString
name'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
name'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetProgramNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetProgramNameMethodInfo a signature where
overloadedMethod = aboutDialogSetProgramName
instance O.OverloadedMethodInfo AboutDialogSetProgramNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetProgramName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetProgramName"
})
#endif
foreign import ccall "gtk_about_dialog_set_translator_credits" gtk_about_dialog_set_translator_credits ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetTranslatorCredits ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetTranslatorCredits a
about Maybe Text
translatorCredits = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeTranslatorCredits <- case Maybe Text
translatorCredits of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jTranslatorCredits -> do
CString
jTranslatorCredits' <- Text -> IO CString
textToCString Text
jTranslatorCredits
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jTranslatorCredits'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_translator_credits Ptr AboutDialog
about' CString
maybeTranslatorCredits
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeTranslatorCredits
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetTranslatorCreditsMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetTranslatorCreditsMethodInfo a signature where
overloadedMethod = aboutDialogSetTranslatorCredits
instance O.OverloadedMethodInfo AboutDialogSetTranslatorCreditsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetTranslatorCredits",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetTranslatorCredits"
})
#endif
foreign import ccall "gtk_about_dialog_set_version" gtk_about_dialog_set_version ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetVersion a
about Maybe Text
version = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeVersion <- case Maybe Text
version of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jVersion -> do
CString
jVersion' <- Text -> IO CString
textToCString Text
jVersion
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jVersion'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_version Ptr AboutDialog
about' CString
maybeVersion
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeVersion
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetVersionMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetVersionMethodInfo a signature where
overloadedMethod = aboutDialogSetVersion
instance O.OverloadedMethodInfo AboutDialogSetVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetVersion"
})
#endif
foreign import ccall "gtk_about_dialog_set_website" gtk_about_dialog_set_website ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetWebsite ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Maybe (T.Text)
-> m ()
aboutDialogSetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> m ()
aboutDialogSetWebsite a
about Maybe Text
website = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
maybeWebsite <- case Maybe Text
website of
Maybe Text
Nothing -> forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Ptr a
nullPtr
Just Text
jWebsite -> do
CString
jWebsite' <- Text -> IO CString
textToCString Text
jWebsite
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jWebsite'
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_website Ptr AboutDialog
about' CString
maybeWebsite
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
maybeWebsite
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetWebsiteMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetWebsiteMethodInfo a signature where
overloadedMethod = aboutDialogSetWebsite
instance O.OverloadedMethodInfo AboutDialogSetWebsiteMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetWebsite",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetWebsite"
})
#endif
foreign import ccall "gtk_about_dialog_set_website_label" gtk_about_dialog_set_website_label ::
Ptr AboutDialog ->
CString ->
IO ()
aboutDialogSetWebsiteLabel ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> T.Text
-> m ()
aboutDialogSetWebsiteLabel :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetWebsiteLabel a
about Text
websiteLabel = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
CString
websiteLabel' <- Text -> IO CString
textToCString Text
websiteLabel
Ptr AboutDialog -> CString -> IO ()
gtk_about_dialog_set_website_label Ptr AboutDialog
about' CString
websiteLabel'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall a. Ptr a -> IO ()
freeMem CString
websiteLabel'
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetWebsiteLabelMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetWebsiteLabelMethodInfo a signature where
overloadedMethod = aboutDialogSetWebsiteLabel
instance O.OverloadedMethodInfo AboutDialogSetWebsiteLabelMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetWebsiteLabel",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetWebsiteLabel"
})
#endif
foreign import ccall "gtk_about_dialog_set_wrap_license" gtk_about_dialog_set_wrap_license ::
Ptr AboutDialog ->
CInt ->
IO ()
aboutDialogSetWrapLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
a
-> Bool
-> m ()
aboutDialogSetWrapLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Bool -> m ()
aboutDialogSetWrapLicense a
about Bool
wrapLicense = forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO forall a b. (a -> b) -> a -> b
$ do
Ptr AboutDialog
about' <- forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
about
let wrapLicense' :: CInt
wrapLicense' = (forall a b. (Integral a, Num b) => a -> b
P.fromIntegral forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Enum a => a -> Int
P.fromEnum) Bool
wrapLicense
Ptr AboutDialog -> CInt -> IO ()
gtk_about_dialog_set_wrap_license Ptr AboutDialog
about' CInt
wrapLicense'
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
about
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutDialogSetWrapLicenseMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetWrapLicenseMethodInfo a signature where
overloadedMethod = aboutDialogSetWrapLicense
instance O.OverloadedMethodInfo AboutDialogSetWrapLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.AboutDialog.aboutDialogSetWrapLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-3.0.39/docs/GI-Gtk-Objects-AboutDialog.html#v:aboutDialogSetWrapLicense"
})
#endif