{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Adw.Objects.AboutWindow
(
AboutWindow(..) ,
IsAboutWindow ,
toAboutWindow ,
#if defined(ENABLE_OVERLOADING)
ResolveAboutWindowMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
AboutWindowAddAcknowledgementSectionMethodInfo,
#endif
aboutWindowAddAcknowledgementSection ,
#if defined(ENABLE_OVERLOADING)
AboutWindowAddCreditSectionMethodInfo ,
#endif
aboutWindowAddCreditSection ,
#if defined(ENABLE_OVERLOADING)
AboutWindowAddLegalSectionMethodInfo ,
#endif
aboutWindowAddLegalSection ,
#if defined(ENABLE_OVERLOADING)
AboutWindowAddLinkMethodInfo ,
#endif
aboutWindowAddLink ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetApplicationIconMethodInfo ,
#endif
aboutWindowGetApplicationIcon ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetApplicationNameMethodInfo ,
#endif
aboutWindowGetApplicationName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetArtistsMethodInfo ,
#endif
aboutWindowGetArtists ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetCommentsMethodInfo ,
#endif
aboutWindowGetComments ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetCopyrightMethodInfo ,
#endif
aboutWindowGetCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDebugInfoMethodInfo ,
#endif
aboutWindowGetDebugInfo ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDebugInfoFilenameMethodInfo,
#endif
aboutWindowGetDebugInfoFilename ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDesignersMethodInfo ,
#endif
aboutWindowGetDesigners ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDeveloperNameMethodInfo ,
#endif
aboutWindowGetDeveloperName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDevelopersMethodInfo ,
#endif
aboutWindowGetDevelopers ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetDocumentersMethodInfo ,
#endif
aboutWindowGetDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetIssueUrlMethodInfo ,
#endif
aboutWindowGetIssueUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetLicenseMethodInfo ,
#endif
aboutWindowGetLicense ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetLicenseTypeMethodInfo ,
#endif
aboutWindowGetLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetReleaseNotesMethodInfo ,
#endif
aboutWindowGetReleaseNotes ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetReleaseNotesVersionMethodInfo,
#endif
aboutWindowGetReleaseNotesVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetSupportUrlMethodInfo ,
#endif
aboutWindowGetSupportUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetTranslatorCreditsMethodInfo,
#endif
aboutWindowGetTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetVersionMethodInfo ,
#endif
aboutWindowGetVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowGetWebsiteMethodInfo ,
#endif
aboutWindowGetWebsite ,
aboutWindowNew ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetApplicationIconMethodInfo ,
#endif
aboutWindowSetApplicationIcon ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetApplicationNameMethodInfo ,
#endif
aboutWindowSetApplicationName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetArtistsMethodInfo ,
#endif
aboutWindowSetArtists ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetCommentsMethodInfo ,
#endif
aboutWindowSetComments ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetCopyrightMethodInfo ,
#endif
aboutWindowSetCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDebugInfoMethodInfo ,
#endif
aboutWindowSetDebugInfo ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDebugInfoFilenameMethodInfo,
#endif
aboutWindowSetDebugInfoFilename ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDesignersMethodInfo ,
#endif
aboutWindowSetDesigners ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDeveloperNameMethodInfo ,
#endif
aboutWindowSetDeveloperName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDevelopersMethodInfo ,
#endif
aboutWindowSetDevelopers ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetDocumentersMethodInfo ,
#endif
aboutWindowSetDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetIssueUrlMethodInfo ,
#endif
aboutWindowSetIssueUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetLicenseMethodInfo ,
#endif
aboutWindowSetLicense ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetLicenseTypeMethodInfo ,
#endif
aboutWindowSetLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetReleaseNotesMethodInfo ,
#endif
aboutWindowSetReleaseNotes ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetReleaseNotesVersionMethodInfo,
#endif
aboutWindowSetReleaseNotesVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetSupportUrlMethodInfo ,
#endif
aboutWindowSetSupportUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetTranslatorCreditsMethodInfo,
#endif
aboutWindowSetTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetVersionMethodInfo ,
#endif
aboutWindowSetVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSetWebsiteMethodInfo ,
#endif
aboutWindowSetWebsite ,
#if defined(ENABLE_OVERLOADING)
AboutWindowApplicationIconPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowApplicationIcon ,
#endif
constructAboutWindowApplicationIcon ,
getAboutWindowApplicationIcon ,
setAboutWindowApplicationIcon ,
#if defined(ENABLE_OVERLOADING)
AboutWindowApplicationNamePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowApplicationName ,
#endif
constructAboutWindowApplicationName ,
getAboutWindowApplicationName ,
setAboutWindowApplicationName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowArtistsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowArtists ,
#endif
clearAboutWindowArtists ,
constructAboutWindowArtists ,
getAboutWindowArtists ,
setAboutWindowArtists ,
#if defined(ENABLE_OVERLOADING)
AboutWindowCommentsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowComments ,
#endif
constructAboutWindowComments ,
getAboutWindowComments ,
setAboutWindowComments ,
#if defined(ENABLE_OVERLOADING)
AboutWindowCopyrightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowCopyright ,
#endif
constructAboutWindowCopyright ,
getAboutWindowCopyright ,
setAboutWindowCopyright ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDebugInfoPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDebugInfo ,
#endif
constructAboutWindowDebugInfo ,
getAboutWindowDebugInfo ,
setAboutWindowDebugInfo ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDebugInfoFilenamePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDebugInfoFilename ,
#endif
constructAboutWindowDebugInfoFilename ,
getAboutWindowDebugInfoFilename ,
setAboutWindowDebugInfoFilename ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDesignersPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDesigners ,
#endif
clearAboutWindowDesigners ,
constructAboutWindowDesigners ,
getAboutWindowDesigners ,
setAboutWindowDesigners ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDeveloperNamePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDeveloperName ,
#endif
constructAboutWindowDeveloperName ,
getAboutWindowDeveloperName ,
setAboutWindowDeveloperName ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDevelopersPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDevelopers ,
#endif
clearAboutWindowDevelopers ,
constructAboutWindowDevelopers ,
getAboutWindowDevelopers ,
setAboutWindowDevelopers ,
#if defined(ENABLE_OVERLOADING)
AboutWindowDocumentersPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowDocumenters ,
#endif
clearAboutWindowDocumenters ,
constructAboutWindowDocumenters ,
getAboutWindowDocumenters ,
setAboutWindowDocumenters ,
#if defined(ENABLE_OVERLOADING)
AboutWindowIssueUrlPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowIssueUrl ,
#endif
constructAboutWindowIssueUrl ,
getAboutWindowIssueUrl ,
setAboutWindowIssueUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowLicensePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowLicense ,
#endif
constructAboutWindowLicense ,
getAboutWindowLicense ,
setAboutWindowLicense ,
#if defined(ENABLE_OVERLOADING)
AboutWindowLicenseTypePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowLicenseType ,
#endif
constructAboutWindowLicenseType ,
getAboutWindowLicenseType ,
setAboutWindowLicenseType ,
#if defined(ENABLE_OVERLOADING)
AboutWindowReleaseNotesPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowReleaseNotes ,
#endif
constructAboutWindowReleaseNotes ,
getAboutWindowReleaseNotes ,
setAboutWindowReleaseNotes ,
#if defined(ENABLE_OVERLOADING)
AboutWindowReleaseNotesVersionPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowReleaseNotesVersion ,
#endif
constructAboutWindowReleaseNotesVersion ,
getAboutWindowReleaseNotesVersion ,
setAboutWindowReleaseNotesVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowSupportUrlPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowSupportUrl ,
#endif
constructAboutWindowSupportUrl ,
getAboutWindowSupportUrl ,
setAboutWindowSupportUrl ,
#if defined(ENABLE_OVERLOADING)
AboutWindowTranslatorCreditsPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowTranslatorCredits ,
#endif
constructAboutWindowTranslatorCredits ,
getAboutWindowTranslatorCredits ,
setAboutWindowTranslatorCredits ,
#if defined(ENABLE_OVERLOADING)
AboutWindowVersionPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowVersion ,
#endif
constructAboutWindowVersion ,
getAboutWindowVersion ,
setAboutWindowVersion ,
#if defined(ENABLE_OVERLOADING)
AboutWindowWebsitePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowWebsite ,
#endif
constructAboutWindowWebsite ,
getAboutWindowWebsite ,
setAboutWindowWebsite ,
AboutWindowActivateLinkCallback ,
#if defined(ENABLE_OVERLOADING)
AboutWindowActivateLinkSignalInfo ,
#endif
afterAboutWindowActivateLink ,
onAboutWindowActivateLink ,
) 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 {-# SOURCE #-} qualified GI.Adw.Objects.Window as Adw.Window
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import qualified GI.Gtk.Interfaces.Native as Gtk.Native
import qualified GI.Gtk.Interfaces.Root as Gtk.Root
import qualified GI.Gtk.Interfaces.ShortcutManager as Gtk.ShortcutManager
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import qualified GI.Gtk.Objects.Window as Gtk.Window
newtype AboutWindow = AboutWindow (SP.ManagedPtr AboutWindow)
deriving (AboutWindow -> AboutWindow -> Bool
(AboutWindow -> AboutWindow -> Bool)
-> (AboutWindow -> AboutWindow -> Bool) -> Eq AboutWindow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AboutWindow -> AboutWindow -> Bool
== :: AboutWindow -> AboutWindow -> Bool
$c/= :: AboutWindow -> AboutWindow -> Bool
/= :: AboutWindow -> AboutWindow -> Bool
Eq)
instance SP.ManagedPtrNewtype AboutWindow where
toManagedPtr :: AboutWindow -> ManagedPtr AboutWindow
toManagedPtr (AboutWindow ManagedPtr AboutWindow
p) = ManagedPtr AboutWindow
p
foreign import ccall "adw_about_window_get_type"
c_adw_about_window_get_type :: IO B.Types.GType
instance B.Types.TypedObject AboutWindow where
glibType :: IO GType
glibType = IO GType
c_adw_about_window_get_type
instance B.Types.GObject AboutWindow
class (SP.GObject o, O.IsDescendantOf AboutWindow o) => IsAboutWindow o
instance (SP.GObject o, O.IsDescendantOf AboutWindow o) => IsAboutWindow o
instance O.HasParentTypes AboutWindow
type instance O.ParentTypes AboutWindow = '[Adw.Window.Window, Gtk.Window.Window, Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget, Gtk.Native.Native, Gtk.Root.Root, Gtk.ShortcutManager.ShortcutManager]
toAboutWindow :: (MIO.MonadIO m, IsAboutWindow o) => o -> m AboutWindow
toAboutWindow :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m AboutWindow
toAboutWindow = IO AboutWindow -> m AboutWindow
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO AboutWindow -> m AboutWindow)
-> (o -> IO AboutWindow) -> o -> m AboutWindow
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr AboutWindow -> AboutWindow) -> o -> IO AboutWindow
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr AboutWindow -> AboutWindow
AboutWindow
instance B.GValue.IsGValue (Maybe AboutWindow) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_adw_about_window_get_type
gvalueSet_ :: Ptr GValue -> Maybe AboutWindow -> IO ()
gvalueSet_ Ptr GValue
gv Maybe AboutWindow
P.Nothing = Ptr GValue -> Ptr AboutWindow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr AboutWindow
forall a. Ptr a
FP.nullPtr :: FP.Ptr AboutWindow)
gvalueSet_ Ptr GValue
gv (P.Just AboutWindow
obj) = AboutWindow -> (Ptr AboutWindow -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr AboutWindow
obj (Ptr GValue -> Ptr AboutWindow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe AboutWindow)
gvalueGet_ Ptr GValue
gv = do
Ptr AboutWindow
ptr <- Ptr GValue -> IO (Ptr AboutWindow)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr AboutWindow)
if Ptr AboutWindow
ptr Ptr AboutWindow -> Ptr AboutWindow -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr AboutWindow
forall a. Ptr a
FP.nullPtr
then AboutWindow -> Maybe AboutWindow
forall a. a -> Maybe a
P.Just (AboutWindow -> Maybe AboutWindow)
-> IO AboutWindow -> IO (Maybe AboutWindow)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr AboutWindow -> AboutWindow)
-> Ptr AboutWindow -> IO AboutWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr AboutWindow -> AboutWindow
AboutWindow Ptr AboutWindow
ptr
else Maybe AboutWindow -> IO (Maybe AboutWindow)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe AboutWindow
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveAboutWindowMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveAboutWindowMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveAboutWindowMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveAboutWindowMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveAboutWindowMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveAboutWindowMethod "addAcknowledgementSection" o = AboutWindowAddAcknowledgementSectionMethodInfo
ResolveAboutWindowMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveAboutWindowMethod "addCreditSection" o = AboutWindowAddCreditSectionMethodInfo
ResolveAboutWindowMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveAboutWindowMethod "addLegalSection" o = AboutWindowAddLegalSectionMethodInfo
ResolveAboutWindowMethod "addLink" o = AboutWindowAddLinkMethodInfo
ResolveAboutWindowMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveAboutWindowMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveAboutWindowMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveAboutWindowMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveAboutWindowMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveAboutWindowMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveAboutWindowMethod "close" o = Gtk.Window.WindowCloseMethodInfo
ResolveAboutWindowMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveAboutWindowMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveAboutWindowMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveAboutWindowMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveAboutWindowMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveAboutWindowMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveAboutWindowMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveAboutWindowMethod "destroy" o = Gtk.Window.WindowDestroyMethodInfo
ResolveAboutWindowMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
ResolveAboutWindowMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveAboutWindowMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveAboutWindowMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveAboutWindowMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveAboutWindowMethod "fullscreen" o = Gtk.Window.WindowFullscreenMethodInfo
ResolveAboutWindowMethod "fullscreenOnMonitor" o = Gtk.Window.WindowFullscreenOnMonitorMethodInfo
ResolveAboutWindowMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveAboutWindowMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveAboutWindowMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveAboutWindowMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveAboutWindowMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveAboutWindowMethod "hasGroup" o = Gtk.Window.WindowHasGroupMethodInfo
ResolveAboutWindowMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveAboutWindowMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveAboutWindowMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveAboutWindowMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveAboutWindowMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveAboutWindowMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveAboutWindowMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveAboutWindowMethod "isActive" o = Gtk.Window.WindowIsActiveMethodInfo
ResolveAboutWindowMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveAboutWindowMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveAboutWindowMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveAboutWindowMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveAboutWindowMethod "isFullscreen" o = Gtk.Window.WindowIsFullscreenMethodInfo
ResolveAboutWindowMethod "isMaximized" o = Gtk.Window.WindowIsMaximizedMethodInfo
ResolveAboutWindowMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveAboutWindowMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveAboutWindowMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveAboutWindowMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveAboutWindowMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveAboutWindowMethod "maximize" o = Gtk.Window.WindowMaximizeMethodInfo
ResolveAboutWindowMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveAboutWindowMethod "minimize" o = Gtk.Window.WindowMinimizeMethodInfo
ResolveAboutWindowMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveAboutWindowMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveAboutWindowMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveAboutWindowMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveAboutWindowMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveAboutWindowMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveAboutWindowMethod "present" o = Gtk.Window.WindowPresentMethodInfo
ResolveAboutWindowMethod "presentWithTime" o = Gtk.Window.WindowPresentWithTimeMethodInfo
ResolveAboutWindowMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveAboutWindowMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveAboutWindowMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveAboutWindowMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveAboutWindowMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveAboutWindowMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveAboutWindowMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveAboutWindowMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveAboutWindowMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveAboutWindowMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveAboutWindowMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
ResolveAboutWindowMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
ResolveAboutWindowMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
ResolveAboutWindowMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveAboutWindowMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveAboutWindowMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveAboutWindowMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveAboutWindowMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveAboutWindowMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveAboutWindowMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveAboutWindowMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveAboutWindowMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveAboutWindowMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveAboutWindowMethod "unfullscreen" o = Gtk.Window.WindowUnfullscreenMethodInfo
ResolveAboutWindowMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveAboutWindowMethod "unmaximize" o = Gtk.Window.WindowUnmaximizeMethodInfo
ResolveAboutWindowMethod "unminimize" o = Gtk.Window.WindowUnminimizeMethodInfo
ResolveAboutWindowMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveAboutWindowMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveAboutWindowMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveAboutWindowMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveAboutWindowMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
ResolveAboutWindowMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
ResolveAboutWindowMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
ResolveAboutWindowMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
ResolveAboutWindowMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveAboutWindowMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
ResolveAboutWindowMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
ResolveAboutWindowMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveAboutWindowMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveAboutWindowMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveAboutWindowMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveAboutWindowMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveAboutWindowMethod "getApplication" o = Gtk.Window.WindowGetApplicationMethodInfo
ResolveAboutWindowMethod "getApplicationIcon" o = AboutWindowGetApplicationIconMethodInfo
ResolveAboutWindowMethod "getApplicationName" o = AboutWindowGetApplicationNameMethodInfo
ResolveAboutWindowMethod "getArtists" o = AboutWindowGetArtistsMethodInfo
ResolveAboutWindowMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
ResolveAboutWindowMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
ResolveAboutWindowMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
ResolveAboutWindowMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveAboutWindowMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveAboutWindowMethod "getChild" o = Gtk.Window.WindowGetChildMethodInfo
ResolveAboutWindowMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveAboutWindowMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveAboutWindowMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
ResolveAboutWindowMethod "getComments" o = AboutWindowGetCommentsMethodInfo
ResolveAboutWindowMethod "getContent" o = Adw.Window.WindowGetContentMethodInfo
ResolveAboutWindowMethod "getCopyright" o = AboutWindowGetCopyrightMethodInfo
ResolveAboutWindowMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveAboutWindowMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveAboutWindowMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveAboutWindowMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveAboutWindowMethod "getDebugInfo" o = AboutWindowGetDebugInfoMethodInfo
ResolveAboutWindowMethod "getDebugInfoFilename" o = AboutWindowGetDebugInfoFilenameMethodInfo
ResolveAboutWindowMethod "getDecorated" o = Gtk.Window.WindowGetDecoratedMethodInfo
ResolveAboutWindowMethod "getDefaultSize" o = Gtk.Window.WindowGetDefaultSizeMethodInfo
ResolveAboutWindowMethod "getDefaultWidget" o = Gtk.Window.WindowGetDefaultWidgetMethodInfo
ResolveAboutWindowMethod "getDeletable" o = Gtk.Window.WindowGetDeletableMethodInfo
ResolveAboutWindowMethod "getDesigners" o = AboutWindowGetDesignersMethodInfo
ResolveAboutWindowMethod "getDestroyWithParent" o = Gtk.Window.WindowGetDestroyWithParentMethodInfo
ResolveAboutWindowMethod "getDeveloperName" o = AboutWindowGetDeveloperNameMethodInfo
ResolveAboutWindowMethod "getDevelopers" o = AboutWindowGetDevelopersMethodInfo
ResolveAboutWindowMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveAboutWindowMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveAboutWindowMethod "getDocumenters" o = AboutWindowGetDocumentersMethodInfo
ResolveAboutWindowMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
ResolveAboutWindowMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveAboutWindowMethod "getFocus" o = Gtk.Window.WindowGetFocusMethodInfo
ResolveAboutWindowMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveAboutWindowMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveAboutWindowMethod "getFocusVisible" o = Gtk.Window.WindowGetFocusVisibleMethodInfo
ResolveAboutWindowMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveAboutWindowMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveAboutWindowMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveAboutWindowMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveAboutWindowMethod "getGroup" o = Gtk.Window.WindowGetGroupMethodInfo
ResolveAboutWindowMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveAboutWindowMethod "getHandleMenubarAccel" o = Gtk.Window.WindowGetHandleMenubarAccelMethodInfo
ResolveAboutWindowMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveAboutWindowMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveAboutWindowMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveAboutWindowMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveAboutWindowMethod "getHideOnClose" o = Gtk.Window.WindowGetHideOnCloseMethodInfo
ResolveAboutWindowMethod "getIconName" o = Gtk.Window.WindowGetIconNameMethodInfo
ResolveAboutWindowMethod "getIssueUrl" o = AboutWindowGetIssueUrlMethodInfo
ResolveAboutWindowMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveAboutWindowMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveAboutWindowMethod "getLicense" o = AboutWindowGetLicenseMethodInfo
ResolveAboutWindowMethod "getLicenseType" o = AboutWindowGetLicenseTypeMethodInfo
ResolveAboutWindowMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveAboutWindowMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveAboutWindowMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveAboutWindowMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveAboutWindowMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveAboutWindowMethod "getMnemonicsVisible" o = Gtk.Window.WindowGetMnemonicsVisibleMethodInfo
ResolveAboutWindowMethod "getModal" o = Gtk.Window.WindowGetModalMethodInfo
ResolveAboutWindowMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveAboutWindowMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveAboutWindowMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
ResolveAboutWindowMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveAboutWindowMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveAboutWindowMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveAboutWindowMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveAboutWindowMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveAboutWindowMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
ResolveAboutWindowMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveAboutWindowMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveAboutWindowMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveAboutWindowMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveAboutWindowMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveAboutWindowMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveAboutWindowMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveAboutWindowMethod "getReleaseNotes" o = AboutWindowGetReleaseNotesMethodInfo
ResolveAboutWindowMethod "getReleaseNotesVersion" o = AboutWindowGetReleaseNotesVersionMethodInfo
ResolveAboutWindowMethod "getRenderer" o = Gtk.Native.NativeGetRendererMethodInfo
ResolveAboutWindowMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveAboutWindowMethod "getResizable" o = Gtk.Window.WindowGetResizableMethodInfo
ResolveAboutWindowMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveAboutWindowMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveAboutWindowMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveAboutWindowMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveAboutWindowMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
ResolveAboutWindowMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveAboutWindowMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveAboutWindowMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveAboutWindowMethod "getSupportUrl" o = AboutWindowGetSupportUrlMethodInfo
ResolveAboutWindowMethod "getSurface" o = Gtk.Native.NativeGetSurfaceMethodInfo
ResolveAboutWindowMethod "getSurfaceTransform" o = Gtk.Native.NativeGetSurfaceTransformMethodInfo
ResolveAboutWindowMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveAboutWindowMethod "getTitle" o = Gtk.Window.WindowGetTitleMethodInfo
ResolveAboutWindowMethod "getTitlebar" o = Gtk.Window.WindowGetTitlebarMethodInfo
ResolveAboutWindowMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveAboutWindowMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveAboutWindowMethod "getTransientFor" o = Gtk.Window.WindowGetTransientForMethodInfo
ResolveAboutWindowMethod "getTranslatorCredits" o = AboutWindowGetTranslatorCreditsMethodInfo
ResolveAboutWindowMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveAboutWindowMethod "getVersion" o = AboutWindowGetVersionMethodInfo
ResolveAboutWindowMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveAboutWindowMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveAboutWindowMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveAboutWindowMethod "getWebsite" o = AboutWindowGetWebsiteMethodInfo
ResolveAboutWindowMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveAboutWindowMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
ResolveAboutWindowMethod "setApplication" o = Gtk.Window.WindowSetApplicationMethodInfo
ResolveAboutWindowMethod "setApplicationIcon" o = AboutWindowSetApplicationIconMethodInfo
ResolveAboutWindowMethod "setApplicationName" o = AboutWindowSetApplicationNameMethodInfo
ResolveAboutWindowMethod "setArtists" o = AboutWindowSetArtistsMethodInfo
ResolveAboutWindowMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveAboutWindowMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveAboutWindowMethod "setChild" o = Gtk.Window.WindowSetChildMethodInfo
ResolveAboutWindowMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveAboutWindowMethod "setComments" o = AboutWindowSetCommentsMethodInfo
ResolveAboutWindowMethod "setContent" o = Adw.Window.WindowSetContentMethodInfo
ResolveAboutWindowMethod "setCopyright" o = AboutWindowSetCopyrightMethodInfo
ResolveAboutWindowMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveAboutWindowMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveAboutWindowMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveAboutWindowMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveAboutWindowMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveAboutWindowMethod "setDebugInfo" o = AboutWindowSetDebugInfoMethodInfo
ResolveAboutWindowMethod "setDebugInfoFilename" o = AboutWindowSetDebugInfoFilenameMethodInfo
ResolveAboutWindowMethod "setDecorated" o = Gtk.Window.WindowSetDecoratedMethodInfo
ResolveAboutWindowMethod "setDefaultSize" o = Gtk.Window.WindowSetDefaultSizeMethodInfo
ResolveAboutWindowMethod "setDefaultWidget" o = Gtk.Window.WindowSetDefaultWidgetMethodInfo
ResolveAboutWindowMethod "setDeletable" o = Gtk.Window.WindowSetDeletableMethodInfo
ResolveAboutWindowMethod "setDesigners" o = AboutWindowSetDesignersMethodInfo
ResolveAboutWindowMethod "setDestroyWithParent" o = Gtk.Window.WindowSetDestroyWithParentMethodInfo
ResolveAboutWindowMethod "setDeveloperName" o = AboutWindowSetDeveloperNameMethodInfo
ResolveAboutWindowMethod "setDevelopers" o = AboutWindowSetDevelopersMethodInfo
ResolveAboutWindowMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveAboutWindowMethod "setDisplay" o = Gtk.Window.WindowSetDisplayMethodInfo
ResolveAboutWindowMethod "setDocumenters" o = AboutWindowSetDocumentersMethodInfo
ResolveAboutWindowMethod "setFocus" o = Gtk.Window.WindowSetFocusMethodInfo
ResolveAboutWindowMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveAboutWindowMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveAboutWindowMethod "setFocusVisible" o = Gtk.Window.WindowSetFocusVisibleMethodInfo
ResolveAboutWindowMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveAboutWindowMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveAboutWindowMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveAboutWindowMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveAboutWindowMethod "setHandleMenubarAccel" o = Gtk.Window.WindowSetHandleMenubarAccelMethodInfo
ResolveAboutWindowMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveAboutWindowMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveAboutWindowMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveAboutWindowMethod "setHideOnClose" o = Gtk.Window.WindowSetHideOnCloseMethodInfo
ResolveAboutWindowMethod "setIconName" o = Gtk.Window.WindowSetIconNameMethodInfo
ResolveAboutWindowMethod "setIssueUrl" o = AboutWindowSetIssueUrlMethodInfo
ResolveAboutWindowMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveAboutWindowMethod "setLicense" o = AboutWindowSetLicenseMethodInfo
ResolveAboutWindowMethod "setLicenseType" o = AboutWindowSetLicenseTypeMethodInfo
ResolveAboutWindowMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveAboutWindowMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveAboutWindowMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveAboutWindowMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveAboutWindowMethod "setMnemonicsVisible" o = Gtk.Window.WindowSetMnemonicsVisibleMethodInfo
ResolveAboutWindowMethod "setModal" o = Gtk.Window.WindowSetModalMethodInfo
ResolveAboutWindowMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveAboutWindowMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveAboutWindowMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveAboutWindowMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveAboutWindowMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveAboutWindowMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveAboutWindowMethod "setReleaseNotes" o = AboutWindowSetReleaseNotesMethodInfo
ResolveAboutWindowMethod "setReleaseNotesVersion" o = AboutWindowSetReleaseNotesVersionMethodInfo
ResolveAboutWindowMethod "setResizable" o = Gtk.Window.WindowSetResizableMethodInfo
ResolveAboutWindowMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveAboutWindowMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveAboutWindowMethod "setStartupId" o = Gtk.Window.WindowSetStartupIdMethodInfo
ResolveAboutWindowMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveAboutWindowMethod "setSupportUrl" o = AboutWindowSetSupportUrlMethodInfo
ResolveAboutWindowMethod "setTitle" o = Gtk.Window.WindowSetTitleMethodInfo
ResolveAboutWindowMethod "setTitlebar" o = Gtk.Window.WindowSetTitlebarMethodInfo
ResolveAboutWindowMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveAboutWindowMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveAboutWindowMethod "setTransientFor" o = Gtk.Window.WindowSetTransientForMethodInfo
ResolveAboutWindowMethod "setTranslatorCredits" o = AboutWindowSetTranslatorCreditsMethodInfo
ResolveAboutWindowMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveAboutWindowMethod "setVersion" o = AboutWindowSetVersionMethodInfo
ResolveAboutWindowMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveAboutWindowMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveAboutWindowMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveAboutWindowMethod "setWebsite" o = AboutWindowSetWebsiteMethodInfo
ResolveAboutWindowMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveAboutWindowMethod t AboutWindow, O.OverloadedMethod info AboutWindow p) => OL.IsLabel t (AboutWindow -> 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 ~ ResolveAboutWindowMethod t AboutWindow, O.OverloadedMethod info AboutWindow p, R.HasField t AboutWindow p) => R.HasField t AboutWindow p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveAboutWindowMethod t AboutWindow, O.OverloadedMethodInfo info AboutWindow) => OL.IsLabel t (O.MethodProxy info AboutWindow) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
type AboutWindowActivateLinkCallback =
T.Text
-> IO Bool
type C_AboutWindowActivateLinkCallback =
Ptr AboutWindow ->
CString ->
Ptr () ->
IO CInt
foreign import ccall "wrapper"
mk_AboutWindowActivateLinkCallback :: C_AboutWindowActivateLinkCallback -> IO (FunPtr C_AboutWindowActivateLinkCallback)
wrap_AboutWindowActivateLinkCallback ::
GObject a => (a -> AboutWindowActivateLinkCallback) ->
C_AboutWindowActivateLinkCallback
wrap_AboutWindowActivateLinkCallback :: forall a.
GObject a =>
(a -> AboutWindowActivateLinkCallback)
-> C_AboutWindowActivateLinkCallback
wrap_AboutWindowActivateLinkCallback a -> AboutWindowActivateLinkCallback
gi'cb Ptr AboutWindow
gi'selfPtr CString
uri Ptr ()
_ = do
Text
uri' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
uri
Bool
result <- Ptr AboutWindow -> (AboutWindow -> IO Bool) -> IO Bool
forall o b.
(HasCallStack, GObject o) =>
Ptr o -> (o -> IO b) -> IO b
B.ManagedPtr.withNewObject Ptr AboutWindow
gi'selfPtr ((AboutWindow -> IO Bool) -> IO Bool)
-> (AboutWindow -> IO Bool) -> IO Bool
forall a b. (a -> b) -> a -> b
$ \AboutWindow
gi'self -> a -> AboutWindowActivateLinkCallback
gi'cb (AboutWindow -> a
forall a b. Coercible a b => a -> b
Coerce.coerce AboutWindow
gi'self) Text
uri'
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
P.fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
P.fromEnum) Bool
result
CInt -> IO CInt
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
onAboutWindowActivateLink :: (IsAboutWindow a, MonadIO m) => a -> ((?self :: a) => AboutWindowActivateLinkCallback) -> m SignalHandlerId
onAboutWindowActivateLink :: forall a (m :: * -> *).
(IsAboutWindow a, MonadIO m) =>
a
-> ((?self::a) => AboutWindowActivateLinkCallback)
-> m SignalHandlerId
onAboutWindowActivateLink a
obj (?self::a) => AboutWindowActivateLinkCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> AboutWindowActivateLinkCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => AboutWindowActivateLinkCallback
AboutWindowActivateLinkCallback
cb
let wrapped' :: C_AboutWindowActivateLinkCallback
wrapped' = (a -> AboutWindowActivateLinkCallback)
-> C_AboutWindowActivateLinkCallback
forall a.
GObject a =>
(a -> AboutWindowActivateLinkCallback)
-> C_AboutWindowActivateLinkCallback
wrap_AboutWindowActivateLinkCallback a -> AboutWindowActivateLinkCallback
wrapped
FunPtr C_AboutWindowActivateLinkCallback
wrapped'' <- C_AboutWindowActivateLinkCallback
-> IO (FunPtr C_AboutWindowActivateLinkCallback)
mk_AboutWindowActivateLinkCallback C_AboutWindowActivateLinkCallback
wrapped'
a
-> Text
-> FunPtr C_AboutWindowActivateLinkCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate-link" FunPtr C_AboutWindowActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterAboutWindowActivateLink :: (IsAboutWindow a, MonadIO m) => a -> ((?self :: a) => AboutWindowActivateLinkCallback) -> m SignalHandlerId
afterAboutWindowActivateLink :: forall a (m :: * -> *).
(IsAboutWindow a, MonadIO m) =>
a
-> ((?self::a) => AboutWindowActivateLinkCallback)
-> m SignalHandlerId
afterAboutWindowActivateLink a
obj (?self::a) => AboutWindowActivateLinkCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> AboutWindowActivateLinkCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => AboutWindowActivateLinkCallback
AboutWindowActivateLinkCallback
cb
let wrapped' :: C_AboutWindowActivateLinkCallback
wrapped' = (a -> AboutWindowActivateLinkCallback)
-> C_AboutWindowActivateLinkCallback
forall a.
GObject a =>
(a -> AboutWindowActivateLinkCallback)
-> C_AboutWindowActivateLinkCallback
wrap_AboutWindowActivateLinkCallback a -> AboutWindowActivateLinkCallback
wrapped
FunPtr C_AboutWindowActivateLinkCallback
wrapped'' <- C_AboutWindowActivateLinkCallback
-> IO (FunPtr C_AboutWindowActivateLinkCallback)
mk_AboutWindowActivateLinkCallback C_AboutWindowActivateLinkCallback
wrapped'
a
-> Text
-> FunPtr C_AboutWindowActivateLinkCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate-link" FunPtr C_AboutWindowActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data AboutWindowActivateLinkSignalInfo
instance SignalInfo AboutWindowActivateLinkSignalInfo where
type HaskellCallbackType AboutWindowActivateLinkSignalInfo = AboutWindowActivateLinkCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_AboutWindowActivateLinkCallback cb
cb'' <- mk_AboutWindowActivateLinkCallback cb'
connectSignalFunPtr obj "activate-link" cb'' connectMode detail
dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow::activate-link"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:signal:activateLink"})
#endif
getAboutWindowApplicationIcon :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowApplicationIcon :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowApplicationIcon o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowApplicationIcon" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"application-icon"
setAboutWindowApplicationIcon :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowApplicationIcon :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowApplicationIcon o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"application-icon" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowApplicationIcon :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowApplicationIcon :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowApplicationIcon Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"application-icon" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowApplicationIconPropertyInfo
instance AttrInfo AboutWindowApplicationIconPropertyInfo where
type AttrAllowedOps AboutWindowApplicationIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowApplicationIconPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowApplicationIconPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowApplicationIconPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowApplicationIconPropertyInfo = T.Text
type AttrGetType AboutWindowApplicationIconPropertyInfo = T.Text
type AttrLabel AboutWindowApplicationIconPropertyInfo = "application-icon"
type AttrOrigin AboutWindowApplicationIconPropertyInfo = AboutWindow
attrGet = getAboutWindowApplicationIcon
attrSet = setAboutWindowApplicationIcon
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowApplicationIcon
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.applicationIcon"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:applicationIcon"
})
#endif
getAboutWindowApplicationName :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowApplicationName :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowApplicationName o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowApplicationName" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"application-name"
setAboutWindowApplicationName :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowApplicationName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowApplicationName o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"application-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowApplicationName :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowApplicationName :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowApplicationName Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"application-name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowApplicationNamePropertyInfo
instance AttrInfo AboutWindowApplicationNamePropertyInfo where
type AttrAllowedOps AboutWindowApplicationNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowApplicationNamePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowApplicationNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowApplicationNamePropertyInfo = (~) T.Text
type AttrTransferType AboutWindowApplicationNamePropertyInfo = T.Text
type AttrGetType AboutWindowApplicationNamePropertyInfo = T.Text
type AttrLabel AboutWindowApplicationNamePropertyInfo = "application-name"
type AttrOrigin AboutWindowApplicationNamePropertyInfo = AboutWindow
attrGet = getAboutWindowApplicationName
attrSet = setAboutWindowApplicationName
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowApplicationName
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.applicationName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:applicationName"
})
#endif
getAboutWindowArtists :: (MonadIO m, IsAboutWindow o) => o -> m (Maybe [T.Text])
getAboutWindowArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m (Maybe [Text])
getAboutWindowArtists o
obj = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe [Text])
forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"artists"
setAboutWindowArtists :: (MonadIO m, IsAboutWindow o) => o -> [T.Text] -> m ()
setAboutWindowArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> [Text] -> m ()
setAboutWindowArtists o
obj [Text]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"artists" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
Just [Text]
val)
constructAboutWindowArtists :: (IsAboutWindow o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutWindowArtists :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutWindowArtists [Text]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe [Text] -> IO (GValueConstruct o)
forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"artists" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
P.Just [Text]
val)
clearAboutWindowArtists :: (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowArtists :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowArtists o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"artists" (Maybe [Text]
forall a. Maybe a
Nothing :: Maybe [T.Text])
#if defined(ENABLE_OVERLOADING)
data AboutWindowArtistsPropertyInfo
instance AttrInfo AboutWindowArtistsPropertyInfo where
type AttrAllowedOps AboutWindowArtistsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutWindowArtistsPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowArtistsPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutWindowArtistsPropertyInfo = (~) [T.Text]
type AttrTransferType AboutWindowArtistsPropertyInfo = [T.Text]
type AttrGetType AboutWindowArtistsPropertyInfo = (Maybe [T.Text])
type AttrLabel AboutWindowArtistsPropertyInfo = "artists"
type AttrOrigin AboutWindowArtistsPropertyInfo = AboutWindow
attrGet = getAboutWindowArtists
attrSet = setAboutWindowArtists
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowArtists
attrClear = clearAboutWindowArtists
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.artists"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:artists"
})
#endif
getAboutWindowComments :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowComments" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"comments"
setAboutWindowComments :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"comments" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowComments :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"comments" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowCommentsPropertyInfo
instance AttrInfo AboutWindowCommentsPropertyInfo where
type AttrAllowedOps AboutWindowCommentsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowCommentsPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowCommentsPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowCommentsPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowCommentsPropertyInfo = T.Text
type AttrGetType AboutWindowCommentsPropertyInfo = T.Text
type AttrLabel AboutWindowCommentsPropertyInfo = "comments"
type AttrOrigin AboutWindowCommentsPropertyInfo = AboutWindow
attrGet = getAboutWindowComments
attrSet = setAboutWindowComments
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowComments
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.comments"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:comments"
})
#endif
getAboutWindowCopyright :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowCopyright :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowCopyright o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowCopyright" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"copyright"
setAboutWindowCopyright :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowCopyright :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowCopyright o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"copyright" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowCopyright :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowCopyright :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowCopyright Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"copyright" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowCopyrightPropertyInfo
instance AttrInfo AboutWindowCopyrightPropertyInfo where
type AttrAllowedOps AboutWindowCopyrightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowCopyrightPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowCopyrightPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowCopyrightPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowCopyrightPropertyInfo = T.Text
type AttrGetType AboutWindowCopyrightPropertyInfo = T.Text
type AttrLabel AboutWindowCopyrightPropertyInfo = "copyright"
type AttrOrigin AboutWindowCopyrightPropertyInfo = AboutWindow
attrGet = getAboutWindowCopyright
attrSet = setAboutWindowCopyright
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowCopyright
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.copyright"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:copyright"
})
#endif
getAboutWindowDebugInfo :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowDebugInfo :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowDebugInfo o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowDebugInfo" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"debug-info"
setAboutWindowDebugInfo :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowDebugInfo :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowDebugInfo o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"debug-info" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowDebugInfo :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowDebugInfo :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowDebugInfo Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"debug-info" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowDebugInfoPropertyInfo
instance AttrInfo AboutWindowDebugInfoPropertyInfo where
type AttrAllowedOps AboutWindowDebugInfoPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowDebugInfoPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDebugInfoPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowDebugInfoPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowDebugInfoPropertyInfo = T.Text
type AttrGetType AboutWindowDebugInfoPropertyInfo = T.Text
type AttrLabel AboutWindowDebugInfoPropertyInfo = "debug-info"
type AttrOrigin AboutWindowDebugInfoPropertyInfo = AboutWindow
attrGet = getAboutWindowDebugInfo
attrSet = setAboutWindowDebugInfo
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDebugInfo
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.debugInfo"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:debugInfo"
})
#endif
getAboutWindowDebugInfoFilename :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowDebugInfoFilename :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowDebugInfoFilename o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowDebugInfoFilename" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"debug-info-filename"
setAboutWindowDebugInfoFilename :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowDebugInfoFilename :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowDebugInfoFilename o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"debug-info-filename" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowDebugInfoFilename :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowDebugInfoFilename :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowDebugInfoFilename Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"debug-info-filename" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowDebugInfoFilenamePropertyInfo
instance AttrInfo AboutWindowDebugInfoFilenamePropertyInfo where
type AttrAllowedOps AboutWindowDebugInfoFilenamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowDebugInfoFilenamePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDebugInfoFilenamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowDebugInfoFilenamePropertyInfo = (~) T.Text
type AttrTransferType AboutWindowDebugInfoFilenamePropertyInfo = T.Text
type AttrGetType AboutWindowDebugInfoFilenamePropertyInfo = T.Text
type AttrLabel AboutWindowDebugInfoFilenamePropertyInfo = "debug-info-filename"
type AttrOrigin AboutWindowDebugInfoFilenamePropertyInfo = AboutWindow
attrGet = getAboutWindowDebugInfoFilename
attrSet = setAboutWindowDebugInfoFilename
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDebugInfoFilename
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.debugInfoFilename"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:debugInfoFilename"
})
#endif
getAboutWindowDesigners :: (MonadIO m, IsAboutWindow o) => o -> m (Maybe [T.Text])
getAboutWindowDesigners :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m (Maybe [Text])
getAboutWindowDesigners o
obj = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe [Text])
forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"designers"
setAboutWindowDesigners :: (MonadIO m, IsAboutWindow o) => o -> [T.Text] -> m ()
setAboutWindowDesigners :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> [Text] -> m ()
setAboutWindowDesigners o
obj [Text]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"designers" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
Just [Text]
val)
constructAboutWindowDesigners :: (IsAboutWindow o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutWindowDesigners :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutWindowDesigners [Text]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe [Text] -> IO (GValueConstruct o)
forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"designers" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
P.Just [Text]
val)
clearAboutWindowDesigners :: (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDesigners :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDesigners o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"designers" (Maybe [Text]
forall a. Maybe a
Nothing :: Maybe [T.Text])
#if defined(ENABLE_OVERLOADING)
data AboutWindowDesignersPropertyInfo
instance AttrInfo AboutWindowDesignersPropertyInfo where
type AttrAllowedOps AboutWindowDesignersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutWindowDesignersPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDesignersPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutWindowDesignersPropertyInfo = (~) [T.Text]
type AttrTransferType AboutWindowDesignersPropertyInfo = [T.Text]
type AttrGetType AboutWindowDesignersPropertyInfo = (Maybe [T.Text])
type AttrLabel AboutWindowDesignersPropertyInfo = "designers"
type AttrOrigin AboutWindowDesignersPropertyInfo = AboutWindow
attrGet = getAboutWindowDesigners
attrSet = setAboutWindowDesigners
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDesigners
attrClear = clearAboutWindowDesigners
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.designers"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:designers"
})
#endif
getAboutWindowDeveloperName :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowDeveloperName :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowDeveloperName o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowDeveloperName" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"developer-name"
setAboutWindowDeveloperName :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowDeveloperName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowDeveloperName o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"developer-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowDeveloperName :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowDeveloperName :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowDeveloperName Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"developer-name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowDeveloperNamePropertyInfo
instance AttrInfo AboutWindowDeveloperNamePropertyInfo where
type AttrAllowedOps AboutWindowDeveloperNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowDeveloperNamePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDeveloperNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowDeveloperNamePropertyInfo = (~) T.Text
type AttrTransferType AboutWindowDeveloperNamePropertyInfo = T.Text
type AttrGetType AboutWindowDeveloperNamePropertyInfo = T.Text
type AttrLabel AboutWindowDeveloperNamePropertyInfo = "developer-name"
type AttrOrigin AboutWindowDeveloperNamePropertyInfo = AboutWindow
attrGet = getAboutWindowDeveloperName
attrSet = setAboutWindowDeveloperName
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDeveloperName
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.developerName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:developerName"
})
#endif
getAboutWindowDevelopers :: (MonadIO m, IsAboutWindow o) => o -> m (Maybe [T.Text])
getAboutWindowDevelopers :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m (Maybe [Text])
getAboutWindowDevelopers o
obj = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe [Text])
forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"developers"
setAboutWindowDevelopers :: (MonadIO m, IsAboutWindow o) => o -> [T.Text] -> m ()
setAboutWindowDevelopers :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> [Text] -> m ()
setAboutWindowDevelopers o
obj [Text]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"developers" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
Just [Text]
val)
constructAboutWindowDevelopers :: (IsAboutWindow o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutWindowDevelopers :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutWindowDevelopers [Text]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe [Text] -> IO (GValueConstruct o)
forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"developers" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
P.Just [Text]
val)
clearAboutWindowDevelopers :: (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDevelopers :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDevelopers o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"developers" (Maybe [Text]
forall a. Maybe a
Nothing :: Maybe [T.Text])
#if defined(ENABLE_OVERLOADING)
data AboutWindowDevelopersPropertyInfo
instance AttrInfo AboutWindowDevelopersPropertyInfo where
type AttrAllowedOps AboutWindowDevelopersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutWindowDevelopersPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDevelopersPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutWindowDevelopersPropertyInfo = (~) [T.Text]
type AttrTransferType AboutWindowDevelopersPropertyInfo = [T.Text]
type AttrGetType AboutWindowDevelopersPropertyInfo = (Maybe [T.Text])
type AttrLabel AboutWindowDevelopersPropertyInfo = "developers"
type AttrOrigin AboutWindowDevelopersPropertyInfo = AboutWindow
attrGet = getAboutWindowDevelopers
attrSet = setAboutWindowDevelopers
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDevelopers
attrClear = clearAboutWindowDevelopers
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.developers"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:developers"
})
#endif
getAboutWindowDocumenters :: (MonadIO m, IsAboutWindow o) => o -> m (Maybe [T.Text])
getAboutWindowDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m (Maybe [Text])
getAboutWindowDocumenters o
obj = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe [Text])
forall a. GObject a => a -> String -> IO (Maybe [Text])
B.Properties.getObjectPropertyStringArray o
obj String
"documenters"
setAboutWindowDocumenters :: (MonadIO m, IsAboutWindow o) => o -> [T.Text] -> m ()
setAboutWindowDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> [Text] -> m ()
setAboutWindowDocumenters o
obj [Text]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"documenters" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
Just [Text]
val)
constructAboutWindowDocumenters :: (IsAboutWindow o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutWindowDocumenters :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutWindowDocumenters [Text]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe [Text] -> IO (GValueConstruct o)
forall o. String -> Maybe [Text] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyStringArray String
"documenters" ([Text] -> Maybe [Text]
forall a. a -> Maybe a
P.Just [Text]
val)
clearAboutWindowDocumenters :: (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDocumenters :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m ()
clearAboutWindowDocumenters o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe [Text] -> IO ()
forall a. GObject a => a -> String -> Maybe [Text] -> IO ()
B.Properties.setObjectPropertyStringArray o
obj String
"documenters" (Maybe [Text]
forall a. Maybe a
Nothing :: Maybe [T.Text])
#if defined(ENABLE_OVERLOADING)
data AboutWindowDocumentersPropertyInfo
instance AttrInfo AboutWindowDocumentersPropertyInfo where
type AttrAllowedOps AboutWindowDocumentersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint AboutWindowDocumentersPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowDocumentersPropertyInfo = (~) [T.Text]
type AttrTransferTypeConstraint AboutWindowDocumentersPropertyInfo = (~) [T.Text]
type AttrTransferType AboutWindowDocumentersPropertyInfo = [T.Text]
type AttrGetType AboutWindowDocumentersPropertyInfo = (Maybe [T.Text])
type AttrLabel AboutWindowDocumentersPropertyInfo = "documenters"
type AttrOrigin AboutWindowDocumentersPropertyInfo = AboutWindow
attrGet = getAboutWindowDocumenters
attrSet = setAboutWindowDocumenters
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowDocumenters
attrClear = clearAboutWindowDocumenters
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.documenters"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:documenters"
})
#endif
getAboutWindowIssueUrl :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowIssueUrl :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowIssueUrl o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowIssueUrl" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"issue-url"
setAboutWindowIssueUrl :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowIssueUrl :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowIssueUrl o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"issue-url" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowIssueUrl :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowIssueUrl :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowIssueUrl Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"issue-url" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowIssueUrlPropertyInfo
instance AttrInfo AboutWindowIssueUrlPropertyInfo where
type AttrAllowedOps AboutWindowIssueUrlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowIssueUrlPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowIssueUrlPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowIssueUrlPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowIssueUrlPropertyInfo = T.Text
type AttrGetType AboutWindowIssueUrlPropertyInfo = T.Text
type AttrLabel AboutWindowIssueUrlPropertyInfo = "issue-url"
type AttrOrigin AboutWindowIssueUrlPropertyInfo = AboutWindow
attrGet = getAboutWindowIssueUrl
attrSet = setAboutWindowIssueUrl
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowIssueUrl
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.issueUrl"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:issueUrl"
})
#endif
getAboutWindowLicense :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowLicense :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowLicense o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowLicense" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"license"
setAboutWindowLicense :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowLicense :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowLicense o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"license" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowLicense :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowLicense :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowLicense Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"license" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowLicensePropertyInfo
instance AttrInfo AboutWindowLicensePropertyInfo where
type AttrAllowedOps AboutWindowLicensePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowLicensePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowLicensePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowLicensePropertyInfo = (~) T.Text
type AttrTransferType AboutWindowLicensePropertyInfo = T.Text
type AttrGetType AboutWindowLicensePropertyInfo = T.Text
type AttrLabel AboutWindowLicensePropertyInfo = "license"
type AttrOrigin AboutWindowLicensePropertyInfo = AboutWindow
attrGet = getAboutWindowLicense
attrSet = setAboutWindowLicense
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowLicense
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.license"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:license"
})
#endif
getAboutWindowLicenseType :: (MonadIO m, IsAboutWindow o) => o -> m Gtk.Enums.License
getAboutWindowLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> m License
getAboutWindowLicenseType o
obj = IO License -> m License
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO License -> m License) -> IO License -> m License
forall a b. (a -> b) -> a -> b
$ o -> String -> IO License
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"license-type"
setAboutWindowLicenseType :: (MonadIO m, IsAboutWindow o) => o -> Gtk.Enums.License -> m ()
setAboutWindowLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> License -> m ()
setAboutWindowLicenseType o
obj License
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> License -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"license-type" License
val
constructAboutWindowLicenseType :: (IsAboutWindow o, MIO.MonadIO m) => Gtk.Enums.License -> m (GValueConstruct o)
constructAboutWindowLicenseType :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
License -> m (GValueConstruct o)
constructAboutWindowLicenseType License
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> License -> IO (GValueConstruct o)
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 AboutWindowLicenseTypePropertyInfo
instance AttrInfo AboutWindowLicenseTypePropertyInfo where
type AttrAllowedOps AboutWindowLicenseTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowLicenseTypePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowLicenseTypePropertyInfo = (~) Gtk.Enums.License
type AttrTransferTypeConstraint AboutWindowLicenseTypePropertyInfo = (~) Gtk.Enums.License
type AttrTransferType AboutWindowLicenseTypePropertyInfo = Gtk.Enums.License
type AttrGetType AboutWindowLicenseTypePropertyInfo = Gtk.Enums.License
type AttrLabel AboutWindowLicenseTypePropertyInfo = "license-type"
type AttrOrigin AboutWindowLicenseTypePropertyInfo = AboutWindow
attrGet = getAboutWindowLicenseType
attrSet = setAboutWindowLicenseType
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowLicenseType
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.licenseType"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:licenseType"
})
#endif
getAboutWindowReleaseNotes :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowReleaseNotes :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowReleaseNotes o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowReleaseNotes" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"release-notes"
setAboutWindowReleaseNotes :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowReleaseNotes :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowReleaseNotes o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"release-notes" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowReleaseNotes :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowReleaseNotes :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowReleaseNotes Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"release-notes" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowReleaseNotesPropertyInfo
instance AttrInfo AboutWindowReleaseNotesPropertyInfo where
type AttrAllowedOps AboutWindowReleaseNotesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowReleaseNotesPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowReleaseNotesPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowReleaseNotesPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowReleaseNotesPropertyInfo = T.Text
type AttrGetType AboutWindowReleaseNotesPropertyInfo = T.Text
type AttrLabel AboutWindowReleaseNotesPropertyInfo = "release-notes"
type AttrOrigin AboutWindowReleaseNotesPropertyInfo = AboutWindow
attrGet = getAboutWindowReleaseNotes
attrSet = setAboutWindowReleaseNotes
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowReleaseNotes
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.releaseNotes"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:releaseNotes"
})
#endif
getAboutWindowReleaseNotesVersion :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowReleaseNotesVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowReleaseNotesVersion o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowReleaseNotesVersion" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"release-notes-version"
setAboutWindowReleaseNotesVersion :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowReleaseNotesVersion :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowReleaseNotesVersion o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"release-notes-version" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowReleaseNotesVersion :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowReleaseNotesVersion :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowReleaseNotesVersion Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"release-notes-version" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowReleaseNotesVersionPropertyInfo
instance AttrInfo AboutWindowReleaseNotesVersionPropertyInfo where
type AttrAllowedOps AboutWindowReleaseNotesVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowReleaseNotesVersionPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowReleaseNotesVersionPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowReleaseNotesVersionPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowReleaseNotesVersionPropertyInfo = T.Text
type AttrGetType AboutWindowReleaseNotesVersionPropertyInfo = T.Text
type AttrLabel AboutWindowReleaseNotesVersionPropertyInfo = "release-notes-version"
type AttrOrigin AboutWindowReleaseNotesVersionPropertyInfo = AboutWindow
attrGet = getAboutWindowReleaseNotesVersion
attrSet = setAboutWindowReleaseNotesVersion
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowReleaseNotesVersion
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.releaseNotesVersion"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:releaseNotesVersion"
})
#endif
getAboutWindowSupportUrl :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowSupportUrl :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowSupportUrl o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowSupportUrl" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"support-url"
setAboutWindowSupportUrl :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowSupportUrl :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowSupportUrl o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"support-url" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowSupportUrl :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowSupportUrl :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowSupportUrl Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"support-url" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowSupportUrlPropertyInfo
instance AttrInfo AboutWindowSupportUrlPropertyInfo where
type AttrAllowedOps AboutWindowSupportUrlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowSupportUrlPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowSupportUrlPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowSupportUrlPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowSupportUrlPropertyInfo = T.Text
type AttrGetType AboutWindowSupportUrlPropertyInfo = T.Text
type AttrLabel AboutWindowSupportUrlPropertyInfo = "support-url"
type AttrOrigin AboutWindowSupportUrlPropertyInfo = AboutWindow
attrGet = getAboutWindowSupportUrl
attrSet = setAboutWindowSupportUrl
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowSupportUrl
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.supportUrl"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:supportUrl"
})
#endif
getAboutWindowTranslatorCredits :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowTranslatorCredits :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowTranslatorCredits o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowTranslatorCredits" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"translator-credits"
setAboutWindowTranslatorCredits :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowTranslatorCredits :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowTranslatorCredits o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"translator-credits" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowTranslatorCredits :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowTranslatorCredits :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowTranslatorCredits Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"translator-credits" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowTranslatorCreditsPropertyInfo
instance AttrInfo AboutWindowTranslatorCreditsPropertyInfo where
type AttrAllowedOps AboutWindowTranslatorCreditsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowTranslatorCreditsPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowTranslatorCreditsPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowTranslatorCreditsPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowTranslatorCreditsPropertyInfo = T.Text
type AttrGetType AboutWindowTranslatorCreditsPropertyInfo = T.Text
type AttrLabel AboutWindowTranslatorCreditsPropertyInfo = "translator-credits"
type AttrOrigin AboutWindowTranslatorCreditsPropertyInfo = AboutWindow
attrGet = getAboutWindowTranslatorCredits
attrSet = setAboutWindowTranslatorCredits
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowTranslatorCredits
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.translatorCredits"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:translatorCredits"
})
#endif
getAboutWindowVersion :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowVersion o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowVersion" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"version"
setAboutWindowVersion :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowVersion :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowVersion o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"version" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowVersion :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowVersion :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowVersion Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"version" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowVersionPropertyInfo
instance AttrInfo AboutWindowVersionPropertyInfo where
type AttrAllowedOps AboutWindowVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowVersionPropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowVersionPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowVersionPropertyInfo = (~) T.Text
type AttrTransferType AboutWindowVersionPropertyInfo = T.Text
type AttrGetType AboutWindowVersionPropertyInfo = T.Text
type AttrLabel AboutWindowVersionPropertyInfo = "version"
type AttrOrigin AboutWindowVersionPropertyInfo = AboutWindow
attrGet = getAboutWindowVersion
attrSet = setAboutWindowVersion
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowVersion
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.version"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:version"
})
#endif
getAboutWindowWebsite :: (MonadIO m, IsAboutWindow o) => o -> m T.Text
getAboutWindowWebsite :: forall (m :: * -> *) o. (MonadIO m, IsAboutWindow o) => o -> m Text
getAboutWindowWebsite o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getAboutWindowWebsite" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"website"
setAboutWindowWebsite :: (MonadIO m, IsAboutWindow o) => o -> T.Text -> m ()
setAboutWindowWebsite :: forall (m :: * -> *) o.
(MonadIO m, IsAboutWindow o) =>
o -> Text -> m ()
setAboutWindowWebsite o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"website" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructAboutWindowWebsite :: (IsAboutWindow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutWindowWebsite :: forall o (m :: * -> *).
(IsAboutWindow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutWindowWebsite Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"website" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data AboutWindowWebsitePropertyInfo
instance AttrInfo AboutWindowWebsitePropertyInfo where
type AttrAllowedOps AboutWindowWebsitePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint AboutWindowWebsitePropertyInfo = IsAboutWindow
type AttrSetTypeConstraint AboutWindowWebsitePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint AboutWindowWebsitePropertyInfo = (~) T.Text
type AttrTransferType AboutWindowWebsitePropertyInfo = T.Text
type AttrGetType AboutWindowWebsitePropertyInfo = T.Text
type AttrLabel AboutWindowWebsitePropertyInfo = "website"
type AttrOrigin AboutWindowWebsitePropertyInfo = AboutWindow
attrGet = getAboutWindowWebsite
attrSet = setAboutWindowWebsite
attrTransfer _ v = do
return v
attrConstruct = constructAboutWindowWebsite
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.website"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#g:attr:website"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList AboutWindow
type instance O.AttributeList AboutWindow = AboutWindowAttributeList
type AboutWindowAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("application", Gtk.Window.WindowApplicationPropertyInfo), '("applicationIcon", AboutWindowApplicationIconPropertyInfo), '("applicationName", AboutWindowApplicationNamePropertyInfo), '("artists", AboutWindowArtistsPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("child", Gtk.Window.WindowChildPropertyInfo), '("comments", AboutWindowCommentsPropertyInfo), '("content", Adw.Window.WindowContentPropertyInfo), '("copyright", AboutWindowCopyrightPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("debugInfo", AboutWindowDebugInfoPropertyInfo), '("debugInfoFilename", AboutWindowDebugInfoFilenamePropertyInfo), '("decorated", Gtk.Window.WindowDecoratedPropertyInfo), '("defaultHeight", Gtk.Window.WindowDefaultHeightPropertyInfo), '("defaultWidget", Gtk.Window.WindowDefaultWidgetPropertyInfo), '("defaultWidth", Gtk.Window.WindowDefaultWidthPropertyInfo), '("deletable", Gtk.Window.WindowDeletablePropertyInfo), '("designers", AboutWindowDesignersPropertyInfo), '("destroyWithParent", Gtk.Window.WindowDestroyWithParentPropertyInfo), '("developerName", AboutWindowDeveloperNamePropertyInfo), '("developers", AboutWindowDevelopersPropertyInfo), '("display", Gtk.Window.WindowDisplayPropertyInfo), '("documenters", AboutWindowDocumentersPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusVisible", Gtk.Window.WindowFocusVisiblePropertyInfo), '("focusWidget", Gtk.Window.WindowFocusWidgetPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("fullscreened", Gtk.Window.WindowFullscreenedPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("handleMenubarAccel", Gtk.Window.WindowHandleMenubarAccelPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("hideOnClose", Gtk.Window.WindowHideOnClosePropertyInfo), '("iconName", Gtk.Window.WindowIconNamePropertyInfo), '("isActive", Gtk.Window.WindowIsActivePropertyInfo), '("issueUrl", AboutWindowIssueUrlPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("license", AboutWindowLicensePropertyInfo), '("licenseType", AboutWindowLicenseTypePropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maximized", Gtk.Window.WindowMaximizedPropertyInfo), '("mnemonicsVisible", Gtk.Window.WindowMnemonicsVisiblePropertyInfo), '("modal", Gtk.Window.WindowModalPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("releaseNotes", AboutWindowReleaseNotesPropertyInfo), '("releaseNotesVersion", AboutWindowReleaseNotesVersionPropertyInfo), '("resizable", Gtk.Window.WindowResizablePropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("startupId", Gtk.Window.WindowStartupIdPropertyInfo), '("supportUrl", AboutWindowSupportUrlPropertyInfo), '("title", Gtk.Window.WindowTitlePropertyInfo), '("titlebar", Gtk.Window.WindowTitlebarPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("transientFor", Gtk.Window.WindowTransientForPropertyInfo), '("translatorCredits", AboutWindowTranslatorCreditsPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("version", AboutWindowVersionPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("website", AboutWindowWebsitePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
aboutWindowApplicationIcon :: AttrLabelProxy "applicationIcon"
aboutWindowApplicationIcon = AttrLabelProxy
aboutWindowApplicationName :: AttrLabelProxy "applicationName"
aboutWindowApplicationName = AttrLabelProxy
aboutWindowArtists :: AttrLabelProxy "artists"
aboutWindowArtists = AttrLabelProxy
aboutWindowComments :: AttrLabelProxy "comments"
aboutWindowComments = AttrLabelProxy
aboutWindowCopyright :: AttrLabelProxy "copyright"
aboutWindowCopyright = AttrLabelProxy
aboutWindowDebugInfo :: AttrLabelProxy "debugInfo"
aboutWindowDebugInfo = AttrLabelProxy
aboutWindowDebugInfoFilename :: AttrLabelProxy "debugInfoFilename"
aboutWindowDebugInfoFilename = AttrLabelProxy
aboutWindowDesigners :: AttrLabelProxy "designers"
aboutWindowDesigners = AttrLabelProxy
aboutWindowDeveloperName :: AttrLabelProxy "developerName"
aboutWindowDeveloperName = AttrLabelProxy
aboutWindowDevelopers :: AttrLabelProxy "developers"
aboutWindowDevelopers = AttrLabelProxy
aboutWindowDocumenters :: AttrLabelProxy "documenters"
aboutWindowDocumenters = AttrLabelProxy
aboutWindowIssueUrl :: AttrLabelProxy "issueUrl"
aboutWindowIssueUrl = AttrLabelProxy
aboutWindowLicense :: AttrLabelProxy "license"
aboutWindowLicense = AttrLabelProxy
aboutWindowLicenseType :: AttrLabelProxy "licenseType"
aboutWindowLicenseType = AttrLabelProxy
aboutWindowReleaseNotes :: AttrLabelProxy "releaseNotes"
aboutWindowReleaseNotes = AttrLabelProxy
aboutWindowReleaseNotesVersion :: AttrLabelProxy "releaseNotesVersion"
aboutWindowReleaseNotesVersion = AttrLabelProxy
aboutWindowSupportUrl :: AttrLabelProxy "supportUrl"
aboutWindowSupportUrl = AttrLabelProxy
aboutWindowTranslatorCredits :: AttrLabelProxy "translatorCredits"
aboutWindowTranslatorCredits = AttrLabelProxy
aboutWindowVersion :: AttrLabelProxy "version"
aboutWindowVersion = AttrLabelProxy
aboutWindowWebsite :: AttrLabelProxy "website"
aboutWindowWebsite = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList AboutWindow = AboutWindowSignalList
type AboutWindowSignalList = ('[ '("activateDefault", Gtk.Window.WindowActivateDefaultSignalInfo), '("activateFocus", Gtk.Window.WindowActivateFocusSignalInfo), '("activateLink", AboutWindowActivateLinkSignalInfo), '("closeRequest", Gtk.Window.WindowCloseRequestSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("enableDebugging", Gtk.Window.WindowEnableDebuggingSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("keysChanged", Gtk.Window.WindowKeysChangedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, DK.Type)])
#endif
foreign import ccall "adw_about_window_new" adw_about_window_new ::
IO (Ptr AboutWindow)
aboutWindowNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m AboutWindow
aboutWindowNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m AboutWindow
aboutWindowNew = IO AboutWindow -> m AboutWindow
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO AboutWindow -> m AboutWindow)
-> IO AboutWindow -> m AboutWindow
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
result <- IO (Ptr AboutWindow)
adw_about_window_new
Text -> Ptr AboutWindow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowNew" Ptr AboutWindow
result
AboutWindow
result' <- ((ManagedPtr AboutWindow -> AboutWindow)
-> Ptr AboutWindow -> IO AboutWindow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr AboutWindow -> AboutWindow
AboutWindow) Ptr AboutWindow
result
AboutWindow -> IO AboutWindow
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return AboutWindow
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "adw_about_window_add_acknowledgement_section" adw_about_window_add_acknowledgement_section ::
Ptr AboutWindow ->
CString ->
Ptr CString ->
IO ()
aboutWindowAddAcknowledgementSection ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe (T.Text)
-> [T.Text]
-> m ()
aboutWindowAddAcknowledgementSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe Text -> [Text] -> m ()
aboutWindowAddAcknowledgementSection a
self Maybe Text
name [Text]
people = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeName <- case Maybe Text
name of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jName -> do
CString
jName' <- Text -> IO CString
textToCString Text
jName
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jName'
Ptr CString
people' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
people
Ptr AboutWindow -> CString -> Ptr CString -> IO ()
adw_about_window_add_acknowledgement_section Ptr AboutWindow
self' CString
maybeName Ptr CString
people'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeName
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowAddAcknowledgementSectionMethodInfo
instance (signature ~ (Maybe (T.Text) -> [T.Text] -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowAddAcknowledgementSectionMethodInfo a signature where
overloadedMethod = aboutWindowAddAcknowledgementSection
instance O.OverloadedMethodInfo AboutWindowAddAcknowledgementSectionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowAddAcknowledgementSection",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowAddAcknowledgementSection"
})
#endif
foreign import ccall "adw_about_window_add_credit_section" adw_about_window_add_credit_section ::
Ptr AboutWindow ->
CString ->
Ptr CString ->
IO ()
aboutWindowAddCreditSection ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe (T.Text)
-> [T.Text]
-> m ()
aboutWindowAddCreditSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe Text -> [Text] -> m ()
aboutWindowAddCreditSection a
self Maybe Text
name [Text]
people = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeName <- case Maybe Text
name of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jName -> do
CString
jName' <- Text -> IO CString
textToCString Text
jName
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jName'
Ptr CString
people' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
people
Ptr AboutWindow -> CString -> Ptr CString -> IO ()
adw_about_window_add_credit_section Ptr AboutWindow
self' CString
maybeName Ptr CString
people'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeName
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
people'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowAddCreditSectionMethodInfo
instance (signature ~ (Maybe (T.Text) -> [T.Text] -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowAddCreditSectionMethodInfo a signature where
overloadedMethod = aboutWindowAddCreditSection
instance O.OverloadedMethodInfo AboutWindowAddCreditSectionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowAddCreditSection",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowAddCreditSection"
})
#endif
foreign import ccall "adw_about_window_add_legal_section" adw_about_window_add_legal_section ::
Ptr AboutWindow ->
CString ->
CString ->
CUInt ->
CString ->
IO ()
aboutWindowAddLegalSection ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> Maybe (T.Text)
-> Gtk.Enums.License
-> Maybe (T.Text)
-> m ()
aboutWindowAddLegalSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> Maybe Text -> License -> Maybe Text -> m ()
aboutWindowAddLegalSection a
self Text
title Maybe Text
copyright License
licenseType Maybe Text
license = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
title' <- Text -> IO CString
textToCString Text
title
CString
maybeCopyright <- case Maybe Text
copyright of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jCopyright -> do
CString
jCopyright' <- Text -> IO CString
textToCString Text
jCopyright
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jCopyright'
let licenseType' :: CUInt
licenseType' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (License -> Int) -> License -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. License -> Int
forall a. Enum a => a -> Int
fromEnum) License
licenseType
CString
maybeLicense <- case Maybe Text
license of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jLicense -> do
CString
jLicense' <- Text -> IO CString
textToCString Text
jLicense
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jLicense'
Ptr AboutWindow -> CString -> CString -> CUInt -> CString -> IO ()
adw_about_window_add_legal_section Ptr AboutWindow
self' CString
title' CString
maybeCopyright CUInt
licenseType' CString
maybeLicense
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
title'
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeCopyright
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeLicense
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowAddLegalSectionMethodInfo
instance (signature ~ (T.Text -> Maybe (T.Text) -> Gtk.Enums.License -> Maybe (T.Text) -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowAddLegalSectionMethodInfo a signature where
overloadedMethod = aboutWindowAddLegalSection
instance O.OverloadedMethodInfo AboutWindowAddLegalSectionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowAddLegalSection",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowAddLegalSection"
})
#endif
foreign import ccall "adw_about_window_add_link" adw_about_window_add_link ::
Ptr AboutWindow ->
CString ->
CString ->
IO ()
aboutWindowAddLink ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> T.Text
-> m ()
aboutWindowAddLink :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> Text -> m ()
aboutWindowAddLink a
self Text
title Text
url = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
title' <- Text -> IO CString
textToCString Text
title
CString
url' <- Text -> IO CString
textToCString Text
url
Ptr AboutWindow -> CString -> CString -> IO ()
adw_about_window_add_link Ptr AboutWindow
self' CString
title' CString
url'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
title'
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
url'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowAddLinkMethodInfo
instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowAddLinkMethodInfo a signature where
overloadedMethod = aboutWindowAddLink
instance O.OverloadedMethodInfo AboutWindowAddLinkMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowAddLink",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowAddLink"
})
#endif
foreign import ccall "adw_about_window_get_application_icon" adw_about_window_get_application_icon ::
Ptr AboutWindow ->
IO CString
aboutWindowGetApplicationIcon ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetApplicationIcon :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetApplicationIcon a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_application_icon Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetApplicationIcon" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetApplicationIconMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetApplicationIconMethodInfo a signature where
overloadedMethod = aboutWindowGetApplicationIcon
instance O.OverloadedMethodInfo AboutWindowGetApplicationIconMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetApplicationIcon",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetApplicationIcon"
})
#endif
foreign import ccall "adw_about_window_get_application_name" adw_about_window_get_application_name ::
Ptr AboutWindow ->
IO CString
aboutWindowGetApplicationName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetApplicationName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetApplicationName a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_application_name Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetApplicationName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetApplicationNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetApplicationNameMethodInfo a signature where
overloadedMethod = aboutWindowGetApplicationName
instance O.OverloadedMethodInfo AboutWindowGetApplicationNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetApplicationName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetApplicationName"
})
#endif
foreign import ccall "adw_about_window_get_artists" adw_about_window_get_artists ::
Ptr AboutWindow ->
IO (Ptr CString)
aboutWindowGetArtists ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m (Maybe [T.Text])
aboutWindowGetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m (Maybe [Text])
aboutWindowGetArtists a
self = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
result <- Ptr AboutWindow -> IO (Ptr CString)
adw_about_window_get_artists Ptr AboutWindow
self'
Maybe [Text]
maybeResult <- Ptr CString -> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr CString
result ((Ptr CString -> IO [Text]) -> IO (Maybe [Text]))
-> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ \Ptr CString
result' -> do
[Text]
result'' <- HasCallStack => Ptr CString -> IO [Text]
Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result'
[Text] -> IO [Text]
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe [Text] -> IO (Maybe [Text])
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe [Text]
maybeResult
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetArtistsMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetArtistsMethodInfo a signature where
overloadedMethod = aboutWindowGetArtists
instance O.OverloadedMethodInfo AboutWindowGetArtistsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetArtists",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetArtists"
})
#endif
foreign import ccall "adw_about_window_get_comments" ::
Ptr AboutWindow ->
IO CString
aboutWindowGetComments ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_comments Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetComments" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetCommentsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetCommentsMethodInfo a signature where
overloadedMethod = aboutWindowGetComments
instance O.OverloadedMethodInfo AboutWindowGetCommentsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetComments",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetComments"
})
#endif
foreign import ccall "adw_about_window_get_copyright" adw_about_window_get_copyright ::
Ptr AboutWindow ->
IO CString
aboutWindowGetCopyright ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetCopyright a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_copyright Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetCopyright" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetCopyrightMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetCopyrightMethodInfo a signature where
overloadedMethod = aboutWindowGetCopyright
instance O.OverloadedMethodInfo AboutWindowGetCopyrightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetCopyright",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetCopyright"
})
#endif
foreign import ccall "adw_about_window_get_debug_info" adw_about_window_get_debug_info ::
Ptr AboutWindow ->
IO CString
aboutWindowGetDebugInfo ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetDebugInfo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetDebugInfo a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_debug_info Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetDebugInfo" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDebugInfoMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDebugInfoMethodInfo a signature where
overloadedMethod = aboutWindowGetDebugInfo
instance O.OverloadedMethodInfo AboutWindowGetDebugInfoMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDebugInfo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDebugInfo"
})
#endif
foreign import ccall "adw_about_window_get_debug_info_filename" adw_about_window_get_debug_info_filename ::
Ptr AboutWindow ->
IO CString
aboutWindowGetDebugInfoFilename ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetDebugInfoFilename :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetDebugInfoFilename a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_debug_info_filename Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetDebugInfoFilename" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDebugInfoFilenameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDebugInfoFilenameMethodInfo a signature where
overloadedMethod = aboutWindowGetDebugInfoFilename
instance O.OverloadedMethodInfo AboutWindowGetDebugInfoFilenameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDebugInfoFilename",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDebugInfoFilename"
})
#endif
foreign import ccall "adw_about_window_get_designers" adw_about_window_get_designers ::
Ptr AboutWindow ->
IO (Ptr CString)
aboutWindowGetDesigners ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m (Maybe [T.Text])
aboutWindowGetDesigners :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m (Maybe [Text])
aboutWindowGetDesigners a
self = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
result <- Ptr AboutWindow -> IO (Ptr CString)
adw_about_window_get_designers Ptr AboutWindow
self'
Maybe [Text]
maybeResult <- Ptr CString -> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr CString
result ((Ptr CString -> IO [Text]) -> IO (Maybe [Text]))
-> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ \Ptr CString
result' -> do
[Text]
result'' <- HasCallStack => Ptr CString -> IO [Text]
Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result'
[Text] -> IO [Text]
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe [Text] -> IO (Maybe [Text])
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe [Text]
maybeResult
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDesignersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDesignersMethodInfo a signature where
overloadedMethod = aboutWindowGetDesigners
instance O.OverloadedMethodInfo AboutWindowGetDesignersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDesigners",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDesigners"
})
#endif
foreign import ccall "adw_about_window_get_developer_name" adw_about_window_get_developer_name ::
Ptr AboutWindow ->
IO CString
aboutWindowGetDeveloperName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetDeveloperName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetDeveloperName a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_developer_name Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetDeveloperName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDeveloperNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDeveloperNameMethodInfo a signature where
overloadedMethod = aboutWindowGetDeveloperName
instance O.OverloadedMethodInfo AboutWindowGetDeveloperNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDeveloperName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDeveloperName"
})
#endif
foreign import ccall "adw_about_window_get_developers" adw_about_window_get_developers ::
Ptr AboutWindow ->
IO (Ptr CString)
aboutWindowGetDevelopers ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m (Maybe [T.Text])
aboutWindowGetDevelopers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m (Maybe [Text])
aboutWindowGetDevelopers a
self = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
result <- Ptr AboutWindow -> IO (Ptr CString)
adw_about_window_get_developers Ptr AboutWindow
self'
Maybe [Text]
maybeResult <- Ptr CString -> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr CString
result ((Ptr CString -> IO [Text]) -> IO (Maybe [Text]))
-> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ \Ptr CString
result' -> do
[Text]
result'' <- HasCallStack => Ptr CString -> IO [Text]
Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result'
[Text] -> IO [Text]
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe [Text] -> IO (Maybe [Text])
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe [Text]
maybeResult
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDevelopersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDevelopersMethodInfo a signature where
overloadedMethod = aboutWindowGetDevelopers
instance O.OverloadedMethodInfo AboutWindowGetDevelopersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDevelopers",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDevelopers"
})
#endif
foreign import ccall "adw_about_window_get_documenters" adw_about_window_get_documenters ::
Ptr AboutWindow ->
IO (Ptr CString)
aboutWindowGetDocumenters ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m (Maybe [T.Text])
aboutWindowGetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m (Maybe [Text])
aboutWindowGetDocumenters a
self = IO (Maybe [Text]) -> m (Maybe [Text])
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe [Text]) -> m (Maybe [Text]))
-> IO (Maybe [Text]) -> m (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
result <- Ptr AboutWindow -> IO (Ptr CString)
adw_about_window_get_documenters Ptr AboutWindow
self'
Maybe [Text]
maybeResult <- Ptr CString -> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr CString
result ((Ptr CString -> IO [Text]) -> IO (Maybe [Text]))
-> (Ptr CString -> IO [Text]) -> IO (Maybe [Text])
forall a b. (a -> b) -> a -> b
$ \Ptr CString
result' -> do
[Text]
result'' <- HasCallStack => Ptr CString -> IO [Text]
Ptr CString -> IO [Text]
unpackZeroTerminatedUTF8CArray Ptr CString
result'
[Text] -> IO [Text]
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return [Text]
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe [Text] -> IO (Maybe [Text])
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe [Text]
maybeResult
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetDocumentersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetDocumentersMethodInfo a signature where
overloadedMethod = aboutWindowGetDocumenters
instance O.OverloadedMethodInfo AboutWindowGetDocumentersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetDocumenters",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetDocumenters"
})
#endif
foreign import ccall "adw_about_window_get_issue_url" adw_about_window_get_issue_url ::
Ptr AboutWindow ->
IO CString
aboutWindowGetIssueUrl ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetIssueUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetIssueUrl a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_issue_url Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetIssueUrl" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetIssueUrlMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetIssueUrlMethodInfo a signature where
overloadedMethod = aboutWindowGetIssueUrl
instance O.OverloadedMethodInfo AboutWindowGetIssueUrlMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetIssueUrl",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetIssueUrl"
})
#endif
foreign import ccall "adw_about_window_get_license" adw_about_window_get_license ::
Ptr AboutWindow ->
IO CString
aboutWindowGetLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetLicense a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_license Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetLicense" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetLicenseMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetLicenseMethodInfo a signature where
overloadedMethod = aboutWindowGetLicense
instance O.OverloadedMethodInfo AboutWindowGetLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetLicense"
})
#endif
foreign import ccall "adw_about_window_get_license_type" adw_about_window_get_license_type ::
Ptr AboutWindow ->
IO CUInt
aboutWindowGetLicenseType ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m Gtk.Enums.License
aboutWindowGetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m License
aboutWindowGetLicenseType a
self = IO License -> m License
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO License -> m License) -> IO License -> m License
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr AboutWindow -> IO CUInt
adw_about_window_get_license_type Ptr AboutWindow
self'
let result' :: License
result' = (Int -> License
forall a. Enum a => Int -> a
toEnum (Int -> License) -> (CUInt -> Int) -> CUInt -> License
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
License -> IO License
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return License
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetLicenseTypeMethodInfo
instance (signature ~ (m Gtk.Enums.License), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetLicenseTypeMethodInfo a signature where
overloadedMethod = aboutWindowGetLicenseType
instance O.OverloadedMethodInfo AboutWindowGetLicenseTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetLicenseType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetLicenseType"
})
#endif
foreign import ccall "adw_about_window_get_release_notes" adw_about_window_get_release_notes ::
Ptr AboutWindow ->
IO CString
aboutWindowGetReleaseNotes ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetReleaseNotes :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetReleaseNotes a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_release_notes Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetReleaseNotes" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetReleaseNotesMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetReleaseNotesMethodInfo a signature where
overloadedMethod = aboutWindowGetReleaseNotes
instance O.OverloadedMethodInfo AboutWindowGetReleaseNotesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetReleaseNotes",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetReleaseNotes"
})
#endif
foreign import ccall "adw_about_window_get_release_notes_version" adw_about_window_get_release_notes_version ::
Ptr AboutWindow ->
IO CString
aboutWindowGetReleaseNotesVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetReleaseNotesVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetReleaseNotesVersion a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_release_notes_version Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetReleaseNotesVersion" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetReleaseNotesVersionMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetReleaseNotesVersionMethodInfo a signature where
overloadedMethod = aboutWindowGetReleaseNotesVersion
instance O.OverloadedMethodInfo AboutWindowGetReleaseNotesVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetReleaseNotesVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetReleaseNotesVersion"
})
#endif
foreign import ccall "adw_about_window_get_support_url" adw_about_window_get_support_url ::
Ptr AboutWindow ->
IO CString
aboutWindowGetSupportUrl ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetSupportUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetSupportUrl a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_support_url Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetSupportUrl" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetSupportUrlMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetSupportUrlMethodInfo a signature where
overloadedMethod = aboutWindowGetSupportUrl
instance O.OverloadedMethodInfo AboutWindowGetSupportUrlMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetSupportUrl",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetSupportUrl"
})
#endif
foreign import ccall "adw_about_window_get_translator_credits" adw_about_window_get_translator_credits ::
Ptr AboutWindow ->
IO CString
aboutWindowGetTranslatorCredits ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetTranslatorCredits a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_translator_credits Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetTranslatorCredits" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetTranslatorCreditsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetTranslatorCreditsMethodInfo a signature where
overloadedMethod = aboutWindowGetTranslatorCredits
instance O.OverloadedMethodInfo AboutWindowGetTranslatorCreditsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetTranslatorCredits",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetTranslatorCredits"
})
#endif
foreign import ccall "adw_about_window_get_version" adw_about_window_get_version ::
Ptr AboutWindow ->
IO CString
aboutWindowGetVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetVersion a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_version Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetVersion" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetVersionMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetVersionMethodInfo a signature where
overloadedMethod = aboutWindowGetVersion
instance O.OverloadedMethodInfo AboutWindowGetVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetVersion"
})
#endif
foreign import ccall "adw_about_window_get_website" adw_about_window_get_website ::
Ptr AboutWindow ->
IO CString
aboutWindowGetWebsite ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> m T.Text
aboutWindowGetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> m Text
aboutWindowGetWebsite a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr AboutWindow -> IO CString
adw_about_window_get_website Ptr AboutWindow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutWindowGetWebsite" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data AboutWindowGetWebsiteMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowGetWebsiteMethodInfo a signature where
overloadedMethod = aboutWindowGetWebsite
instance O.OverloadedMethodInfo AboutWindowGetWebsiteMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowGetWebsite",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowGetWebsite"
})
#endif
foreign import ccall "adw_about_window_set_application_icon" adw_about_window_set_application_icon ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetApplicationIcon ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetApplicationIcon :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetApplicationIcon a
self Text
applicationIcon = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
applicationIcon' <- Text -> IO CString
textToCString Text
applicationIcon
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_application_icon Ptr AboutWindow
self' CString
applicationIcon'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
applicationIcon'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetApplicationIconMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetApplicationIconMethodInfo a signature where
overloadedMethod = aboutWindowSetApplicationIcon
instance O.OverloadedMethodInfo AboutWindowSetApplicationIconMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetApplicationIcon",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetApplicationIcon"
})
#endif
foreign import ccall "adw_about_window_set_application_name" adw_about_window_set_application_name ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetApplicationName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetApplicationName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetApplicationName a
self Text
applicationName = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
applicationName' <- Text -> IO CString
textToCString Text
applicationName
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_application_name Ptr AboutWindow
self' CString
applicationName'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
applicationName'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetApplicationNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetApplicationNameMethodInfo a signature where
overloadedMethod = aboutWindowSetApplicationName
instance O.OverloadedMethodInfo AboutWindowSetApplicationNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetApplicationName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetApplicationName"
})
#endif
foreign import ccall "adw_about_window_set_artists" adw_about_window_set_artists ::
Ptr AboutWindow ->
Ptr CString ->
IO ()
aboutWindowSetArtists ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe ([T.Text])
-> m ()
aboutWindowSetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe [Text] -> m ()
aboutWindowSetArtists a
self Maybe [Text]
artists = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
maybeArtists <- case Maybe [Text]
artists of
Maybe [Text]
Nothing -> Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
forall a. Ptr a
nullPtr
Just [Text]
jArtists -> do
Ptr CString
jArtists' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
jArtists
Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
jArtists'
Ptr AboutWindow -> Ptr CString -> IO ()
adw_about_window_set_artists Ptr AboutWindow
self' Ptr CString
maybeArtists
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeArtists
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeArtists
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetArtistsMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetArtistsMethodInfo a signature where
overloadedMethod = aboutWindowSetArtists
instance O.OverloadedMethodInfo AboutWindowSetArtistsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetArtists",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetArtists"
})
#endif
foreign import ccall "adw_about_window_set_comments" ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetComments ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
a
self Text
comments = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
comments' <- Text -> IO CString
textToCString Text
comments
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_comments Ptr AboutWindow
self' CString
comments'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
comments'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetCommentsMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetCommentsMethodInfo a signature where
overloadedMethod = aboutWindowSetComments
instance O.OverloadedMethodInfo AboutWindowSetCommentsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetComments",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetComments"
})
#endif
foreign import ccall "adw_about_window_set_copyright" adw_about_window_set_copyright ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetCopyright ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetCopyright a
self Text
copyright = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
copyright' <- Text -> IO CString
textToCString Text
copyright
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_copyright Ptr AboutWindow
self' CString
copyright'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
copyright'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetCopyrightMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetCopyrightMethodInfo a signature where
overloadedMethod = aboutWindowSetCopyright
instance O.OverloadedMethodInfo AboutWindowSetCopyrightMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetCopyright",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetCopyright"
})
#endif
foreign import ccall "adw_about_window_set_debug_info" adw_about_window_set_debug_info ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetDebugInfo ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetDebugInfo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetDebugInfo a
self Text
debugInfo = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
debugInfo' <- Text -> IO CString
textToCString Text
debugInfo
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_debug_info Ptr AboutWindow
self' CString
debugInfo'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
debugInfo'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDebugInfoMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDebugInfoMethodInfo a signature where
overloadedMethod = aboutWindowSetDebugInfo
instance O.OverloadedMethodInfo AboutWindowSetDebugInfoMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDebugInfo",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDebugInfo"
})
#endif
foreign import ccall "adw_about_window_set_debug_info_filename" adw_about_window_set_debug_info_filename ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetDebugInfoFilename ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetDebugInfoFilename :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetDebugInfoFilename a
self Text
filename = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
filename' <- Text -> IO CString
textToCString Text
filename
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_debug_info_filename Ptr AboutWindow
self' CString
filename'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
filename'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDebugInfoFilenameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDebugInfoFilenameMethodInfo a signature where
overloadedMethod = aboutWindowSetDebugInfoFilename
instance O.OverloadedMethodInfo AboutWindowSetDebugInfoFilenameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDebugInfoFilename",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDebugInfoFilename"
})
#endif
foreign import ccall "adw_about_window_set_designers" adw_about_window_set_designers ::
Ptr AboutWindow ->
Ptr CString ->
IO ()
aboutWindowSetDesigners ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe ([T.Text])
-> m ()
aboutWindowSetDesigners :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe [Text] -> m ()
aboutWindowSetDesigners a
self Maybe [Text]
designers = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
maybeDesigners <- case Maybe [Text]
designers of
Maybe [Text]
Nothing -> Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
forall a. Ptr a
nullPtr
Just [Text]
jDesigners -> do
Ptr CString
jDesigners' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
jDesigners
Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
jDesigners'
Ptr AboutWindow -> Ptr CString -> IO ()
adw_about_window_set_designers Ptr AboutWindow
self' Ptr CString
maybeDesigners
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDesigners
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDesigners
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDesignersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDesignersMethodInfo a signature where
overloadedMethod = aboutWindowSetDesigners
instance O.OverloadedMethodInfo AboutWindowSetDesignersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDesigners",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDesigners"
})
#endif
foreign import ccall "adw_about_window_set_developer_name" adw_about_window_set_developer_name ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetDeveloperName ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetDeveloperName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetDeveloperName a
self Text
developerName = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
developerName' <- Text -> IO CString
textToCString Text
developerName
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_developer_name Ptr AboutWindow
self' CString
developerName'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
developerName'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDeveloperNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDeveloperNameMethodInfo a signature where
overloadedMethod = aboutWindowSetDeveloperName
instance O.OverloadedMethodInfo AboutWindowSetDeveloperNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDeveloperName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDeveloperName"
})
#endif
foreign import ccall "adw_about_window_set_developers" adw_about_window_set_developers ::
Ptr AboutWindow ->
Ptr CString ->
IO ()
aboutWindowSetDevelopers ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe ([T.Text])
-> m ()
aboutWindowSetDevelopers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe [Text] -> m ()
aboutWindowSetDevelopers a
self Maybe [Text]
developers = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
maybeDevelopers <- case Maybe [Text]
developers of
Maybe [Text]
Nothing -> Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
forall a. Ptr a
nullPtr
Just [Text]
jDevelopers -> do
Ptr CString
jDevelopers' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
jDevelopers
Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
jDevelopers'
Ptr AboutWindow -> Ptr CString -> IO ()
adw_about_window_set_developers Ptr AboutWindow
self' Ptr CString
maybeDevelopers
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDevelopers
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDevelopers
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDevelopersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDevelopersMethodInfo a signature where
overloadedMethod = aboutWindowSetDevelopers
instance O.OverloadedMethodInfo AboutWindowSetDevelopersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDevelopers",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDevelopers"
})
#endif
foreign import ccall "adw_about_window_set_documenters" adw_about_window_set_documenters ::
Ptr AboutWindow ->
Ptr CString ->
IO ()
aboutWindowSetDocumenters ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Maybe ([T.Text])
-> m ()
aboutWindowSetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Maybe [Text] -> m ()
aboutWindowSetDocumenters a
self Maybe [Text]
documenters = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CString
maybeDocumenters <- case Maybe [Text]
documenters of
Maybe [Text]
Nothing -> Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
forall a. Ptr a
nullPtr
Just [Text]
jDocumenters -> do
Ptr CString
jDocumenters' <- [Text] -> IO (Ptr CString)
packZeroTerminatedUTF8CArray [Text]
jDocumenters
Ptr CString -> IO (Ptr CString)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CString
jDocumenters'
Ptr AboutWindow -> Ptr CString -> IO ()
adw_about_window_set_documenters Ptr AboutWindow
self' Ptr CString
maybeDocumenters
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
(CString -> IO ()) -> Ptr CString -> IO ()
forall a b. (Ptr a -> IO b) -> Ptr (Ptr a) -> IO ()
mapZeroTerminatedCArray CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDocumenters
Ptr CString -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CString
maybeDocumenters
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetDocumentersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetDocumentersMethodInfo a signature where
overloadedMethod = aboutWindowSetDocumenters
instance O.OverloadedMethodInfo AboutWindowSetDocumentersMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetDocumenters",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetDocumenters"
})
#endif
foreign import ccall "adw_about_window_set_issue_url" adw_about_window_set_issue_url ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetIssueUrl ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetIssueUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetIssueUrl a
self Text
issueUrl = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
issueUrl' <- Text -> IO CString
textToCString Text
issueUrl
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_issue_url Ptr AboutWindow
self' CString
issueUrl'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
issueUrl'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetIssueUrlMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetIssueUrlMethodInfo a signature where
overloadedMethod = aboutWindowSetIssueUrl
instance O.OverloadedMethodInfo AboutWindowSetIssueUrlMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetIssueUrl",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetIssueUrl"
})
#endif
foreign import ccall "adw_about_window_set_license" adw_about_window_set_license ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetLicense ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetLicense a
self Text
license = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
license' <- Text -> IO CString
textToCString Text
license
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_license Ptr AboutWindow
self' CString
license'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
license'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetLicenseMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetLicenseMethodInfo a signature where
overloadedMethod = aboutWindowSetLicense
instance O.OverloadedMethodInfo AboutWindowSetLicenseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetLicense",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetLicense"
})
#endif
foreign import ccall "adw_about_window_set_license_type" adw_about_window_set_license_type ::
Ptr AboutWindow ->
CUInt ->
IO ()
aboutWindowSetLicenseType ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> Gtk.Enums.License
-> m ()
aboutWindowSetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> License -> m ()
aboutWindowSetLicenseType a
self License
licenseType = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let licenseType' :: CUInt
licenseType' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (License -> Int) -> License -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. License -> Int
forall a. Enum a => a -> Int
fromEnum) License
licenseType
Ptr AboutWindow -> CUInt -> IO ()
adw_about_window_set_license_type Ptr AboutWindow
self' CUInt
licenseType'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetLicenseTypeMethodInfo
instance (signature ~ (Gtk.Enums.License -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetLicenseTypeMethodInfo a signature where
overloadedMethod = aboutWindowSetLicenseType
instance O.OverloadedMethodInfo AboutWindowSetLicenseTypeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetLicenseType",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetLicenseType"
})
#endif
foreign import ccall "adw_about_window_set_release_notes" adw_about_window_set_release_notes ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetReleaseNotes ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetReleaseNotes :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetReleaseNotes a
self Text
releaseNotes = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
releaseNotes' <- Text -> IO CString
textToCString Text
releaseNotes
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_release_notes Ptr AboutWindow
self' CString
releaseNotes'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
releaseNotes'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetReleaseNotesMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetReleaseNotesMethodInfo a signature where
overloadedMethod = aboutWindowSetReleaseNotes
instance O.OverloadedMethodInfo AboutWindowSetReleaseNotesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetReleaseNotes",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetReleaseNotes"
})
#endif
foreign import ccall "adw_about_window_set_release_notes_version" adw_about_window_set_release_notes_version ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetReleaseNotesVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetReleaseNotesVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetReleaseNotesVersion a
self Text
version = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
version' <- Text -> IO CString
textToCString Text
version
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_release_notes_version Ptr AboutWindow
self' CString
version'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
version'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetReleaseNotesVersionMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetReleaseNotesVersionMethodInfo a signature where
overloadedMethod = aboutWindowSetReleaseNotesVersion
instance O.OverloadedMethodInfo AboutWindowSetReleaseNotesVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetReleaseNotesVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetReleaseNotesVersion"
})
#endif
foreign import ccall "adw_about_window_set_support_url" adw_about_window_set_support_url ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetSupportUrl ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetSupportUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetSupportUrl a
self Text
supportUrl = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
supportUrl' <- Text -> IO CString
textToCString Text
supportUrl
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_support_url Ptr AboutWindow
self' CString
supportUrl'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
supportUrl'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetSupportUrlMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetSupportUrlMethodInfo a signature where
overloadedMethod = aboutWindowSetSupportUrl
instance O.OverloadedMethodInfo AboutWindowSetSupportUrlMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetSupportUrl",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetSupportUrl"
})
#endif
foreign import ccall "adw_about_window_set_translator_credits" adw_about_window_set_translator_credits ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetTranslatorCredits ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetTranslatorCredits a
self Text
translatorCredits = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
translatorCredits' <- Text -> IO CString
textToCString Text
translatorCredits
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_translator_credits Ptr AboutWindow
self' CString
translatorCredits'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
translatorCredits'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetTranslatorCreditsMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetTranslatorCreditsMethodInfo a signature where
overloadedMethod = aboutWindowSetTranslatorCredits
instance O.OverloadedMethodInfo AboutWindowSetTranslatorCreditsMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetTranslatorCredits",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetTranslatorCredits"
})
#endif
foreign import ccall "adw_about_window_set_version" adw_about_window_set_version ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetVersion ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetVersion a
self Text
version = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
version' <- Text -> IO CString
textToCString Text
version
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_version Ptr AboutWindow
self' CString
version'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
version'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetVersionMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetVersionMethodInfo a signature where
overloadedMethod = aboutWindowSetVersion
instance O.OverloadedMethodInfo AboutWindowSetVersionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetVersion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetVersion"
})
#endif
foreign import ccall "adw_about_window_set_website" adw_about_window_set_website ::
Ptr AboutWindow ->
CString ->
IO ()
aboutWindowSetWebsite ::
(B.CallStack.HasCallStack, MonadIO m, IsAboutWindow a) =>
a
-> T.Text
-> m ()
aboutWindowSetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutWindow a) =>
a -> Text -> m ()
aboutWindowSetWebsite a
self Text
website = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr AboutWindow
self' <- a -> IO (Ptr AboutWindow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
website' <- Text -> IO CString
textToCString Text
website
Ptr AboutWindow -> CString -> IO ()
adw_about_window_set_website Ptr AboutWindow
self' CString
website'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
website'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data AboutWindowSetWebsiteMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutWindow a) => O.OverloadedMethod AboutWindowSetWebsiteMethodInfo a signature where
overloadedMethod = aboutWindowSetWebsite
instance O.OverloadedMethodInfo AboutWindowSetWebsiteMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.AboutWindow.aboutWindowSetWebsite",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.6/docs/GI-Adw-Objects-AboutWindow.html#v:aboutWindowSetWebsite"
})
#endif