{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}


-- | Copyright  : Will Thompson and Iñaki García Etxebarria
-- License    : LGPL-2.1
-- Maintainer : Iñaki García Etxebarria
-- 
-- A dialog showing information about the application.
-- 
-- \<picture>
--   \<source srcset=\"about-dialog-dark.png\" media=\"(prefers-color-scheme: dark)\">
--   \<img src=\"about-dialog.png\" alt=\"about-dialog\">
-- \<\/picture>
-- 
-- an about dialog is typically opened when the user activates the @About …@
-- item in the application\'s primary menu. All parts of the dialog are optional.
-- 
-- == Main page
-- 
-- @AdwAboutDialog@ prominently displays the application\'s icon, name, developer
-- name and version. They can be set with the [property/@aboutDialog@/:application-icon],
-- [property/@aboutDialog@/:application-name],
-- [property/@aboutDialog@/:developer-name] and [property/@aboutDialog@/:version]
-- respectively.
-- 
-- == What\'s New
-- 
-- @AdwAboutDialog@ provides a way for applications to display their release
-- notes, set with the [property/@aboutDialog@/:release-notes] property.
-- 
-- Release notes are formatted the same way as
-- <https://freedesktop.org/software/appstream/docs/chap-Metadata.html#tag-description AppStream descriptions>.
-- 
-- The supported formatting options are:
-- 
-- * Paragraph (@\<p>@)
-- * Ordered list (@\<ol>@), with list items (@\<li>@)
-- * Unordered list (@\<ul>@), with list items (@\<li>@)
-- 
-- Within paragraphs and list items, emphasis (@\<em>@) and inline code
-- (@\<code>@) text styles are supported. The emphasis is rendered in italic,
-- while inline code is shown in a monospaced font.
-- 
-- Any text outside paragraphs or list items is ignored.
-- 
-- Nested lists are not supported.
-- 
-- Only one version can be shown at a time. By default, the displayed version
-- number matches [property/@aboutDialog@/:version]. Use
-- [property/@aboutDialog@/:release-notes-version] to override it.
-- 
-- == Details
-- 
-- The Details page displays the application comments and links.
-- 
-- The comments can be set with the [property/@aboutDialog@/:comments] property.
-- Unlike [AboutDialog:comments]("GI.Gtk.Objects.AboutDialog#g:attr:comments"), this string can be long and
-- detailed. It can also contain links and Pango markup.
-- 
-- To set the application website, use [property/@aboutDialog@/:website].
-- To add extra links below the website, use [method/@aboutDialog@/.add_link].
-- 
-- If the Details page doesn\'t have any other content besides website, the
-- website will be displayed on the main page instead.
-- 
-- == Troubleshooting
-- 
-- @AdwAboutDialog@ displays the following two links on the main page:
-- 
-- * Support Questions, set with the [property/@aboutDialog@/:support-url] property,
-- * Report an Issue, set with the [property/@aboutDialog@/:issue-url] property.
-- 
-- Additionally, applications can provide debugging information. It will be
-- shown separately on the Troubleshooting page. Use the
-- [property/@aboutDialog@/:debug-info] property to specify it.
-- 
-- It\'s intended to be attached to issue reports when reporting issues against
-- the application. As such, it cannot contain markup or links.
-- 
-- @AdwAboutDialog@ provides a quick way to save debug information to a file.
-- When saving, [property/@aboutDialog@/:debug-info-filename] would be used as
-- the suggested filename.
-- 
-- == Credits and Acknowledgements
-- 
-- The Credits page has the following default sections:
-- 
-- * Developers, set with the [property/@aboutDialog@/:developers] property,
-- * Designers, set with the [property/@aboutDialog@/:designers] property,
-- * Artists, set with the [property/@aboutDialog@/:artists] property,
-- * Documenters, set with the [property/@aboutDialog@/:documenters] property,
-- * Translators, set with the [property/@aboutDialog@/:translator-credits] property.
-- 
-- When setting translator credits, use the strings @\"translator-credits\"@ or
-- @\"translator_credits\"@ and mark them as translatable.
-- 
-- The default sections that don\'t contain any names won\'t be displayed.
-- 
-- The Credits page can also contain an arbitrary number of extra sections below
-- the default ones. Use [method/@aboutDialog@/.add_credit_section] to add them.
-- 
-- The Acknowledgements page can be used to acknowledge additional people and
-- organizations for their non-development contributions. Use
-- [method/@aboutDialog@/.add_acknowledgement_section] to add sections to it. For
-- example, it can be used to list backers in a crowdfunded project or to give
-- special thanks.
-- 
-- Each of the people or organizations can have an email address or a website
-- specified. To add a email address, use a string like
-- @Edgar Allan Poe \<edgar\@poe.com>@. To specify a website with a title, use a
-- string like @The GNOME Project https:\/\/www.gnome.org@:
-- 
-- \<picture>
--   \<source srcset=\"about-dialog-credits-dark.png\" media=\"(prefers-color-scheme: dark)\">
--   \<img src=\"about-dialog-credits.png\" alt=\"about-dialog-credits\">
-- \<\/picture>
-- 
-- == Legal
-- 
-- The Legal page displays the copyright and licensing information for the
-- application and other modules.
-- 
-- The copyright string is set with the [property/@aboutDialog@/:copyright]
-- property and should be a short string of one or two lines, for example:
-- @© 2022 Example@.
-- 
-- Licensing information can be quickly set from a list of known licenses with
-- the [property/@aboutDialog@/:license-type] property. If the application\'s
-- license is not in the list, [property/@aboutDialog@/:license] can be used
-- instead.
-- 
-- To add information about other modules, such as application dependencies or
-- data, use [method/@aboutDialog@/.add_legal_section].
-- 
-- == Constructing
-- 
-- To make constructing an @AdwAboutDialog@ as convenient as possible, you can
-- use the function [func/@showAboutDialog@/] which constructs and shows a
-- dialog.
-- 
-- 
-- === /c code/
-- >static void
-- >show_about (GtkApplication *app)
-- >{
-- >  const char *developers[] = {
-- >    "Angela Avery",
-- >    NULL
-- >  };
-- >
-- >  const char *designers[] = {
-- >    "GNOME Design Team",
-- >    NULL
-- >  };
-- >
-- >  adw_show_about_dialog (GTK_WIDGET (gtk_application_get_active_window (app)),
-- >                         "application-name", _("Example"),
-- >                         "application-icon", "org.example.App",
-- >                         "version", "1.2.3",
-- >                         "copyright", "© 2022 Angela Avery",
-- >                         "issue-url", "https://gitlab.gnome.org/example/example/-/issues/new",
-- >                         "license-type", GTK_LICENSE_GPL_3_0,
-- >                         "developers", developers,
-- >                         "designers", designers,
-- >                         "translator-credits", _("translator-credits"),
-- >                         NULL);
-- >}
-- 
-- 
-- == CSS nodes
-- 
-- @AdwAboutDialog@ has a main CSS node with the name @dialog@ and the
-- style class @.about@.
-- 
-- /Since: 1.5/

#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif

module GI.Adw.Objects.AboutDialog
    ( 

-- * Exported types
    AboutDialog(..)                         ,
    IsAboutDialog                           ,
    toAboutDialog                           ,


 -- * Methods
-- | 
-- 
--  === __Click to display all available methods, including inherited ones__
-- ==== Methods
-- [actionSetEnabled]("GI.Gtk.Objects.Widget#g:method:actionSetEnabled"), [activate]("GI.Gtk.Objects.Widget#g:method:activate"), [activateAction]("GI.Gtk.Objects.Widget#g:method:activateAction"), [activateDefault]("GI.Gtk.Objects.Widget#g:method:activateDefault"), [addAcknowledgementSection]("GI.Adw.Objects.AboutDialog#g:method:addAcknowledgementSection"), [addBreakpoint]("GI.Adw.Objects.Dialog#g:method:addBreakpoint"), [addController]("GI.Gtk.Objects.Widget#g:method:addController"), [addCreditSection]("GI.Adw.Objects.AboutDialog#g:method:addCreditSection"), [addCssClass]("GI.Gtk.Objects.Widget#g:method:addCssClass"), [addLegalSection]("GI.Adw.Objects.AboutDialog#g:method:addLegalSection"), [addLink]("GI.Adw.Objects.AboutDialog#g:method:addLink"), [addMnemonicLabel]("GI.Gtk.Objects.Widget#g:method:addMnemonicLabel"), [addTickCallback]("GI.Gtk.Objects.Widget#g:method:addTickCallback"), [allocate]("GI.Gtk.Objects.Widget#g:method:allocate"), [announce]("GI.Gtk.Interfaces.Accessible#g:method:announce"), [bindProperty]("GI.GObject.Objects.Object#g:method:bindProperty"), [bindPropertyFull]("GI.GObject.Objects.Object#g:method:bindPropertyFull"), [childFocus]("GI.Gtk.Objects.Widget#g:method:childFocus"), [close]("GI.Adw.Objects.Dialog#g:method:close"), [computeBounds]("GI.Gtk.Objects.Widget#g:method:computeBounds"), [computeExpand]("GI.Gtk.Objects.Widget#g:method:computeExpand"), [computePoint]("GI.Gtk.Objects.Widget#g:method:computePoint"), [computeTransform]("GI.Gtk.Objects.Widget#g:method:computeTransform"), [contains]("GI.Gtk.Objects.Widget#g:method:contains"), [createPangoContext]("GI.Gtk.Objects.Widget#g:method:createPangoContext"), [createPangoLayout]("GI.Gtk.Objects.Widget#g:method:createPangoLayout"), [disposeTemplate]("GI.Gtk.Objects.Widget#g:method:disposeTemplate"), [dragCheckThreshold]("GI.Gtk.Objects.Widget#g:method:dragCheckThreshold"), [errorBell]("GI.Gtk.Objects.Widget#g:method:errorBell"), [forceClose]("GI.Adw.Objects.Dialog#g:method:forceClose"), [forceFloating]("GI.GObject.Objects.Object#g:method:forceFloating"), [freezeNotify]("GI.GObject.Objects.Object#g:method:freezeNotify"), [getv]("GI.GObject.Objects.Object#g:method:getv"), [grabFocus]("GI.Gtk.Objects.Widget#g:method:grabFocus"), [hasCssClass]("GI.Gtk.Objects.Widget#g:method:hasCssClass"), [hasDefault]("GI.Gtk.Objects.Widget#g:method:hasDefault"), [hasFocus]("GI.Gtk.Objects.Widget#g:method:hasFocus"), [hasVisibleFocus]("GI.Gtk.Objects.Widget#g:method:hasVisibleFocus"), [hide]("GI.Gtk.Objects.Widget#g:method:hide"), [inDestruction]("GI.Gtk.Objects.Widget#g:method:inDestruction"), [initTemplate]("GI.Gtk.Objects.Widget#g:method:initTemplate"), [insertActionGroup]("GI.Gtk.Objects.Widget#g:method:insertActionGroup"), [insertAfter]("GI.Gtk.Objects.Widget#g:method:insertAfter"), [insertBefore]("GI.Gtk.Objects.Widget#g:method:insertBefore"), [isAncestor]("GI.Gtk.Objects.Widget#g:method:isAncestor"), [isDrawable]("GI.Gtk.Objects.Widget#g:method:isDrawable"), [isFloating]("GI.GObject.Objects.Object#g:method:isFloating"), [isFocus]("GI.Gtk.Objects.Widget#g:method:isFocus"), [isSensitive]("GI.Gtk.Objects.Widget#g:method:isSensitive"), [isVisible]("GI.Gtk.Objects.Widget#g:method:isVisible"), [keynavFailed]("GI.Gtk.Objects.Widget#g:method:keynavFailed"), [listMnemonicLabels]("GI.Gtk.Objects.Widget#g:method:listMnemonicLabels"), [map]("GI.Gtk.Objects.Widget#g:method:map"), [measure]("GI.Gtk.Objects.Widget#g:method:measure"), [mnemonicActivate]("GI.Gtk.Objects.Widget#g:method:mnemonicActivate"), [notify]("GI.GObject.Objects.Object#g:method:notify"), [notifyByPspec]("GI.GObject.Objects.Object#g:method:notifyByPspec"), [observeChildren]("GI.Gtk.Objects.Widget#g:method:observeChildren"), [observeControllers]("GI.Gtk.Objects.Widget#g:method:observeControllers"), [pick]("GI.Gtk.Objects.Widget#g:method:pick"), [present]("GI.Adw.Objects.Dialog#g:method:present"), [queueAllocate]("GI.Gtk.Objects.Widget#g:method:queueAllocate"), [queueDraw]("GI.Gtk.Objects.Widget#g:method:queueDraw"), [queueResize]("GI.Gtk.Objects.Widget#g:method:queueResize"), [realize]("GI.Gtk.Objects.Widget#g:method:realize"), [ref]("GI.GObject.Objects.Object#g:method:ref"), [refSink]("GI.GObject.Objects.Object#g:method:refSink"), [removeController]("GI.Gtk.Objects.Widget#g:method:removeController"), [removeCssClass]("GI.Gtk.Objects.Widget#g:method:removeCssClass"), [removeMnemonicLabel]("GI.Gtk.Objects.Widget#g:method:removeMnemonicLabel"), [removeTickCallback]("GI.Gtk.Objects.Widget#g:method:removeTickCallback"), [resetProperty]("GI.Gtk.Interfaces.Accessible#g:method:resetProperty"), [resetRelation]("GI.Gtk.Interfaces.Accessible#g:method:resetRelation"), [resetState]("GI.Gtk.Interfaces.Accessible#g:method:resetState"), [runDispose]("GI.GObject.Objects.Object#g:method:runDispose"), [shouldLayout]("GI.Gtk.Objects.Widget#g:method:shouldLayout"), [show]("GI.Gtk.Objects.Widget#g:method:show"), [sizeAllocate]("GI.Gtk.Objects.Widget#g:method:sizeAllocate"), [snapshotChild]("GI.Gtk.Objects.Widget#g:method:snapshotChild"), [stealData]("GI.GObject.Objects.Object#g:method:stealData"), [stealQdata]("GI.GObject.Objects.Object#g:method:stealQdata"), [thawNotify]("GI.GObject.Objects.Object#g:method:thawNotify"), [translateCoordinates]("GI.Gtk.Objects.Widget#g:method:translateCoordinates"), [triggerTooltipQuery]("GI.Gtk.Objects.Widget#g:method:triggerTooltipQuery"), [unmap]("GI.Gtk.Objects.Widget#g:method:unmap"), [unparent]("GI.Gtk.Objects.Widget#g:method:unparent"), [unrealize]("GI.Gtk.Objects.Widget#g:method:unrealize"), [unref]("GI.GObject.Objects.Object#g:method:unref"), [unsetStateFlags]("GI.Gtk.Objects.Widget#g:method:unsetStateFlags"), [updateNextAccessibleSibling]("GI.Gtk.Interfaces.Accessible#g:method:updateNextAccessibleSibling"), [updateProperty]("GI.Gtk.Interfaces.Accessible#g:method:updateProperty"), [updateRelation]("GI.Gtk.Interfaces.Accessible#g:method:updateRelation"), [updateState]("GI.Gtk.Interfaces.Accessible#g:method:updateState"), [watchClosure]("GI.GObject.Objects.Object#g:method:watchClosure").
-- 
-- ==== Getters
-- [getAccessibleParent]("GI.Gtk.Interfaces.Accessible#g:method:getAccessibleParent"), [getAccessibleRole]("GI.Gtk.Interfaces.Accessible#g:method:getAccessibleRole"), [getAllocatedBaseline]("GI.Gtk.Objects.Widget#g:method:getAllocatedBaseline"), [getAllocatedHeight]("GI.Gtk.Objects.Widget#g:method:getAllocatedHeight"), [getAllocatedWidth]("GI.Gtk.Objects.Widget#g:method:getAllocatedWidth"), [getAllocation]("GI.Gtk.Objects.Widget#g:method:getAllocation"), [getAncestor]("GI.Gtk.Objects.Widget#g:method:getAncestor"), [getApplicationIcon]("GI.Adw.Objects.AboutDialog#g:method:getApplicationIcon"), [getApplicationName]("GI.Adw.Objects.AboutDialog#g:method:getApplicationName"), [getArtists]("GI.Adw.Objects.AboutDialog#g:method:getArtists"), [getAtContext]("GI.Gtk.Interfaces.Accessible#g:method:getAtContext"), [getBaseline]("GI.Gtk.Objects.Widget#g:method:getBaseline"), [getBounds]("GI.Gtk.Interfaces.Accessible#g:method:getBounds"), [getBuildableId]("GI.Gtk.Interfaces.Buildable#g:method:getBuildableId"), [getCanClose]("GI.Adw.Objects.Dialog#g:method:getCanClose"), [getCanFocus]("GI.Gtk.Objects.Widget#g:method:getCanFocus"), [getCanTarget]("GI.Gtk.Objects.Widget#g:method:getCanTarget"), [getChild]("GI.Adw.Objects.Dialog#g:method:getChild"), [getChildVisible]("GI.Gtk.Objects.Widget#g:method:getChildVisible"), [getClipboard]("GI.Gtk.Objects.Widget#g:method:getClipboard"), [getColor]("GI.Gtk.Objects.Widget#g:method:getColor"), [getComments]("GI.Adw.Objects.AboutDialog#g:method:getComments"), [getContentHeight]("GI.Adw.Objects.Dialog#g:method:getContentHeight"), [getContentWidth]("GI.Adw.Objects.Dialog#g:method:getContentWidth"), [getCopyright]("GI.Adw.Objects.AboutDialog#g:method:getCopyright"), [getCssClasses]("GI.Gtk.Objects.Widget#g:method:getCssClasses"), [getCssName]("GI.Gtk.Objects.Widget#g:method:getCssName"), [getCurrentBreakpoint]("GI.Adw.Objects.Dialog#g:method:getCurrentBreakpoint"), [getCursor]("GI.Gtk.Objects.Widget#g:method:getCursor"), [getData]("GI.GObject.Objects.Object#g:method:getData"), [getDebugInfo]("GI.Adw.Objects.AboutDialog#g:method:getDebugInfo"), [getDebugInfoFilename]("GI.Adw.Objects.AboutDialog#g:method:getDebugInfoFilename"), [getDefaultWidget]("GI.Adw.Objects.Dialog#g:method:getDefaultWidget"), [getDesigners]("GI.Adw.Objects.AboutDialog#g:method:getDesigners"), [getDeveloperName]("GI.Adw.Objects.AboutDialog#g:method:getDeveloperName"), [getDevelopers]("GI.Adw.Objects.AboutDialog#g:method:getDevelopers"), [getDirection]("GI.Gtk.Objects.Widget#g:method:getDirection"), [getDisplay]("GI.Gtk.Objects.Widget#g:method:getDisplay"), [getDocumenters]("GI.Adw.Objects.AboutDialog#g:method:getDocumenters"), [getFirstAccessibleChild]("GI.Gtk.Interfaces.Accessible#g:method:getFirstAccessibleChild"), [getFirstChild]("GI.Gtk.Objects.Widget#g:method:getFirstChild"), [getFocus]("GI.Adw.Objects.Dialog#g:method:getFocus"), [getFocusChild]("GI.Gtk.Objects.Widget#g:method:getFocusChild"), [getFocusOnClick]("GI.Gtk.Objects.Widget#g:method:getFocusOnClick"), [getFocusable]("GI.Gtk.Objects.Widget#g:method:getFocusable"), [getFollowsContentSize]("GI.Adw.Objects.Dialog#g:method:getFollowsContentSize"), [getFontMap]("GI.Gtk.Objects.Widget#g:method:getFontMap"), [getFontOptions]("GI.Gtk.Objects.Widget#g:method:getFontOptions"), [getFrameClock]("GI.Gtk.Objects.Widget#g:method:getFrameClock"), [getHalign]("GI.Gtk.Objects.Widget#g:method:getHalign"), [getHasTooltip]("GI.Gtk.Objects.Widget#g:method:getHasTooltip"), [getHeight]("GI.Gtk.Objects.Widget#g:method:getHeight"), [getHexpand]("GI.Gtk.Objects.Widget#g:method:getHexpand"), [getHexpandSet]("GI.Gtk.Objects.Widget#g:method:getHexpandSet"), [getIssueUrl]("GI.Adw.Objects.AboutDialog#g:method:getIssueUrl"), [getLastChild]("GI.Gtk.Objects.Widget#g:method:getLastChild"), [getLayoutManager]("GI.Gtk.Objects.Widget#g:method:getLayoutManager"), [getLicense]("GI.Adw.Objects.AboutDialog#g:method:getLicense"), [getLicenseType]("GI.Adw.Objects.AboutDialog#g:method:getLicenseType"), [getMapped]("GI.Gtk.Objects.Widget#g:method:getMapped"), [getMarginBottom]("GI.Gtk.Objects.Widget#g:method:getMarginBottom"), [getMarginEnd]("GI.Gtk.Objects.Widget#g:method:getMarginEnd"), [getMarginStart]("GI.Gtk.Objects.Widget#g:method:getMarginStart"), [getMarginTop]("GI.Gtk.Objects.Widget#g:method:getMarginTop"), [getName]("GI.Gtk.Objects.Widget#g:method:getName"), [getNative]("GI.Gtk.Objects.Widget#g:method:getNative"), [getNextAccessibleSibling]("GI.Gtk.Interfaces.Accessible#g:method:getNextAccessibleSibling"), [getNextSibling]("GI.Gtk.Objects.Widget#g:method:getNextSibling"), [getOpacity]("GI.Gtk.Objects.Widget#g:method:getOpacity"), [getOverflow]("GI.Gtk.Objects.Widget#g:method:getOverflow"), [getPangoContext]("GI.Gtk.Objects.Widget#g:method:getPangoContext"), [getParent]("GI.Gtk.Objects.Widget#g:method:getParent"), [getPlatformState]("GI.Gtk.Interfaces.Accessible#g:method:getPlatformState"), [getPreferredSize]("GI.Gtk.Objects.Widget#g:method:getPreferredSize"), [getPresentationMode]("GI.Adw.Objects.Dialog#g:method:getPresentationMode"), [getPrevSibling]("GI.Gtk.Objects.Widget#g:method:getPrevSibling"), [getPrimaryClipboard]("GI.Gtk.Objects.Widget#g:method:getPrimaryClipboard"), [getProperty]("GI.GObject.Objects.Object#g:method:getProperty"), [getQdata]("GI.GObject.Objects.Object#g:method:getQdata"), [getRealized]("GI.Gtk.Objects.Widget#g:method:getRealized"), [getReceivesDefault]("GI.Gtk.Objects.Widget#g:method:getReceivesDefault"), [getReleaseNotes]("GI.Adw.Objects.AboutDialog#g:method:getReleaseNotes"), [getReleaseNotesVersion]("GI.Adw.Objects.AboutDialog#g:method:getReleaseNotesVersion"), [getRequestMode]("GI.Gtk.Objects.Widget#g:method:getRequestMode"), [getRoot]("GI.Gtk.Objects.Widget#g:method:getRoot"), [getScaleFactor]("GI.Gtk.Objects.Widget#g:method:getScaleFactor"), [getSensitive]("GI.Gtk.Objects.Widget#g:method:getSensitive"), [getSettings]("GI.Gtk.Objects.Widget#g:method:getSettings"), [getSize]("GI.Gtk.Objects.Widget#g:method:getSize"), [getSizeRequest]("GI.Gtk.Objects.Widget#g:method:getSizeRequest"), [getStateFlags]("GI.Gtk.Objects.Widget#g:method:getStateFlags"), [getStyleContext]("GI.Gtk.Objects.Widget#g:method:getStyleContext"), [getSupportUrl]("GI.Adw.Objects.AboutDialog#g:method:getSupportUrl"), [getTemplateChild]("GI.Gtk.Objects.Widget#g:method:getTemplateChild"), [getTitle]("GI.Adw.Objects.Dialog#g:method:getTitle"), [getTooltipMarkup]("GI.Gtk.Objects.Widget#g:method:getTooltipMarkup"), [getTooltipText]("GI.Gtk.Objects.Widget#g:method:getTooltipText"), [getTranslatorCredits]("GI.Adw.Objects.AboutDialog#g:method:getTranslatorCredits"), [getValign]("GI.Gtk.Objects.Widget#g:method:getValign"), [getVersion]("GI.Adw.Objects.AboutDialog#g:method:getVersion"), [getVexpand]("GI.Gtk.Objects.Widget#g:method:getVexpand"), [getVexpandSet]("GI.Gtk.Objects.Widget#g:method:getVexpandSet"), [getVisible]("GI.Gtk.Objects.Widget#g:method:getVisible"), [getWebsite]("GI.Adw.Objects.AboutDialog#g:method:getWebsite"), [getWidth]("GI.Gtk.Objects.Widget#g:method:getWidth").
-- 
-- ==== Setters
-- [setAccessibleParent]("GI.Gtk.Interfaces.Accessible#g:method:setAccessibleParent"), [setApplicationIcon]("GI.Adw.Objects.AboutDialog#g:method:setApplicationIcon"), [setApplicationName]("GI.Adw.Objects.AboutDialog#g:method:setApplicationName"), [setArtists]("GI.Adw.Objects.AboutDialog#g:method:setArtists"), [setCanClose]("GI.Adw.Objects.Dialog#g:method:setCanClose"), [setCanFocus]("GI.Gtk.Objects.Widget#g:method:setCanFocus"), [setCanTarget]("GI.Gtk.Objects.Widget#g:method:setCanTarget"), [setChild]("GI.Adw.Objects.Dialog#g:method:setChild"), [setChildVisible]("GI.Gtk.Objects.Widget#g:method:setChildVisible"), [setComments]("GI.Adw.Objects.AboutDialog#g:method:setComments"), [setContentHeight]("GI.Adw.Objects.Dialog#g:method:setContentHeight"), [setContentWidth]("GI.Adw.Objects.Dialog#g:method:setContentWidth"), [setCopyright]("GI.Adw.Objects.AboutDialog#g:method:setCopyright"), [setCssClasses]("GI.Gtk.Objects.Widget#g:method:setCssClasses"), [setCursor]("GI.Gtk.Objects.Widget#g:method:setCursor"), [setCursorFromName]("GI.Gtk.Objects.Widget#g:method:setCursorFromName"), [setData]("GI.GObject.Objects.Object#g:method:setData"), [setDataFull]("GI.GObject.Objects.Object#g:method:setDataFull"), [setDebugInfo]("GI.Adw.Objects.AboutDialog#g:method:setDebugInfo"), [setDebugInfoFilename]("GI.Adw.Objects.AboutDialog#g:method:setDebugInfoFilename"), [setDefaultWidget]("GI.Adw.Objects.Dialog#g:method:setDefaultWidget"), [setDesigners]("GI.Adw.Objects.AboutDialog#g:method:setDesigners"), [setDeveloperName]("GI.Adw.Objects.AboutDialog#g:method:setDeveloperName"), [setDevelopers]("GI.Adw.Objects.AboutDialog#g:method:setDevelopers"), [setDirection]("GI.Gtk.Objects.Widget#g:method:setDirection"), [setDocumenters]("GI.Adw.Objects.AboutDialog#g:method:setDocumenters"), [setFocus]("GI.Adw.Objects.Dialog#g:method:setFocus"), [setFocusChild]("GI.Gtk.Objects.Widget#g:method:setFocusChild"), [setFocusOnClick]("GI.Gtk.Objects.Widget#g:method:setFocusOnClick"), [setFocusable]("GI.Gtk.Objects.Widget#g:method:setFocusable"), [setFollowsContentSize]("GI.Adw.Objects.Dialog#g:method:setFollowsContentSize"), [setFontMap]("GI.Gtk.Objects.Widget#g:method:setFontMap"), [setFontOptions]("GI.Gtk.Objects.Widget#g:method:setFontOptions"), [setHalign]("GI.Gtk.Objects.Widget#g:method:setHalign"), [setHasTooltip]("GI.Gtk.Objects.Widget#g:method:setHasTooltip"), [setHexpand]("GI.Gtk.Objects.Widget#g:method:setHexpand"), [setHexpandSet]("GI.Gtk.Objects.Widget#g:method:setHexpandSet"), [setIssueUrl]("GI.Adw.Objects.AboutDialog#g:method:setIssueUrl"), [setLayoutManager]("GI.Gtk.Objects.Widget#g:method:setLayoutManager"), [setLicense]("GI.Adw.Objects.AboutDialog#g:method:setLicense"), [setLicenseType]("GI.Adw.Objects.AboutDialog#g:method:setLicenseType"), [setMarginBottom]("GI.Gtk.Objects.Widget#g:method:setMarginBottom"), [setMarginEnd]("GI.Gtk.Objects.Widget#g:method:setMarginEnd"), [setMarginStart]("GI.Gtk.Objects.Widget#g:method:setMarginStart"), [setMarginTop]("GI.Gtk.Objects.Widget#g:method:setMarginTop"), [setName]("GI.Gtk.Objects.Widget#g:method:setName"), [setOpacity]("GI.Gtk.Objects.Widget#g:method:setOpacity"), [setOverflow]("GI.Gtk.Objects.Widget#g:method:setOverflow"), [setParent]("GI.Gtk.Objects.Widget#g:method:setParent"), [setPresentationMode]("GI.Adw.Objects.Dialog#g:method:setPresentationMode"), [setProperty]("GI.GObject.Objects.Object#g:method:setProperty"), [setReceivesDefault]("GI.Gtk.Objects.Widget#g:method:setReceivesDefault"), [setReleaseNotes]("GI.Adw.Objects.AboutDialog#g:method:setReleaseNotes"), [setReleaseNotesVersion]("GI.Adw.Objects.AboutDialog#g:method:setReleaseNotesVersion"), [setSensitive]("GI.Gtk.Objects.Widget#g:method:setSensitive"), [setSizeRequest]("GI.Gtk.Objects.Widget#g:method:setSizeRequest"), [setStateFlags]("GI.Gtk.Objects.Widget#g:method:setStateFlags"), [setSupportUrl]("GI.Adw.Objects.AboutDialog#g:method:setSupportUrl"), [setTitle]("GI.Adw.Objects.Dialog#g:method:setTitle"), [setTooltipMarkup]("GI.Gtk.Objects.Widget#g:method:setTooltipMarkup"), [setTooltipText]("GI.Gtk.Objects.Widget#g:method:setTooltipText"), [setTranslatorCredits]("GI.Adw.Objects.AboutDialog#g:method:setTranslatorCredits"), [setValign]("GI.Gtk.Objects.Widget#g:method:setValign"), [setVersion]("GI.Adw.Objects.AboutDialog#g:method:setVersion"), [setVexpand]("GI.Gtk.Objects.Widget#g:method:setVexpand"), [setVexpandSet]("GI.Gtk.Objects.Widget#g:method:setVexpandSet"), [setVisible]("GI.Gtk.Objects.Widget#g:method:setVisible"), [setWebsite]("GI.Adw.Objects.AboutDialog#g:method:setWebsite").

#if defined(ENABLE_OVERLOADING)
    ResolveAboutDialogMethod                ,
#endif

-- ** addAcknowledgementSection #method:addAcknowledgementSection#

#if defined(ENABLE_OVERLOADING)
    AboutDialogAddAcknowledgementSectionMethodInfo,
#endif
    aboutDialogAddAcknowledgementSection    ,


-- ** addCreditSection #method:addCreditSection#

#if defined(ENABLE_OVERLOADING)
    AboutDialogAddCreditSectionMethodInfo   ,
#endif
    aboutDialogAddCreditSection             ,


-- ** addLegalSection #method:addLegalSection#

#if defined(ENABLE_OVERLOADING)
    AboutDialogAddLegalSectionMethodInfo    ,
#endif
    aboutDialogAddLegalSection              ,


-- ** addLink #method:addLink#

#if defined(ENABLE_OVERLOADING)
    AboutDialogAddLinkMethodInfo            ,
#endif
    aboutDialogAddLink                      ,


-- ** getApplicationIcon #method:getApplicationIcon#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetApplicationIconMethodInfo ,
#endif
    aboutDialogGetApplicationIcon           ,


-- ** getApplicationName #method:getApplicationName#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetApplicationNameMethodInfo ,
#endif
    aboutDialogGetApplicationName           ,


-- ** getArtists #method:getArtists#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetArtistsMethodInfo         ,
#endif
    aboutDialogGetArtists                   ,


-- ** getComments #method:getComments#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetCommentsMethodInfo        ,
#endif
    aboutDialogGetComments                  ,


-- ** getCopyright #method:getCopyright#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetCopyrightMethodInfo       ,
#endif
    aboutDialogGetCopyright                 ,


-- ** getDebugInfo #method:getDebugInfo#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDebugInfoMethodInfo       ,
#endif
    aboutDialogGetDebugInfo                 ,


-- ** getDebugInfoFilename #method:getDebugInfoFilename#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDebugInfoFilenameMethodInfo,
#endif
    aboutDialogGetDebugInfoFilename         ,


-- ** getDesigners #method:getDesigners#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDesignersMethodInfo       ,
#endif
    aboutDialogGetDesigners                 ,


-- ** getDeveloperName #method:getDeveloperName#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDeveloperNameMethodInfo   ,
#endif
    aboutDialogGetDeveloperName             ,


-- ** getDevelopers #method:getDevelopers#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDevelopersMethodInfo      ,
#endif
    aboutDialogGetDevelopers                ,


-- ** getDocumenters #method:getDocumenters#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetDocumentersMethodInfo     ,
#endif
    aboutDialogGetDocumenters               ,


-- ** getIssueUrl #method:getIssueUrl#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetIssueUrlMethodInfo        ,
#endif
    aboutDialogGetIssueUrl                  ,


-- ** getLicense #method:getLicense#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetLicenseMethodInfo         ,
#endif
    aboutDialogGetLicense                   ,


-- ** getLicenseType #method:getLicenseType#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetLicenseTypeMethodInfo     ,
#endif
    aboutDialogGetLicenseType               ,


-- ** getReleaseNotes #method:getReleaseNotes#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetReleaseNotesMethodInfo    ,
#endif
    aboutDialogGetReleaseNotes              ,


-- ** getReleaseNotesVersion #method:getReleaseNotesVersion#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetReleaseNotesVersionMethodInfo,
#endif
    aboutDialogGetReleaseNotesVersion       ,


-- ** getSupportUrl #method:getSupportUrl#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetSupportUrlMethodInfo      ,
#endif
    aboutDialogGetSupportUrl                ,


-- ** getTranslatorCredits #method:getTranslatorCredits#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetTranslatorCreditsMethodInfo,
#endif
    aboutDialogGetTranslatorCredits         ,


-- ** getVersion #method:getVersion#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetVersionMethodInfo         ,
#endif
    aboutDialogGetVersion                   ,


-- ** getWebsite #method:getWebsite#

#if defined(ENABLE_OVERLOADING)
    AboutDialogGetWebsiteMethodInfo         ,
#endif
    aboutDialogGetWebsite                   ,


-- ** new #method:new#

    aboutDialogNew                          ,


-- ** newFromAppdata #method:newFromAppdata#

    aboutDialogNewFromAppdata               ,


-- ** setApplicationIcon #method:setApplicationIcon#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetApplicationIconMethodInfo ,
#endif
    aboutDialogSetApplicationIcon           ,


-- ** setApplicationName #method:setApplicationName#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetApplicationNameMethodInfo ,
#endif
    aboutDialogSetApplicationName           ,


-- ** setArtists #method:setArtists#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetArtistsMethodInfo         ,
#endif
    aboutDialogSetArtists                   ,


-- ** setComments #method:setComments#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetCommentsMethodInfo        ,
#endif
    aboutDialogSetComments                  ,


-- ** setCopyright #method:setCopyright#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetCopyrightMethodInfo       ,
#endif
    aboutDialogSetCopyright                 ,


-- ** setDebugInfo #method:setDebugInfo#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDebugInfoMethodInfo       ,
#endif
    aboutDialogSetDebugInfo                 ,


-- ** setDebugInfoFilename #method:setDebugInfoFilename#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDebugInfoFilenameMethodInfo,
#endif
    aboutDialogSetDebugInfoFilename         ,


-- ** setDesigners #method:setDesigners#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDesignersMethodInfo       ,
#endif
    aboutDialogSetDesigners                 ,


-- ** setDeveloperName #method:setDeveloperName#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDeveloperNameMethodInfo   ,
#endif
    aboutDialogSetDeveloperName             ,


-- ** setDevelopers #method:setDevelopers#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDevelopersMethodInfo      ,
#endif
    aboutDialogSetDevelopers                ,


-- ** setDocumenters #method:setDocumenters#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetDocumentersMethodInfo     ,
#endif
    aboutDialogSetDocumenters               ,


-- ** setIssueUrl #method:setIssueUrl#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetIssueUrlMethodInfo        ,
#endif
    aboutDialogSetIssueUrl                  ,


-- ** setLicense #method:setLicense#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetLicenseMethodInfo         ,
#endif
    aboutDialogSetLicense                   ,


-- ** setLicenseType #method:setLicenseType#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetLicenseTypeMethodInfo     ,
#endif
    aboutDialogSetLicenseType               ,


-- ** setReleaseNotes #method:setReleaseNotes#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetReleaseNotesMethodInfo    ,
#endif
    aboutDialogSetReleaseNotes              ,


-- ** setReleaseNotesVersion #method:setReleaseNotesVersion#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetReleaseNotesVersionMethodInfo,
#endif
    aboutDialogSetReleaseNotesVersion       ,


-- ** setSupportUrl #method:setSupportUrl#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetSupportUrlMethodInfo      ,
#endif
    aboutDialogSetSupportUrl                ,


-- ** setTranslatorCredits #method:setTranslatorCredits#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetTranslatorCreditsMethodInfo,
#endif
    aboutDialogSetTranslatorCredits         ,


-- ** setVersion #method:setVersion#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetVersionMethodInfo         ,
#endif
    aboutDialogSetVersion                   ,


-- ** setWebsite #method:setWebsite#

#if defined(ENABLE_OVERLOADING)
    AboutDialogSetWebsiteMethodInfo         ,
#endif
    aboutDialogSetWebsite                   ,




 -- * Properties


-- ** applicationIcon #attr:applicationIcon#
-- | The name of the application icon.
-- 
-- The icon is displayed at the top of the main page.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogApplicationIconPropertyInfo  ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogApplicationIcon              ,
#endif
    constructAboutDialogApplicationIcon     ,
    getAboutDialogApplicationIcon           ,
    setAboutDialogApplicationIcon           ,


-- ** applicationName #attr:applicationName#
-- | The name of the application.
-- 
-- The name is displayed at the top of the main page.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogApplicationNamePropertyInfo  ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogApplicationName              ,
#endif
    constructAboutDialogApplicationName     ,
    getAboutDialogApplicationName           ,
    setAboutDialogApplicationName           ,


-- ** artists #attr:artists#
-- | The list of artists of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogArtistsPropertyInfo          ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogArtists                      ,
#endif
    clearAboutDialogArtists                 ,
    constructAboutDialogArtists             ,
    getAboutDialogArtists                   ,
    setAboutDialogArtists                   ,


-- ** comments #attr:comments#
-- | The comments about the application.
-- 
-- Comments will be shown on the Details page, above links.
-- 
-- Unlike [AboutDialog:comments]("GI.Gtk.Objects.AboutDialog#g:attr:comments"), this string can be long and
-- detailed. It can also contain links and Pango markup.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogCommentsPropertyInfo         ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogComments                     ,
#endif
    constructAboutDialogComments            ,
    getAboutDialogComments                  ,
    setAboutDialogComments                  ,


-- ** copyright #attr:copyright#
-- | The copyright information.
-- 
-- This should be a short string of one or two lines, for example:
-- @© 2022 Example@.
-- 
-- The copyright information will be displayed on the Legal page, above the
-- application license.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add copyright
-- information for the application dependencies or other components.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogCopyrightPropertyInfo        ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogCopyright                    ,
#endif
    constructAboutDialogCopyright           ,
    getAboutDialogCopyright                 ,
    setAboutDialogCopyright                 ,


-- ** debugInfo #attr:debugInfo#
-- | The debug information.
-- 
-- Debug information will be shown on the Troubleshooting page. It\'s intended
-- to be attached to issue reports when reporting issues against the
-- application.
-- 
-- @AdwAboutDialog@ provides a quick way to save debug information to a file.
-- When saving, [property/@aboutDialog@/:debug-info-filename] would be used as
-- the suggested filename.
-- 
-- Debug information cannot contain markup or links.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDebugInfoPropertyInfo        ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDebugInfo                    ,
#endif
    constructAboutDialogDebugInfo           ,
    getAboutDialogDebugInfo                 ,
    setAboutDialogDebugInfo                 ,


-- ** debugInfoFilename #attr:debugInfoFilename#
-- | The debug information filename.
-- 
-- It will be used as the suggested filename when saving debug information to
-- a file.
-- 
-- See [property/@aboutDialog@/:debug-info].
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDebugInfoFilenamePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDebugInfoFilename            ,
#endif
    constructAboutDialogDebugInfoFilename   ,
    getAboutDialogDebugInfoFilename         ,
    setAboutDialogDebugInfoFilename         ,


-- ** designers #attr:designers#
-- | The list of designers of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDesignersPropertyInfo        ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDesigners                    ,
#endif
    clearAboutDialogDesigners               ,
    constructAboutDialogDesigners           ,
    getAboutDialogDesigners                 ,
    setAboutDialogDesigners                 ,


-- ** developerName #attr:developerName#
-- | The developer name.
-- 
-- The developer name is displayed on the main page, under the application
-- name.
-- 
-- If the application is developed by multiple people, the developer name can
-- be set to values like \"AppName team\", \"AppName developers\" or
-- \"The AppName project\", and the individual contributors can be listed on the
-- Credits page, with [property/@aboutDialog@/:developers] and related
-- properties.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDeveloperNamePropertyInfo    ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDeveloperName                ,
#endif
    constructAboutDialogDeveloperName       ,
    getAboutDialogDeveloperName             ,
    setAboutDialogDeveloperName             ,


-- ** developers #attr:developers#
-- | The list of developers of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDevelopersPropertyInfo       ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDevelopers                   ,
#endif
    clearAboutDialogDevelopers              ,
    constructAboutDialogDevelopers          ,
    getAboutDialogDevelopers                ,
    setAboutDialogDevelopers                ,


-- ** documenters #attr:documenters#
-- | The list of documenters of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogDocumentersPropertyInfo      ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogDocumenters                  ,
#endif
    clearAboutDialogDocumenters             ,
    constructAboutDialogDocumenters         ,
    getAboutDialogDocumenters               ,
    setAboutDialogDocumenters               ,


-- ** issueUrl #attr:issueUrl#
-- | The URL for the application\'s issue tracker.
-- 
-- The issue tracker link is displayed on the main page.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogIssueUrlPropertyInfo         ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogIssueUrl                     ,
#endif
    constructAboutDialogIssueUrl            ,
    getAboutDialogIssueUrl                  ,
    setAboutDialogIssueUrl                  ,


-- ** license #attr:license#
-- | The license text.
-- 
-- This can be used to set a custom text for the license if it can\'t be set
-- via [property/@aboutDialog@/:license-type].
-- 
-- When set, [property/@aboutDialog@/:license-type] will be set to
-- @GTK_LICENSE_CUSTOM@.
-- 
-- The license text will be displayed on the Legal page, below the copyright
-- information.
-- 
-- License text can contain Pango markup and links.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add license
-- information for the application dependencies or other components.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogLicensePropertyInfo          ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogLicense                      ,
#endif
    constructAboutDialogLicense             ,
    getAboutDialogLicense                   ,
    setAboutDialogLicense                   ,


-- ** licenseType #attr:licenseType#
-- | The license type.
-- 
-- Allows to set the application\'s license froma list of known licenses.
-- 
-- If the application\'s license is not in the list,
-- [property/@aboutDialog@/:license] can be used instead. The license type will
-- be automatically set to @GTK_LICENSE_CUSTOM@ in that case.
-- 
-- If set to @GTK_LICENSE_UNKNOWN@, no information will be displayed.
-- 
-- If the license type is different from @GTK_LICENSE_CUSTOM@.
-- [property/@aboutDialog@/:license] will be cleared out.
-- 
-- The license description will be displayed on the Legal page, below the
-- copyright information.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add license
-- information for the application dependencies or other components.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogLicenseTypePropertyInfo      ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogLicenseType                  ,
#endif
    constructAboutDialogLicenseType         ,
    getAboutDialogLicenseType               ,
    setAboutDialogLicenseType               ,


-- ** releaseNotes #attr:releaseNotes#
-- | The release notes of the application.
-- 
-- Release notes are displayed on the the What\'s New page.
-- 
-- Release notes are formatted the same way as
-- <https://freedesktop.org/software/appstream/docs/chap-Metadata.html#tag-description AppStream descriptions>.
-- 
-- The supported formatting options are:
-- 
-- * Paragraph (@\<p>@)
-- * Ordered list (@\<ol>@), with list items (@\<li>@)
-- * Unordered list (@\<ul>@), with list items (@\<li>@)
-- 
-- Within paragraphs and list items, emphasis (@\<em>@) and inline code
-- (@\<code>@) text styles are supported. The emphasis is rendered in italic,
-- while inline code is shown in a monospaced font.
-- 
-- Any text outside paragraphs or list items is ignored.
-- 
-- Nested lists are not supported.
-- 
-- @AdwAboutDialog@ displays the version above the release notes. If set, the
-- [property/@aboutDialog@/:release-notes-version] of the property will be used
-- as the version; otherwise, [property/@aboutDialog@/:version] is used.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogReleaseNotesPropertyInfo     ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogReleaseNotes                 ,
#endif
    constructAboutDialogReleaseNotes        ,
    getAboutDialogReleaseNotes              ,
    setAboutDialogReleaseNotes              ,


-- ** releaseNotesVersion #attr:releaseNotesVersion#
-- | The version described by the application\'s release notes.
-- 
-- The release notes version is displayed on the What\'s New page, above the
-- release notes.
-- 
-- If not set, [property/@aboutDialog@/:version] will be used instead.
-- 
-- For example, an application with the current version 2.0.2 might want to
-- keep the release notes from 2.0.0, and set the release notes version
-- accordingly.
-- 
-- See [property/@aboutDialog@/:release-notes].
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogReleaseNotesVersionPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogReleaseNotesVersion          ,
#endif
    constructAboutDialogReleaseNotesVersion ,
    getAboutDialogReleaseNotesVersion       ,
    setAboutDialogReleaseNotesVersion       ,


-- ** supportUrl #attr:supportUrl#
-- | The URL of the application\'s support page.
-- 
-- The support page link is displayed on the main page.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogSupportUrlPropertyInfo       ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogSupportUrl                   ,
#endif
    constructAboutDialogSupportUrl          ,
    getAboutDialogSupportUrl                ,
    setAboutDialogSupportUrl                ,


-- ** translatorCredits #attr:translatorCredits#
-- | The translator credits string.
-- 
-- It will be displayed on the Credits page.
-- 
-- This string should be @\"translator-credits\"@ or @\"translator_credits\"@ and
-- should be marked as translatable.
-- 
-- The string may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogTranslatorCreditsPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogTranslatorCredits            ,
#endif
    constructAboutDialogTranslatorCredits   ,
    getAboutDialogTranslatorCredits         ,
    setAboutDialogTranslatorCredits         ,


-- ** version #attr:version#
-- | The version of the application.
-- 
-- The version is displayed on the main page.
-- 
-- If [property/@aboutDialog@/:release-notes-version] is not set, the version
-- will also be displayed above the release notes on the What\'s New page.
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogVersionPropertyInfo          ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogVersion                      ,
#endif
    constructAboutDialogVersion             ,
    getAboutDialogVersion                   ,
    setAboutDialogVersion                   ,


-- ** website #attr:website#
-- | The URL of the application\'s website.
-- 
-- Website is displayed on the Details page, below comments, or on the main
-- page if the Details page doesn\'t have any other content.
-- 
-- Applications can add other links below, see [method/@aboutDialog@/.add_link].
-- 
-- /Since: 1.5/

#if defined(ENABLE_OVERLOADING)
    AboutDialogWebsitePropertyInfo          ,
#endif
#if defined(ENABLE_OVERLOADING)
    aboutDialogWebsite                      ,
#endif
    constructAboutDialogWebsite             ,
    getAboutDialogWebsite                   ,
    setAboutDialogWebsite                   ,




 -- * Signals


-- ** activateLink #signal:activateLink#

    AboutDialogActivateLinkCallback         ,
#if defined(ENABLE_OVERLOADING)
    AboutDialogActivateLinkSignalInfo       ,
#endif
    afterAboutDialogActivateLink            ,
    onAboutDialogActivateLink               ,




    ) where

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

import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified Data.Word as DW
import qualified Data.Int as DI
import qualified System.Posix.Types as SPT
import qualified Foreign.C.Types as FCT

-- Workaround for https://gitlab.haskell.org/ghc/ghc/-/issues/23392
#if MIN_VERSION_base(4,18,0)
import {-# SOURCE #-} qualified GI.Adw.Enums as Adw.Enums
import {-# SOURCE #-} qualified GI.Adw.Objects.Breakpoint as Adw.Breakpoint
import {-# SOURCE #-} qualified GI.Adw.Objects.Dialog as Adw.Dialog
import {-# SOURCE #-} qualified GI.Adw.Structs.BreakpointCondition as Adw.BreakpointCondition
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.Objects.Widget as Gtk.Widget

#else
import {-# SOURCE #-} qualified GI.Adw.Objects.Dialog as Adw.Dialog
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.Objects.Widget as Gtk.Widget

#endif

-- | Memory-managed wrapper type.
newtype AboutDialog = AboutDialog (SP.ManagedPtr AboutDialog)
    deriving (AboutDialog -> AboutDialog -> Bool
(AboutDialog -> AboutDialog -> Bool)
-> (AboutDialog -> AboutDialog -> Bool) -> Eq AboutDialog
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AboutDialog -> AboutDialog -> Bool
== :: AboutDialog -> AboutDialog -> Bool
$c/= :: AboutDialog -> AboutDialog -> Bool
/= :: AboutDialog -> AboutDialog -> Bool
Eq)

instance SP.ManagedPtrNewtype AboutDialog where
    toManagedPtr :: AboutDialog -> ManagedPtr AboutDialog
toManagedPtr (AboutDialog ManagedPtr AboutDialog
p) = ManagedPtr AboutDialog
p

foreign import ccall "adw_about_dialog_get_type"
    c_adw_about_dialog_get_type :: IO B.Types.GType

instance B.Types.TypedObject AboutDialog where
    glibType :: IO GType
glibType = IO GType
c_adw_about_dialog_get_type

instance B.Types.GObject AboutDialog

-- | Type class for types which can be safely cast to `AboutDialog`, for instance with `toAboutDialog`.
class (SP.GObject o, O.IsDescendantOf AboutDialog o) => IsAboutDialog o
instance (SP.GObject o, O.IsDescendantOf AboutDialog o) => IsAboutDialog o

instance O.HasParentTypes AboutDialog
type instance O.ParentTypes AboutDialog = '[Adw.Dialog.Dialog, Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget]

-- | Cast to `AboutDialog`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`.
toAboutDialog :: (MIO.MonadIO m, IsAboutDialog o) => o -> m AboutDialog
toAboutDialog :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m AboutDialog
toAboutDialog = IO AboutDialog -> m AboutDialog
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO AboutDialog -> m AboutDialog)
-> (o -> IO AboutDialog) -> o -> m AboutDialog
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr AboutDialog -> AboutDialog) -> o -> IO AboutDialog
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
 ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr AboutDialog -> AboutDialog
AboutDialog

-- | Convert 'AboutDialog' to and from 'Data.GI.Base.GValue.GValue'. See 'Data.GI.Base.GValue.toGValue' and 'Data.GI.Base.GValue.fromGValue'.
instance B.GValue.IsGValue (Maybe AboutDialog) where
    gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_adw_about_dialog_get_type
    gvalueSet_ :: Ptr GValue -> Maybe AboutDialog -> IO ()
gvalueSet_ Ptr GValue
gv Maybe AboutDialog
P.Nothing = Ptr GValue -> Ptr AboutDialog -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr AboutDialog
forall a. Ptr a
FP.nullPtr :: FP.Ptr AboutDialog)
    gvalueSet_ Ptr GValue
gv (P.Just AboutDialog
obj) = AboutDialog -> (Ptr AboutDialog -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr AboutDialog
obj (Ptr GValue -> Ptr AboutDialog -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
    gvalueGet_ :: Ptr GValue -> IO (Maybe AboutDialog)
gvalueGet_ Ptr GValue
gv = do
        Ptr AboutDialog
ptr <- Ptr GValue -> IO (Ptr AboutDialog)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr AboutDialog)
        if Ptr AboutDialog
ptr Ptr AboutDialog -> Ptr AboutDialog -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr AboutDialog
forall a. Ptr a
FP.nullPtr
        then AboutDialog -> Maybe AboutDialog
forall a. a -> Maybe a
P.Just (AboutDialog -> Maybe AboutDialog)
-> IO AboutDialog -> IO (Maybe AboutDialog)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr AboutDialog -> AboutDialog)
-> Ptr AboutDialog -> IO AboutDialog
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr AboutDialog -> AboutDialog
AboutDialog Ptr AboutDialog
ptr
        else Maybe AboutDialog -> IO (Maybe AboutDialog)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe AboutDialog
forall a. Maybe a
P.Nothing
        
    

#if defined(ENABLE_OVERLOADING)
type family ResolveAboutDialogMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
    ResolveAboutDialogMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
    ResolveAboutDialogMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
    ResolveAboutDialogMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
    ResolveAboutDialogMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
    ResolveAboutDialogMethod "addAcknowledgementSection" o = AboutDialogAddAcknowledgementSectionMethodInfo
    ResolveAboutDialogMethod "addBreakpoint" o = Adw.Dialog.DialogAddBreakpointMethodInfo
    ResolveAboutDialogMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
    ResolveAboutDialogMethod "addCreditSection" o = AboutDialogAddCreditSectionMethodInfo
    ResolveAboutDialogMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
    ResolveAboutDialogMethod "addLegalSection" o = AboutDialogAddLegalSectionMethodInfo
    ResolveAboutDialogMethod "addLink" o = AboutDialogAddLinkMethodInfo
    ResolveAboutDialogMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
    ResolveAboutDialogMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
    ResolveAboutDialogMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
    ResolveAboutDialogMethod "announce" o = Gtk.Accessible.AccessibleAnnounceMethodInfo
    ResolveAboutDialogMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
    ResolveAboutDialogMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
    ResolveAboutDialogMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
    ResolveAboutDialogMethod "close" o = Adw.Dialog.DialogCloseMethodInfo
    ResolveAboutDialogMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
    ResolveAboutDialogMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
    ResolveAboutDialogMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
    ResolveAboutDialogMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
    ResolveAboutDialogMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
    ResolveAboutDialogMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
    ResolveAboutDialogMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
    ResolveAboutDialogMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
    ResolveAboutDialogMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
    ResolveAboutDialogMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
    ResolveAboutDialogMethod "forceClose" o = Adw.Dialog.DialogForceCloseMethodInfo
    ResolveAboutDialogMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
    ResolveAboutDialogMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
    ResolveAboutDialogMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
    ResolveAboutDialogMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
    ResolveAboutDialogMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
    ResolveAboutDialogMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
    ResolveAboutDialogMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
    ResolveAboutDialogMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
    ResolveAboutDialogMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
    ResolveAboutDialogMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
    ResolveAboutDialogMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
    ResolveAboutDialogMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
    ResolveAboutDialogMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
    ResolveAboutDialogMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
    ResolveAboutDialogMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
    ResolveAboutDialogMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
    ResolveAboutDialogMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
    ResolveAboutDialogMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
    ResolveAboutDialogMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
    ResolveAboutDialogMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
    ResolveAboutDialogMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
    ResolveAboutDialogMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
    ResolveAboutDialogMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
    ResolveAboutDialogMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
    ResolveAboutDialogMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
    ResolveAboutDialogMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
    ResolveAboutDialogMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
    ResolveAboutDialogMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
    ResolveAboutDialogMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
    ResolveAboutDialogMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
    ResolveAboutDialogMethod "present" o = Adw.Dialog.DialogPresentMethodInfo
    ResolveAboutDialogMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
    ResolveAboutDialogMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
    ResolveAboutDialogMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
    ResolveAboutDialogMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
    ResolveAboutDialogMethod "ref" o = GObject.Object.ObjectRefMethodInfo
    ResolveAboutDialogMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
    ResolveAboutDialogMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
    ResolveAboutDialogMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
    ResolveAboutDialogMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
    ResolveAboutDialogMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
    ResolveAboutDialogMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
    ResolveAboutDialogMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
    ResolveAboutDialogMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
    ResolveAboutDialogMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
    ResolveAboutDialogMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
    ResolveAboutDialogMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
    ResolveAboutDialogMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
    ResolveAboutDialogMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
    ResolveAboutDialogMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
    ResolveAboutDialogMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
    ResolveAboutDialogMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
    ResolveAboutDialogMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
    ResolveAboutDialogMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
    ResolveAboutDialogMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
    ResolveAboutDialogMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
    ResolveAboutDialogMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
    ResolveAboutDialogMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
    ResolveAboutDialogMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
    ResolveAboutDialogMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
    ResolveAboutDialogMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
    ResolveAboutDialogMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
    ResolveAboutDialogMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
    ResolveAboutDialogMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
    ResolveAboutDialogMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
    ResolveAboutDialogMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
    ResolveAboutDialogMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
    ResolveAboutDialogMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
    ResolveAboutDialogMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
    ResolveAboutDialogMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
    ResolveAboutDialogMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
    ResolveAboutDialogMethod "getApplicationIcon" o = AboutDialogGetApplicationIconMethodInfo
    ResolveAboutDialogMethod "getApplicationName" o = AboutDialogGetApplicationNameMethodInfo
    ResolveAboutDialogMethod "getArtists" o = AboutDialogGetArtistsMethodInfo
    ResolveAboutDialogMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
    ResolveAboutDialogMethod "getBaseline" o = Gtk.Widget.WidgetGetBaselineMethodInfo
    ResolveAboutDialogMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
    ResolveAboutDialogMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
    ResolveAboutDialogMethod "getCanClose" o = Adw.Dialog.DialogGetCanCloseMethodInfo
    ResolveAboutDialogMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
    ResolveAboutDialogMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
    ResolveAboutDialogMethod "getChild" o = Adw.Dialog.DialogGetChildMethodInfo
    ResolveAboutDialogMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
    ResolveAboutDialogMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
    ResolveAboutDialogMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
    ResolveAboutDialogMethod "getComments" o = AboutDialogGetCommentsMethodInfo
    ResolveAboutDialogMethod "getContentHeight" o = Adw.Dialog.DialogGetContentHeightMethodInfo
    ResolveAboutDialogMethod "getContentWidth" o = Adw.Dialog.DialogGetContentWidthMethodInfo
    ResolveAboutDialogMethod "getCopyright" o = AboutDialogGetCopyrightMethodInfo
    ResolveAboutDialogMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
    ResolveAboutDialogMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
    ResolveAboutDialogMethod "getCurrentBreakpoint" o = Adw.Dialog.DialogGetCurrentBreakpointMethodInfo
    ResolveAboutDialogMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
    ResolveAboutDialogMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveAboutDialogMethod "getDebugInfo" o = AboutDialogGetDebugInfoMethodInfo
    ResolveAboutDialogMethod "getDebugInfoFilename" o = AboutDialogGetDebugInfoFilenameMethodInfo
    ResolveAboutDialogMethod "getDefaultWidget" o = Adw.Dialog.DialogGetDefaultWidgetMethodInfo
    ResolveAboutDialogMethod "getDesigners" o = AboutDialogGetDesignersMethodInfo
    ResolveAboutDialogMethod "getDeveloperName" o = AboutDialogGetDeveloperNameMethodInfo
    ResolveAboutDialogMethod "getDevelopers" o = AboutDialogGetDevelopersMethodInfo
    ResolveAboutDialogMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
    ResolveAboutDialogMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
    ResolveAboutDialogMethod "getDocumenters" o = AboutDialogGetDocumentersMethodInfo
    ResolveAboutDialogMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
    ResolveAboutDialogMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
    ResolveAboutDialogMethod "getFocus" o = Adw.Dialog.DialogGetFocusMethodInfo
    ResolveAboutDialogMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
    ResolveAboutDialogMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
    ResolveAboutDialogMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
    ResolveAboutDialogMethod "getFollowsContentSize" o = Adw.Dialog.DialogGetFollowsContentSizeMethodInfo
    ResolveAboutDialogMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
    ResolveAboutDialogMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
    ResolveAboutDialogMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
    ResolveAboutDialogMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
    ResolveAboutDialogMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
    ResolveAboutDialogMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
    ResolveAboutDialogMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
    ResolveAboutDialogMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
    ResolveAboutDialogMethod "getIssueUrl" o = AboutDialogGetIssueUrlMethodInfo
    ResolveAboutDialogMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
    ResolveAboutDialogMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
    ResolveAboutDialogMethod "getLicense" o = AboutDialogGetLicenseMethodInfo
    ResolveAboutDialogMethod "getLicenseType" o = AboutDialogGetLicenseTypeMethodInfo
    ResolveAboutDialogMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
    ResolveAboutDialogMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
    ResolveAboutDialogMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
    ResolveAboutDialogMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
    ResolveAboutDialogMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
    ResolveAboutDialogMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
    ResolveAboutDialogMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
    ResolveAboutDialogMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
    ResolveAboutDialogMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
    ResolveAboutDialogMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
    ResolveAboutDialogMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
    ResolveAboutDialogMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
    ResolveAboutDialogMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
    ResolveAboutDialogMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
    ResolveAboutDialogMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
    ResolveAboutDialogMethod "getPresentationMode" o = Adw.Dialog.DialogGetPresentationModeMethodInfo
    ResolveAboutDialogMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
    ResolveAboutDialogMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
    ResolveAboutDialogMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveAboutDialogMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveAboutDialogMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
    ResolveAboutDialogMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
    ResolveAboutDialogMethod "getReleaseNotes" o = AboutDialogGetReleaseNotesMethodInfo
    ResolveAboutDialogMethod "getReleaseNotesVersion" o = AboutDialogGetReleaseNotesVersionMethodInfo
    ResolveAboutDialogMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
    ResolveAboutDialogMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
    ResolveAboutDialogMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
    ResolveAboutDialogMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
    ResolveAboutDialogMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
    ResolveAboutDialogMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
    ResolveAboutDialogMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
    ResolveAboutDialogMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
    ResolveAboutDialogMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
    ResolveAboutDialogMethod "getSupportUrl" o = AboutDialogGetSupportUrlMethodInfo
    ResolveAboutDialogMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
    ResolveAboutDialogMethod "getTitle" o = Adw.Dialog.DialogGetTitleMethodInfo
    ResolveAboutDialogMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
    ResolveAboutDialogMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
    ResolveAboutDialogMethod "getTranslatorCredits" o = AboutDialogGetTranslatorCreditsMethodInfo
    ResolveAboutDialogMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
    ResolveAboutDialogMethod "getVersion" o = AboutDialogGetVersionMethodInfo
    ResolveAboutDialogMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
    ResolveAboutDialogMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
    ResolveAboutDialogMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
    ResolveAboutDialogMethod "getWebsite" o = AboutDialogGetWebsiteMethodInfo
    ResolveAboutDialogMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
    ResolveAboutDialogMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
    ResolveAboutDialogMethod "setApplicationIcon" o = AboutDialogSetApplicationIconMethodInfo
    ResolveAboutDialogMethod "setApplicationName" o = AboutDialogSetApplicationNameMethodInfo
    ResolveAboutDialogMethod "setArtists" o = AboutDialogSetArtistsMethodInfo
    ResolveAboutDialogMethod "setCanClose" o = Adw.Dialog.DialogSetCanCloseMethodInfo
    ResolveAboutDialogMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
    ResolveAboutDialogMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
    ResolveAboutDialogMethod "setChild" o = Adw.Dialog.DialogSetChildMethodInfo
    ResolveAboutDialogMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
    ResolveAboutDialogMethod "setComments" o = AboutDialogSetCommentsMethodInfo
    ResolveAboutDialogMethod "setContentHeight" o = Adw.Dialog.DialogSetContentHeightMethodInfo
    ResolveAboutDialogMethod "setContentWidth" o = Adw.Dialog.DialogSetContentWidthMethodInfo
    ResolveAboutDialogMethod "setCopyright" o = AboutDialogSetCopyrightMethodInfo
    ResolveAboutDialogMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
    ResolveAboutDialogMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
    ResolveAboutDialogMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
    ResolveAboutDialogMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveAboutDialogMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
    ResolveAboutDialogMethod "setDebugInfo" o = AboutDialogSetDebugInfoMethodInfo
    ResolveAboutDialogMethod "setDebugInfoFilename" o = AboutDialogSetDebugInfoFilenameMethodInfo
    ResolveAboutDialogMethod "setDefaultWidget" o = Adw.Dialog.DialogSetDefaultWidgetMethodInfo
    ResolveAboutDialogMethod "setDesigners" o = AboutDialogSetDesignersMethodInfo
    ResolveAboutDialogMethod "setDeveloperName" o = AboutDialogSetDeveloperNameMethodInfo
    ResolveAboutDialogMethod "setDevelopers" o = AboutDialogSetDevelopersMethodInfo
    ResolveAboutDialogMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
    ResolveAboutDialogMethod "setDocumenters" o = AboutDialogSetDocumentersMethodInfo
    ResolveAboutDialogMethod "setFocus" o = Adw.Dialog.DialogSetFocusMethodInfo
    ResolveAboutDialogMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
    ResolveAboutDialogMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
    ResolveAboutDialogMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
    ResolveAboutDialogMethod "setFollowsContentSize" o = Adw.Dialog.DialogSetFollowsContentSizeMethodInfo
    ResolveAboutDialogMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
    ResolveAboutDialogMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
    ResolveAboutDialogMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
    ResolveAboutDialogMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
    ResolveAboutDialogMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
    ResolveAboutDialogMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
    ResolveAboutDialogMethod "setIssueUrl" o = AboutDialogSetIssueUrlMethodInfo
    ResolveAboutDialogMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
    ResolveAboutDialogMethod "setLicense" o = AboutDialogSetLicenseMethodInfo
    ResolveAboutDialogMethod "setLicenseType" o = AboutDialogSetLicenseTypeMethodInfo
    ResolveAboutDialogMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
    ResolveAboutDialogMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
    ResolveAboutDialogMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
    ResolveAboutDialogMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
    ResolveAboutDialogMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
    ResolveAboutDialogMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
    ResolveAboutDialogMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
    ResolveAboutDialogMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
    ResolveAboutDialogMethod "setPresentationMode" o = Adw.Dialog.DialogSetPresentationModeMethodInfo
    ResolveAboutDialogMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveAboutDialogMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
    ResolveAboutDialogMethod "setReleaseNotes" o = AboutDialogSetReleaseNotesMethodInfo
    ResolveAboutDialogMethod "setReleaseNotesVersion" o = AboutDialogSetReleaseNotesVersionMethodInfo
    ResolveAboutDialogMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
    ResolveAboutDialogMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
    ResolveAboutDialogMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
    ResolveAboutDialogMethod "setSupportUrl" o = AboutDialogSetSupportUrlMethodInfo
    ResolveAboutDialogMethod "setTitle" o = Adw.Dialog.DialogSetTitleMethodInfo
    ResolveAboutDialogMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
    ResolveAboutDialogMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
    ResolveAboutDialogMethod "setTranslatorCredits" o = AboutDialogSetTranslatorCreditsMethodInfo
    ResolveAboutDialogMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
    ResolveAboutDialogMethod "setVersion" o = AboutDialogSetVersionMethodInfo
    ResolveAboutDialogMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
    ResolveAboutDialogMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
    ResolveAboutDialogMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
    ResolveAboutDialogMethod "setWebsite" o = AboutDialogSetWebsiteMethodInfo
    ResolveAboutDialogMethod l o = O.MethodResolutionFailed l o

instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethod info AboutDialog p) => OL.IsLabel t (AboutDialog -> p) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.overloadedMethod @info
#else
    fromLabel _ = O.overloadedMethod @info
#endif

#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethod info AboutDialog p, R.HasField t AboutDialog p) => R.HasField t AboutDialog p where
    getField = O.overloadedMethod @info

#endif

instance (info ~ ResolveAboutDialogMethod t AboutDialog, O.OverloadedMethodInfo info AboutDialog) => OL.IsLabel t (O.MethodProxy info AboutDialog) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.MethodProxy
#else
    fromLabel _ = O.MethodProxy
#endif

#endif

-- signal AboutDialog::activate-link
-- | Emitted when a URL is activated.
-- 
-- Applications may connect to it to override the default behavior, which is
-- to call 'GI.Gtk.Functions.showUri'.
-- 
-- /Since: 1.5/
type AboutDialogActivateLinkCallback =
    T.Text
    -- ^ /@uri@/: the URI to activate
    -> IO Bool
    -- ^ __Returns:__ @TRUE@ if the link has been activated

type C_AboutDialogActivateLinkCallback =
    Ptr AboutDialog ->                      -- object
    CString ->
    Ptr () ->                               -- user_data
    IO CInt

-- | Generate a function pointer callable from C code, from a `C_AboutDialogActivateLinkCallback`.
foreign import ccall "wrapper"
    mk_AboutDialogActivateLinkCallback :: C_AboutDialogActivateLinkCallback -> IO (FunPtr C_AboutDialogActivateLinkCallback)

wrap_AboutDialogActivateLinkCallback :: 
    GObject a => (a -> AboutDialogActivateLinkCallback) ->
    C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback :: forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
gi'cb Ptr AboutDialog
gi'selfPtr CString
uri Ptr ()
_ = do
    Text
uri' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
uri
    Bool
result <- Ptr AboutDialog -> (AboutDialog -> IO Bool) -> IO Bool
forall o b.
(HasCallStack, GObject o) =>
Ptr o -> (o -> IO b) -> IO b
B.ManagedPtr.withNewObject Ptr AboutDialog
gi'selfPtr ((AboutDialog -> IO Bool) -> IO Bool)
-> (AboutDialog -> IO Bool) -> IO Bool
forall a b. (a -> b) -> a -> b
$ \AboutDialog
gi'self -> a -> AboutDialogActivateLinkCallback
gi'cb (AboutDialog -> a
forall a b. Coercible a b => a -> b
Coerce.coerce AboutDialog
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'


-- | Connect a signal handler for the [activateLink](#signal:activateLink) signal, to be run before the default handler.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Signals.on' aboutDialog #activateLink callback
-- @
-- 
-- 
onAboutDialogActivateLink :: (IsAboutDialog a, MonadIO m) => a -> ((?self :: a) => AboutDialogActivateLinkCallback) -> m SignalHandlerId
onAboutDialogActivateLink :: forall a (m :: * -> *).
(IsAboutDialog a, MonadIO m) =>
a
-> ((?self::a) => AboutDialogActivateLinkCallback)
-> m SignalHandlerId
onAboutDialogActivateLink a
obj (?self::a) => AboutDialogActivateLinkCallback
cb = 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 -> AboutDialogActivateLinkCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => AboutDialogActivateLinkCallback
AboutDialogActivateLinkCallback
cb
    let wrapped' :: C_AboutDialogActivateLinkCallback
wrapped' = (a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
wrapped
    FunPtr C_AboutDialogActivateLinkCallback
wrapped'' <- C_AboutDialogActivateLinkCallback
-> IO (FunPtr C_AboutDialogActivateLinkCallback)
mk_AboutDialogActivateLinkCallback C_AboutDialogActivateLinkCallback
wrapped'
    a
-> Text
-> FunPtr C_AboutDialogActivateLinkCallback
-> 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_AboutDialogActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing

-- | Connect a signal handler for the [activateLink](#signal:activateLink) signal, to be run after the default handler.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Signals.after' aboutDialog #activateLink callback
-- @
-- 
-- 
-- 
-- By default the object invoking the signal is not passed to the callback.
-- If you need to access it, you can use the implit @?self@ parameter.
-- Note that this requires activating the @ImplicitParams@ GHC extension.
-- 
afterAboutDialogActivateLink :: (IsAboutDialog a, MonadIO m) => a -> ((?self :: a) => AboutDialogActivateLinkCallback) -> m SignalHandlerId
afterAboutDialogActivateLink :: forall a (m :: * -> *).
(IsAboutDialog a, MonadIO m) =>
a
-> ((?self::a) => AboutDialogActivateLinkCallback)
-> m SignalHandlerId
afterAboutDialogActivateLink a
obj (?self::a) => AboutDialogActivateLinkCallback
cb = 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 -> AboutDialogActivateLinkCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => AboutDialogActivateLinkCallback
AboutDialogActivateLinkCallback
cb
    let wrapped' :: C_AboutDialogActivateLinkCallback
wrapped' = (a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
forall a.
GObject a =>
(a -> AboutDialogActivateLinkCallback)
-> C_AboutDialogActivateLinkCallback
wrap_AboutDialogActivateLinkCallback a -> AboutDialogActivateLinkCallback
wrapped
    FunPtr C_AboutDialogActivateLinkCallback
wrapped'' <- C_AboutDialogActivateLinkCallback
-> IO (FunPtr C_AboutDialogActivateLinkCallback)
mk_AboutDialogActivateLinkCallback C_AboutDialogActivateLinkCallback
wrapped'
    a
-> Text
-> FunPtr C_AboutDialogActivateLinkCallback
-> 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_AboutDialogActivateLinkCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing


#if defined(ENABLE_OVERLOADING)
data AboutDialogActivateLinkSignalInfo
instance SignalInfo AboutDialogActivateLinkSignalInfo where
    type HaskellCallbackType AboutDialogActivateLinkSignalInfo = AboutDialogActivateLinkCallback
    connectSignal obj cb connectMode detail = do
        let cb' = wrap_AboutDialogActivateLinkCallback cb
        cb'' <- mk_AboutDialogActivateLinkCallback cb'
        connectSignalFunPtr obj "activate-link" cb'' connectMode detail
    dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog::activate-link"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:signal:activateLink"})

#endif

-- VVV Prop "application-icon"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@application-icon@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #applicationIcon
-- @
getAboutDialogApplicationIcon :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogApplicationIcon :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogApplicationIcon 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
"getAboutDialogApplicationIcon" (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"

-- | Set the value of the “@application-icon@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #applicationIcon 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogApplicationIcon :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogApplicationIcon :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogApplicationIcon 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)

-- | Construct a `GValueConstruct` with valid value for the “@application-icon@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogApplicationIcon :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogApplicationIcon :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogApplicationIcon 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 AboutDialogApplicationIconPropertyInfo
instance AttrInfo AboutDialogApplicationIconPropertyInfo where
    type AttrAllowedOps AboutDialogApplicationIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogApplicationIconPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogApplicationIconPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogApplicationIconPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogApplicationIconPropertyInfo = T.Text
    type AttrGetType AboutDialogApplicationIconPropertyInfo = T.Text
    type AttrLabel AboutDialogApplicationIconPropertyInfo = "application-icon"
    type AttrOrigin AboutDialogApplicationIconPropertyInfo = AboutDialog
    attrGet = getAboutDialogApplicationIcon
    attrSet = setAboutDialogApplicationIcon
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogApplicationIcon
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.applicationIcon"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:applicationIcon"
        })
#endif

-- VVV Prop "application-name"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@application-name@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #applicationName
-- @
getAboutDialogApplicationName :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogApplicationName :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogApplicationName 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
"getAboutDialogApplicationName" (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"

-- | Set the value of the “@application-name@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #applicationName 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogApplicationName :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogApplicationName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogApplicationName 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)

-- | Construct a `GValueConstruct` with valid value for the “@application-name@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogApplicationName :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogApplicationName :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogApplicationName 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 AboutDialogApplicationNamePropertyInfo
instance AttrInfo AboutDialogApplicationNamePropertyInfo where
    type AttrAllowedOps AboutDialogApplicationNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogApplicationNamePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogApplicationNamePropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogApplicationNamePropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogApplicationNamePropertyInfo = T.Text
    type AttrGetType AboutDialogApplicationNamePropertyInfo = T.Text
    type AttrLabel AboutDialogApplicationNamePropertyInfo = "application-name"
    type AttrOrigin AboutDialogApplicationNamePropertyInfo = AboutDialog
    attrGet = getAboutDialogApplicationName
    attrSet = setAboutDialogApplicationName
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogApplicationName
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.applicationName"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:applicationName"
        })
#endif

-- VVV Prop "artists"
   -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just True,Just True)

-- | Get the value of the “@artists@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #artists
-- @
getAboutDialogArtists :: (MonadIO m, IsAboutDialog o) => o -> m (Maybe [T.Text])
getAboutDialogArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m (Maybe [Text])
getAboutDialogArtists 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"

-- | Set the value of the “@artists@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #artists 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogArtists :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogArtists :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogArtists o
obj [Text]
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@artists@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogArtists :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogArtists :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogArtists [Text]
val = 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)

-- | Set the value of the “@artists@” property to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #artists
-- @
clearAboutDialogArtists :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogArtists :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogArtists 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 AboutDialogArtistsPropertyInfo
instance AttrInfo AboutDialogArtistsPropertyInfo where
    type AttrAllowedOps AboutDialogArtistsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint AboutDialogArtistsPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogArtistsPropertyInfo = (~) [T.Text]
    type AttrTransferTypeConstraint AboutDialogArtistsPropertyInfo = (~) [T.Text]
    type AttrTransferType AboutDialogArtistsPropertyInfo = [T.Text]
    type AttrGetType AboutDialogArtistsPropertyInfo = (Maybe [T.Text])
    type AttrLabel AboutDialogArtistsPropertyInfo = "artists"
    type AttrOrigin AboutDialogArtistsPropertyInfo = AboutDialog
    attrGet = getAboutDialogArtists
    attrSet = setAboutDialogArtists
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogArtists
    attrClear = clearAboutDialogArtists
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.artists"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:artists"
        })
#endif

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

-- | Get the value of the “@comments@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #comments
-- @
getAboutDialogComments :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogComments :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogComments 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
"getAboutDialogComments" (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"

-- | Set the value of the “@comments@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #comments 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogComments :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogComments :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogComments 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)

-- | Construct a `GValueConstruct` with valid value for the “@comments@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogComments :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogComments :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogComments 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 AboutDialogCommentsPropertyInfo
instance AttrInfo AboutDialogCommentsPropertyInfo where
    type AttrAllowedOps AboutDialogCommentsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogCommentsPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogCommentsPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogCommentsPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogCommentsPropertyInfo = T.Text
    type AttrGetType AboutDialogCommentsPropertyInfo = T.Text
    type AttrLabel AboutDialogCommentsPropertyInfo = "comments"
    type AttrOrigin AboutDialogCommentsPropertyInfo = AboutDialog
    attrGet = getAboutDialogComments
    attrSet = setAboutDialogComments
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogComments
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.comments"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:comments"
        })
#endif

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

-- | Get the value of the “@copyright@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #copyright
-- @
getAboutDialogCopyright :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogCopyright :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogCopyright 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
"getAboutDialogCopyright" (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"

-- | Set the value of the “@copyright@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #copyright 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogCopyright :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogCopyright :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogCopyright o
obj Text
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@copyright@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogCopyright :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogCopyright :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogCopyright Text
val = 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 AboutDialogCopyrightPropertyInfo
instance AttrInfo AboutDialogCopyrightPropertyInfo where
    type AttrAllowedOps AboutDialogCopyrightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogCopyrightPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogCopyrightPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogCopyrightPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogCopyrightPropertyInfo = T.Text
    type AttrGetType AboutDialogCopyrightPropertyInfo = T.Text
    type AttrLabel AboutDialogCopyrightPropertyInfo = "copyright"
    type AttrOrigin AboutDialogCopyrightPropertyInfo = AboutDialog
    attrGet = getAboutDialogCopyright
    attrSet = setAboutDialogCopyright
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogCopyright
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.copyright"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:copyright"
        })
#endif

-- VVV Prop "debug-info"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@debug-info@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #debugInfo
-- @
getAboutDialogDebugInfo :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogDebugInfo :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogDebugInfo 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
"getAboutDialogDebugInfo" (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"

-- | Set the value of the “@debug-info@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #debugInfo 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDebugInfo :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogDebugInfo :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogDebugInfo 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)

-- | Construct a `GValueConstruct` with valid value for the “@debug-info@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDebugInfo :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogDebugInfo :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogDebugInfo 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 AboutDialogDebugInfoPropertyInfo
instance AttrInfo AboutDialogDebugInfoPropertyInfo where
    type AttrAllowedOps AboutDialogDebugInfoPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogDebugInfoPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDebugInfoPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogDebugInfoPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogDebugInfoPropertyInfo = T.Text
    type AttrGetType AboutDialogDebugInfoPropertyInfo = T.Text
    type AttrLabel AboutDialogDebugInfoPropertyInfo = "debug-info"
    type AttrOrigin AboutDialogDebugInfoPropertyInfo = AboutDialog
    attrGet = getAboutDialogDebugInfo
    attrSet = setAboutDialogDebugInfo
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDebugInfo
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.debugInfo"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:debugInfo"
        })
#endif

-- VVV Prop "debug-info-filename"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@debug-info-filename@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #debugInfoFilename
-- @
getAboutDialogDebugInfoFilename :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogDebugInfoFilename :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogDebugInfoFilename 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
"getAboutDialogDebugInfoFilename" (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"

-- | Set the value of the “@debug-info-filename@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #debugInfoFilename 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDebugInfoFilename :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogDebugInfoFilename :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogDebugInfoFilename 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)

-- | Construct a `GValueConstruct` with valid value for the “@debug-info-filename@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDebugInfoFilename :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogDebugInfoFilename :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogDebugInfoFilename 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 AboutDialogDebugInfoFilenamePropertyInfo
instance AttrInfo AboutDialogDebugInfoFilenamePropertyInfo where
    type AttrAllowedOps AboutDialogDebugInfoFilenamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogDebugInfoFilenamePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDebugInfoFilenamePropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogDebugInfoFilenamePropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogDebugInfoFilenamePropertyInfo = T.Text
    type AttrGetType AboutDialogDebugInfoFilenamePropertyInfo = T.Text
    type AttrLabel AboutDialogDebugInfoFilenamePropertyInfo = "debug-info-filename"
    type AttrOrigin AboutDialogDebugInfoFilenamePropertyInfo = AboutDialog
    attrGet = getAboutDialogDebugInfoFilename
    attrSet = setAboutDialogDebugInfoFilename
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDebugInfoFilename
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.debugInfoFilename"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:debugInfoFilename"
        })
#endif

-- VVV Prop "designers"
   -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just True,Just True)

-- | Get the value of the “@designers@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #designers
-- @
getAboutDialogDesigners :: (MonadIO m, IsAboutDialog o) => o -> m (Maybe [T.Text])
getAboutDialogDesigners :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m (Maybe [Text])
getAboutDialogDesigners 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"

-- | Set the value of the “@designers@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #designers 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDesigners :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogDesigners :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogDesigners 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)

-- | Construct a `GValueConstruct` with valid value for the “@designers@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDesigners :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogDesigners :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogDesigners [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)

-- | Set the value of the “@designers@” property to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #designers
-- @
clearAboutDialogDesigners :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDesigners :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDesigners 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 AboutDialogDesignersPropertyInfo
instance AttrInfo AboutDialogDesignersPropertyInfo where
    type AttrAllowedOps AboutDialogDesignersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint AboutDialogDesignersPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDesignersPropertyInfo = (~) [T.Text]
    type AttrTransferTypeConstraint AboutDialogDesignersPropertyInfo = (~) [T.Text]
    type AttrTransferType AboutDialogDesignersPropertyInfo = [T.Text]
    type AttrGetType AboutDialogDesignersPropertyInfo = (Maybe [T.Text])
    type AttrLabel AboutDialogDesignersPropertyInfo = "designers"
    type AttrOrigin AboutDialogDesignersPropertyInfo = AboutDialog
    attrGet = getAboutDialogDesigners
    attrSet = setAboutDialogDesigners
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDesigners
    attrClear = clearAboutDialogDesigners
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.designers"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:designers"
        })
#endif

-- VVV Prop "developer-name"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@developer-name@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #developerName
-- @
getAboutDialogDeveloperName :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogDeveloperName :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogDeveloperName 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
"getAboutDialogDeveloperName" (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"

-- | Set the value of the “@developer-name@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #developerName 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDeveloperName :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogDeveloperName :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogDeveloperName 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)

-- | Construct a `GValueConstruct` with valid value for the “@developer-name@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDeveloperName :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogDeveloperName :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogDeveloperName 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 AboutDialogDeveloperNamePropertyInfo
instance AttrInfo AboutDialogDeveloperNamePropertyInfo where
    type AttrAllowedOps AboutDialogDeveloperNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogDeveloperNamePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDeveloperNamePropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogDeveloperNamePropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogDeveloperNamePropertyInfo = T.Text
    type AttrGetType AboutDialogDeveloperNamePropertyInfo = T.Text
    type AttrLabel AboutDialogDeveloperNamePropertyInfo = "developer-name"
    type AttrOrigin AboutDialogDeveloperNamePropertyInfo = AboutDialog
    attrGet = getAboutDialogDeveloperName
    attrSet = setAboutDialogDeveloperName
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDeveloperName
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.developerName"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:developerName"
        })
#endif

-- VVV Prop "developers"
   -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just True,Just True)

-- | Get the value of the “@developers@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #developers
-- @
getAboutDialogDevelopers :: (MonadIO m, IsAboutDialog o) => o -> m (Maybe [T.Text])
getAboutDialogDevelopers :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m (Maybe [Text])
getAboutDialogDevelopers 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"

-- | Set the value of the “@developers@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #developers 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDevelopers :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogDevelopers :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogDevelopers 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)

-- | Construct a `GValueConstruct` with valid value for the “@developers@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDevelopers :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogDevelopers :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogDevelopers [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)

-- | Set the value of the “@developers@” property to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #developers
-- @
clearAboutDialogDevelopers :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDevelopers :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDevelopers 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 AboutDialogDevelopersPropertyInfo
instance AttrInfo AboutDialogDevelopersPropertyInfo where
    type AttrAllowedOps AboutDialogDevelopersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint AboutDialogDevelopersPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDevelopersPropertyInfo = (~) [T.Text]
    type AttrTransferTypeConstraint AboutDialogDevelopersPropertyInfo = (~) [T.Text]
    type AttrTransferType AboutDialogDevelopersPropertyInfo = [T.Text]
    type AttrGetType AboutDialogDevelopersPropertyInfo = (Maybe [T.Text])
    type AttrLabel AboutDialogDevelopersPropertyInfo = "developers"
    type AttrOrigin AboutDialogDevelopersPropertyInfo = AboutDialog
    attrGet = getAboutDialogDevelopers
    attrSet = setAboutDialogDevelopers
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDevelopers
    attrClear = clearAboutDialogDevelopers
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.developers"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:developers"
        })
#endif

-- VVV Prop "documenters"
   -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just True,Just True)

-- | Get the value of the “@documenters@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #documenters
-- @
getAboutDialogDocumenters :: (MonadIO m, IsAboutDialog o) => o -> m (Maybe [T.Text])
getAboutDialogDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m (Maybe [Text])
getAboutDialogDocumenters 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"

-- | Set the value of the “@documenters@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #documenters 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogDocumenters :: (MonadIO m, IsAboutDialog o) => o -> [T.Text] -> m ()
setAboutDialogDocumenters :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> [Text] -> m ()
setAboutDialogDocumenters o
obj [Text]
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@documenters@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogDocumenters :: (IsAboutDialog o, MIO.MonadIO m) => [T.Text] -> m (GValueConstruct o)
constructAboutDialogDocumenters :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
[Text] -> m (GValueConstruct o)
constructAboutDialogDocumenters [Text]
val = 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)

-- | Set the value of the “@documenters@” property to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #documenters
-- @
clearAboutDialogDocumenters :: (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDocumenters :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m ()
clearAboutDialogDocumenters 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 AboutDialogDocumentersPropertyInfo
instance AttrInfo AboutDialogDocumentersPropertyInfo where
    type AttrAllowedOps AboutDialogDocumentersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint AboutDialogDocumentersPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogDocumentersPropertyInfo = (~) [T.Text]
    type AttrTransferTypeConstraint AboutDialogDocumentersPropertyInfo = (~) [T.Text]
    type AttrTransferType AboutDialogDocumentersPropertyInfo = [T.Text]
    type AttrGetType AboutDialogDocumentersPropertyInfo = (Maybe [T.Text])
    type AttrLabel AboutDialogDocumentersPropertyInfo = "documenters"
    type AttrOrigin AboutDialogDocumentersPropertyInfo = AboutDialog
    attrGet = getAboutDialogDocumenters
    attrSet = setAboutDialogDocumenters
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogDocumenters
    attrClear = clearAboutDialogDocumenters
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.documenters"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:documenters"
        })
#endif

-- VVV Prop "issue-url"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@issue-url@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #issueUrl
-- @
getAboutDialogIssueUrl :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogIssueUrl :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogIssueUrl 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
"getAboutDialogIssueUrl" (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"

-- | Set the value of the “@issue-url@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #issueUrl 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogIssueUrl :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogIssueUrl :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogIssueUrl 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)

-- | Construct a `GValueConstruct` with valid value for the “@issue-url@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogIssueUrl :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogIssueUrl :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogIssueUrl 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 AboutDialogIssueUrlPropertyInfo
instance AttrInfo AboutDialogIssueUrlPropertyInfo where
    type AttrAllowedOps AboutDialogIssueUrlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogIssueUrlPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogIssueUrlPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogIssueUrlPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogIssueUrlPropertyInfo = T.Text
    type AttrGetType AboutDialogIssueUrlPropertyInfo = T.Text
    type AttrLabel AboutDialogIssueUrlPropertyInfo = "issue-url"
    type AttrOrigin AboutDialogIssueUrlPropertyInfo = AboutDialog
    attrGet = getAboutDialogIssueUrl
    attrSet = setAboutDialogIssueUrl
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogIssueUrl
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.issueUrl"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:issueUrl"
        })
#endif

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

-- | Get the value of the “@license@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #license
-- @
getAboutDialogLicense :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogLicense :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogLicense 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
"getAboutDialogLicense" (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"

-- | Set the value of the “@license@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #license 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogLicense :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogLicense :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogLicense o
obj Text
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@license@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogLicense :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogLicense :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogLicense Text
val = 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 AboutDialogLicensePropertyInfo
instance AttrInfo AboutDialogLicensePropertyInfo where
    type AttrAllowedOps AboutDialogLicensePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogLicensePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogLicensePropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogLicensePropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogLicensePropertyInfo = T.Text
    type AttrGetType AboutDialogLicensePropertyInfo = T.Text
    type AttrLabel AboutDialogLicensePropertyInfo = "license"
    type AttrOrigin AboutDialogLicensePropertyInfo = AboutDialog
    attrGet = getAboutDialogLicense
    attrSet = setAboutDialogLicense
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogLicense
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.license"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:license"
        })
#endif

-- VVV Prop "license-type"
   -- Type: TInterface (Name {namespace = "Gtk", name = "License"})
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@license-type@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #licenseType
-- @
getAboutDialogLicenseType :: (MonadIO m, IsAboutDialog o) => o -> m Gtk.Enums.License
getAboutDialogLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> m License
getAboutDialogLicenseType 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"

-- | Set the value of the “@license-type@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #licenseType 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogLicenseType :: (MonadIO m, IsAboutDialog o) => o -> Gtk.Enums.License -> m ()
setAboutDialogLicenseType :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> License -> m ()
setAboutDialogLicenseType o
obj License
val = 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

-- | Construct a `GValueConstruct` with valid value for the “@license-type@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogLicenseType :: (IsAboutDialog o, MIO.MonadIO m) => Gtk.Enums.License -> m (GValueConstruct o)
constructAboutDialogLicenseType :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
License -> m (GValueConstruct o)
constructAboutDialogLicenseType License
val = 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 AboutDialogLicenseTypePropertyInfo
instance AttrInfo AboutDialogLicenseTypePropertyInfo where
    type AttrAllowedOps AboutDialogLicenseTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogLicenseTypePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogLicenseTypePropertyInfo = (~) Gtk.Enums.License
    type AttrTransferTypeConstraint AboutDialogLicenseTypePropertyInfo = (~) Gtk.Enums.License
    type AttrTransferType AboutDialogLicenseTypePropertyInfo = Gtk.Enums.License
    type AttrGetType AboutDialogLicenseTypePropertyInfo = Gtk.Enums.License
    type AttrLabel AboutDialogLicenseTypePropertyInfo = "license-type"
    type AttrOrigin AboutDialogLicenseTypePropertyInfo = AboutDialog
    attrGet = getAboutDialogLicenseType
    attrSet = setAboutDialogLicenseType
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogLicenseType
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.licenseType"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:licenseType"
        })
#endif

-- VVV Prop "release-notes"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@release-notes@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #releaseNotes
-- @
getAboutDialogReleaseNotes :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogReleaseNotes :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogReleaseNotes 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
"getAboutDialogReleaseNotes" (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"

-- | Set the value of the “@release-notes@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #releaseNotes 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogReleaseNotes :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogReleaseNotes :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogReleaseNotes 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)

-- | Construct a `GValueConstruct` with valid value for the “@release-notes@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogReleaseNotes :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogReleaseNotes :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogReleaseNotes 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 AboutDialogReleaseNotesPropertyInfo
instance AttrInfo AboutDialogReleaseNotesPropertyInfo where
    type AttrAllowedOps AboutDialogReleaseNotesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogReleaseNotesPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogReleaseNotesPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogReleaseNotesPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogReleaseNotesPropertyInfo = T.Text
    type AttrGetType AboutDialogReleaseNotesPropertyInfo = T.Text
    type AttrLabel AboutDialogReleaseNotesPropertyInfo = "release-notes"
    type AttrOrigin AboutDialogReleaseNotesPropertyInfo = AboutDialog
    attrGet = getAboutDialogReleaseNotes
    attrSet = setAboutDialogReleaseNotes
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogReleaseNotes
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.releaseNotes"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:releaseNotes"
        })
#endif

-- VVV Prop "release-notes-version"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@release-notes-version@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #releaseNotesVersion
-- @
getAboutDialogReleaseNotesVersion :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogReleaseNotesVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogReleaseNotesVersion 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
"getAboutDialogReleaseNotesVersion" (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"

-- | Set the value of the “@release-notes-version@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #releaseNotesVersion 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogReleaseNotesVersion :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogReleaseNotesVersion :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogReleaseNotesVersion 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)

-- | Construct a `GValueConstruct` with valid value for the “@release-notes-version@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogReleaseNotesVersion :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogReleaseNotesVersion :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogReleaseNotesVersion 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 AboutDialogReleaseNotesVersionPropertyInfo
instance AttrInfo AboutDialogReleaseNotesVersionPropertyInfo where
    type AttrAllowedOps AboutDialogReleaseNotesVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogReleaseNotesVersionPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogReleaseNotesVersionPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogReleaseNotesVersionPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogReleaseNotesVersionPropertyInfo = T.Text
    type AttrGetType AboutDialogReleaseNotesVersionPropertyInfo = T.Text
    type AttrLabel AboutDialogReleaseNotesVersionPropertyInfo = "release-notes-version"
    type AttrOrigin AboutDialogReleaseNotesVersionPropertyInfo = AboutDialog
    attrGet = getAboutDialogReleaseNotesVersion
    attrSet = setAboutDialogReleaseNotesVersion
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogReleaseNotesVersion
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.releaseNotesVersion"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:releaseNotesVersion"
        })
#endif

-- VVV Prop "support-url"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@support-url@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #supportUrl
-- @
getAboutDialogSupportUrl :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogSupportUrl :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogSupportUrl 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
"getAboutDialogSupportUrl" (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"

-- | Set the value of the “@support-url@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #supportUrl 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogSupportUrl :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogSupportUrl :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogSupportUrl 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)

-- | Construct a `GValueConstruct` with valid value for the “@support-url@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogSupportUrl :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogSupportUrl :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogSupportUrl 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 AboutDialogSupportUrlPropertyInfo
instance AttrInfo AboutDialogSupportUrlPropertyInfo where
    type AttrAllowedOps AboutDialogSupportUrlPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogSupportUrlPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogSupportUrlPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogSupportUrlPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogSupportUrlPropertyInfo = T.Text
    type AttrGetType AboutDialogSupportUrlPropertyInfo = T.Text
    type AttrLabel AboutDialogSupportUrlPropertyInfo = "support-url"
    type AttrOrigin AboutDialogSupportUrlPropertyInfo = AboutDialog
    attrGet = getAboutDialogSupportUrl
    attrSet = setAboutDialogSupportUrl
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogSupportUrl
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.supportUrl"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:supportUrl"
        })
#endif

-- VVV Prop "translator-credits"
   -- Type: TBasicType TUTF8
   -- Flags: [PropertyReadable,PropertyWritable]
   -- Nullable: (Just False,Just False)

-- | Get the value of the “@translator-credits@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #translatorCredits
-- @
getAboutDialogTranslatorCredits :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogTranslatorCredits :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogTranslatorCredits 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
"getAboutDialogTranslatorCredits" (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"

-- | Set the value of the “@translator-credits@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #translatorCredits 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogTranslatorCredits :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogTranslatorCredits :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogTranslatorCredits o
obj Text
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@translator-credits@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogTranslatorCredits :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogTranslatorCredits :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogTranslatorCredits Text
val = 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 AboutDialogTranslatorCreditsPropertyInfo
instance AttrInfo AboutDialogTranslatorCreditsPropertyInfo where
    type AttrAllowedOps AboutDialogTranslatorCreditsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogTranslatorCreditsPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogTranslatorCreditsPropertyInfo = T.Text
    type AttrGetType AboutDialogTranslatorCreditsPropertyInfo = T.Text
    type AttrLabel AboutDialogTranslatorCreditsPropertyInfo = "translator-credits"
    type AttrOrigin AboutDialogTranslatorCreditsPropertyInfo = AboutDialog
    attrGet = getAboutDialogTranslatorCredits
    attrSet = setAboutDialogTranslatorCredits
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogTranslatorCredits
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.translatorCredits"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:translatorCredits"
        })
#endif

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

-- | Get the value of the “@version@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #version
-- @
getAboutDialogVersion :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogVersion :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogVersion 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
"getAboutDialogVersion" (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"

-- | Set the value of the “@version@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #version 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogVersion :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogVersion :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogVersion o
obj Text
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@version@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogVersion :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogVersion :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogVersion Text
val = 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 AboutDialogVersionPropertyInfo
instance AttrInfo AboutDialogVersionPropertyInfo where
    type AttrAllowedOps AboutDialogVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogVersionPropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogVersionPropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogVersionPropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogVersionPropertyInfo = T.Text
    type AttrGetType AboutDialogVersionPropertyInfo = T.Text
    type AttrLabel AboutDialogVersionPropertyInfo = "version"
    type AttrOrigin AboutDialogVersionPropertyInfo = AboutDialog
    attrGet = getAboutDialogVersion
    attrSet = setAboutDialogVersion
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogVersion
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.version"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:version"
        })
#endif

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

-- | Get the value of the “@website@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' aboutDialog #website
-- @
getAboutDialogWebsite :: (MonadIO m, IsAboutDialog o) => o -> m T.Text
getAboutDialogWebsite :: forall (m :: * -> *) o. (MonadIO m, IsAboutDialog o) => o -> m Text
getAboutDialogWebsite 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
"getAboutDialogWebsite" (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"

-- | Set the value of the “@website@” property.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' aboutDialog [ #website 'Data.GI.Base.Attributes.:=' value ]
-- @
setAboutDialogWebsite :: (MonadIO m, IsAboutDialog o) => o -> T.Text -> m ()
setAboutDialogWebsite :: forall (m :: * -> *) o.
(MonadIO m, IsAboutDialog o) =>
o -> Text -> m ()
setAboutDialogWebsite o
obj Text
val = 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)

-- | Construct a `GValueConstruct` with valid value for the “@website@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
constructAboutDialogWebsite :: (IsAboutDialog o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructAboutDialogWebsite :: forall o (m :: * -> *).
(IsAboutDialog o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructAboutDialogWebsite Text
val = 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 AboutDialogWebsitePropertyInfo
instance AttrInfo AboutDialogWebsitePropertyInfo where
    type AttrAllowedOps AboutDialogWebsitePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint AboutDialogWebsitePropertyInfo = IsAboutDialog
    type AttrSetTypeConstraint AboutDialogWebsitePropertyInfo = (~) T.Text
    type AttrTransferTypeConstraint AboutDialogWebsitePropertyInfo = (~) T.Text
    type AttrTransferType AboutDialogWebsitePropertyInfo = T.Text
    type AttrGetType AboutDialogWebsitePropertyInfo = T.Text
    type AttrLabel AboutDialogWebsitePropertyInfo = "website"
    type AttrOrigin AboutDialogWebsitePropertyInfo = AboutDialog
    attrGet = getAboutDialogWebsite
    attrSet = setAboutDialogWebsite
    attrTransfer _ v = do
        return v
    attrConstruct = constructAboutDialogWebsite
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.website"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#g:attr:website"
        })
#endif

#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList AboutDialog
type instance O.AttributeList AboutDialog = AboutDialogAttributeList
type AboutDialogAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("applicationIcon", AboutDialogApplicationIconPropertyInfo), '("applicationName", AboutDialogApplicationNamePropertyInfo), '("artists", AboutDialogArtistsPropertyInfo), '("canClose", Adw.Dialog.DialogCanClosePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("child", Adw.Dialog.DialogChildPropertyInfo), '("comments", AboutDialogCommentsPropertyInfo), '("contentHeight", Adw.Dialog.DialogContentHeightPropertyInfo), '("contentWidth", Adw.Dialog.DialogContentWidthPropertyInfo), '("copyright", AboutDialogCopyrightPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("currentBreakpoint", Adw.Dialog.DialogCurrentBreakpointPropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("debugInfo", AboutDialogDebugInfoPropertyInfo), '("debugInfoFilename", AboutDialogDebugInfoFilenamePropertyInfo), '("defaultWidget", Adw.Dialog.DialogDefaultWidgetPropertyInfo), '("designers", AboutDialogDesignersPropertyInfo), '("developerName", AboutDialogDeveloperNamePropertyInfo), '("developers", AboutDialogDevelopersPropertyInfo), '("documenters", AboutDialogDocumentersPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusWidget", Adw.Dialog.DialogFocusWidgetPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("followsContentSize", Adw.Dialog.DialogFollowsContentSizePropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("issueUrl", AboutDialogIssueUrlPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("license", AboutDialogLicensePropertyInfo), '("licenseType", AboutDialogLicenseTypePropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("presentationMode", Adw.Dialog.DialogPresentationModePropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("releaseNotes", AboutDialogReleaseNotesPropertyInfo), '("releaseNotesVersion", AboutDialogReleaseNotesVersionPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("supportUrl", AboutDialogSupportUrlPropertyInfo), '("title", Adw.Dialog.DialogTitlePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("translatorCredits", AboutDialogTranslatorCreditsPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("version", AboutDialogVersionPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("website", AboutDialogWebsitePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, DK.Type)])
#endif

#if defined(ENABLE_OVERLOADING)
aboutDialogApplicationIcon :: AttrLabelProxy "applicationIcon"
aboutDialogApplicationIcon = AttrLabelProxy

aboutDialogApplicationName :: AttrLabelProxy "applicationName"
aboutDialogApplicationName = AttrLabelProxy

aboutDialogArtists :: AttrLabelProxy "artists"
aboutDialogArtists = AttrLabelProxy

aboutDialogComments :: AttrLabelProxy "comments"
aboutDialogComments = AttrLabelProxy

aboutDialogCopyright :: AttrLabelProxy "copyright"
aboutDialogCopyright = AttrLabelProxy

aboutDialogDebugInfo :: AttrLabelProxy "debugInfo"
aboutDialogDebugInfo = AttrLabelProxy

aboutDialogDebugInfoFilename :: AttrLabelProxy "debugInfoFilename"
aboutDialogDebugInfoFilename = AttrLabelProxy

aboutDialogDesigners :: AttrLabelProxy "designers"
aboutDialogDesigners = AttrLabelProxy

aboutDialogDeveloperName :: AttrLabelProxy "developerName"
aboutDialogDeveloperName = AttrLabelProxy

aboutDialogDevelopers :: AttrLabelProxy "developers"
aboutDialogDevelopers = AttrLabelProxy

aboutDialogDocumenters :: AttrLabelProxy "documenters"
aboutDialogDocumenters = AttrLabelProxy

aboutDialogIssueUrl :: AttrLabelProxy "issueUrl"
aboutDialogIssueUrl = AttrLabelProxy

aboutDialogLicense :: AttrLabelProxy "license"
aboutDialogLicense = AttrLabelProxy

aboutDialogLicenseType :: AttrLabelProxy "licenseType"
aboutDialogLicenseType = AttrLabelProxy

aboutDialogReleaseNotes :: AttrLabelProxy "releaseNotes"
aboutDialogReleaseNotes = AttrLabelProxy

aboutDialogReleaseNotesVersion :: AttrLabelProxy "releaseNotesVersion"
aboutDialogReleaseNotesVersion = AttrLabelProxy

aboutDialogSupportUrl :: AttrLabelProxy "supportUrl"
aboutDialogSupportUrl = AttrLabelProxy

aboutDialogTranslatorCredits :: AttrLabelProxy "translatorCredits"
aboutDialogTranslatorCredits = AttrLabelProxy

aboutDialogVersion :: AttrLabelProxy "version"
aboutDialogVersion = AttrLabelProxy

aboutDialogWebsite :: AttrLabelProxy "website"
aboutDialogWebsite = AttrLabelProxy

#endif

#if defined(ENABLE_OVERLOADING)
type instance O.SignalList AboutDialog = AboutDialogSignalList
type AboutDialogSignalList = ('[ '("activateLink", AboutDialogActivateLinkSignalInfo), '("closeAttempt", Adw.Dialog.DialogCloseAttemptSignalInfo), '("closed", Adw.Dialog.DialogClosedSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("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

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

foreign import ccall "adw_about_dialog_new" adw_about_dialog_new :: 
    IO (Ptr AboutDialog)

-- | Creates a new @AdwAboutDialog@.
-- 
-- /Since: 1.5/
aboutDialogNew ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    m AboutDialog
    -- ^ __Returns:__ the newly created @AdwAboutDialog@
aboutDialogNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m AboutDialog
aboutDialogNew  = IO AboutDialog -> m AboutDialog
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO AboutDialog -> m AboutDialog)
-> IO AboutDialog -> m AboutDialog
forall a b. (a -> b) -> a -> b
$ do
    Ptr AboutDialog
result <- IO (Ptr AboutDialog)
adw_about_dialog_new
    Text -> Ptr AboutDialog -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogNew" Ptr AboutDialog
result
    AboutDialog
result' <- ((ManagedPtr AboutDialog -> AboutDialog)
-> Ptr AboutDialog -> IO AboutDialog
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr AboutDialog -> AboutDialog
AboutDialog) Ptr AboutDialog
result
    AboutDialog -> IO AboutDialog
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return AboutDialog
result'

#if defined(ENABLE_OVERLOADING)
#endif

-- method AboutDialog::new_from_appdata
-- method type : Constructor
-- Args: [ Arg
--           { argCName = "resource_path"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "The resource to use"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "release_notes_version"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "The version to retrieve release notes for"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TInterface Name { namespace = "Adw" , name = "AboutDialog" })
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_new_from_appdata" adw_about_dialog_new_from_appdata :: 
    CString ->                              -- resource_path : TBasicType TUTF8
    CString ->                              -- release_notes_version : TBasicType TUTF8
    IO (Ptr AboutDialog)

-- | Creates a new @AdwAboutDialog@ using AppStream metadata.
-- 
-- This automatically sets the following properties with the following AppStream
-- values:
-- 
-- * [property/@aboutDialog@/:application-icon] is set from the @\<id>@
-- * [property/@aboutDialog@/:application-name] is set from the @\<name>@
-- * [property/@aboutDialog@/:developer-name] is set from the @\<name>@ within
--      @\<developer>@
-- * [property/@aboutDialog@/:version] is set from the version of the latest release
-- * [property/@aboutDialog@/:website] is set from the @\<url type=\"homepage\">@
-- * [property/@aboutDialog@/:support-url] is set from the @\<url type=\"help\">@
-- * [property/@aboutDialog@/:issue-url] is set from the @\<url type=\"bugtracker\">@
-- * [property/@aboutDialog@/:license-type] is set from the @\<project_license>@.
--     If the license type retrieved from AppStream is not listed in
--     t'GI.Gtk.Enums.License', it will be set to @GTK_LICENCE_CUSTOM@.
-- 
-- If /@releaseNotesVersion@/ is not @NULL@,
-- [property/@aboutDialog@/:release-notes-version] is set to match it, while
-- [property/@aboutDialog@/:release-notes] is set from the AppStream release
-- description for that version.
-- 
-- /Since: 1.5/
aboutDialogNewFromAppdata ::
    (B.CallStack.HasCallStack, MonadIO m) =>
    T.Text
    -- ^ /@resourcePath@/: The resource to use
    -> Maybe (T.Text)
    -- ^ /@releaseNotesVersion@/: The version to retrieve release notes for
    -> m AboutDialog
    -- ^ __Returns:__ the newly created @AdwAboutDialog@
aboutDialogNewFromAppdata :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
Text -> Maybe Text -> m AboutDialog
aboutDialogNewFromAppdata Text
resourcePath Maybe Text
releaseNotesVersion = IO AboutDialog -> m AboutDialog
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO AboutDialog -> m AboutDialog)
-> IO AboutDialog -> m AboutDialog
forall a b. (a -> b) -> a -> b
$ do
    CString
resourcePath' <- Text -> IO CString
textToCString Text
resourcePath
    CString
maybeReleaseNotesVersion <- case Maybe Text
releaseNotesVersion 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
jReleaseNotesVersion -> do
            CString
jReleaseNotesVersion' <- Text -> IO CString
textToCString Text
jReleaseNotesVersion
            CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jReleaseNotesVersion'
    Ptr AboutDialog
result <- CString -> CString -> IO (Ptr AboutDialog)
adw_about_dialog_new_from_appdata CString
resourcePath' CString
maybeReleaseNotesVersion
    Text -> Ptr AboutDialog -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogNewFromAppdata" Ptr AboutDialog
result
    AboutDialog
result' <- ((ManagedPtr AboutDialog -> AboutDialog)
-> Ptr AboutDialog -> IO AboutDialog
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr AboutDialog -> AboutDialog
AboutDialog) Ptr AboutDialog
result
    CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
resourcePath'
    CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeReleaseNotesVersion
    AboutDialog -> IO AboutDialog
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return AboutDialog
result'

#if defined(ENABLE_OVERLOADING)
#endif

-- method AboutDialog::add_acknowledgement_section
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "name"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the section name" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "people"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of names" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_add_acknowledgement_section" adw_about_dialog_add_acknowledgement_section :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- name : TBasicType TUTF8
    Ptr CString ->                          -- people : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Adds a section to the Acknowledgements page.
-- 
-- This can be used to acknowledge additional people and organizations for their
-- non-development contributions - for example, backers in a crowdfunded
-- project.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- 
-- /Since: 1.5/
aboutDialogAddAcknowledgementSection ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe (T.Text)
    -- ^ /@name@/: the section name
    -> [T.Text]
    -- ^ /@people@/: the list of names
    -> m ()
aboutDialogAddAcknowledgementSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> [Text] -> m ()
aboutDialogAddAcknowledgementSection 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> CString -> Ptr CString -> IO ()
adw_about_dialog_add_acknowledgement_section Ptr AboutDialog
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 AboutDialogAddAcknowledgementSectionMethodInfo
instance (signature ~ (Maybe (T.Text) -> [T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogAddAcknowledgementSectionMethodInfo a signature where
    overloadedMethod = aboutDialogAddAcknowledgementSection

instance O.OverloadedMethodInfo AboutDialogAddAcknowledgementSectionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogAddAcknowledgementSection",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogAddAcknowledgementSection"
        })


#endif

-- method AboutDialog::add_credit_section
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "name"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the section name" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "people"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of names" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_add_credit_section" adw_about_dialog_add_credit_section :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- name : TBasicType TUTF8
    Ptr CString ->                          -- people : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Adds an extra section to the Credits page.
-- 
-- Extra sections are displayed below the standard categories.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogAddCreditSection ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe (T.Text)
    -- ^ /@name@/: the section name
    -> [T.Text]
    -- ^ /@people@/: the list of names
    -> m ()
aboutDialogAddCreditSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe Text -> [Text] -> m ()
aboutDialogAddCreditSection 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> CString -> Ptr CString -> IO ()
adw_about_dialog_add_credit_section Ptr AboutDialog
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 AboutDialogAddCreditSectionMethodInfo
instance (signature ~ (Maybe (T.Text) -> [T.Text] -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogAddCreditSectionMethodInfo a signature where
    overloadedMethod = aboutDialogAddCreditSection

instance O.OverloadedMethodInfo AboutDialogAddCreditSectionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogAddCreditSection",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogAddCreditSection"
        })


#endif

-- method AboutDialog::add_legal_section
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "title"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the name of the section"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "copyright"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "a copyright string" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "license_type"
--           , argType =
--               TInterface Name { namespace = "Gtk" , name = "License" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the type of license"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "license"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "custom license information"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_add_legal_section" adw_about_dialog_add_legal_section :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- title : TBasicType TUTF8
    CString ->                              -- copyright : TBasicType TUTF8
    CUInt ->                                -- license_type : TInterface (Name {namespace = "Gtk", name = "License"})
    CString ->                              -- license : TBasicType TUTF8
    IO ()

-- | Adds an extra section to the Legal page.
-- 
-- Extra sections will be displayed below the application\'s own information.
-- 
-- The parameters /@copyright@/, /@licenseType@/ and /@license@/ will be used to present
-- the it the same way as [property/@aboutDialog@/:copyright],
-- [property/@aboutDialog@/:license-type] and [property/@aboutDialog@/:license] are
-- for the application\'s own information.
-- 
-- See those properties for more details.
-- 
-- This can be useful to attribute the application dependencies or data.
-- 
-- Examples:
-- 
-- 
-- === /c code/
-- >adw_about_dialog_add_legal_section (ADW_ABOUT_DIALOG (about),
-- >                                    _("Copyright and a known license"),
-- >                                    "© 2022 Example",
-- >                                    GTK_LICENSE_LGPL_2_1,
-- >                                    NULL);
-- >
-- >adw_about_dialog_add_legal_section (ADW_ABOUT_DIALOG (about),
-- >                                    _("Copyright and custom license"),
-- >                                    "© 2022 Example",
-- >                                    GTK_LICENSE_CUSTOM,
-- >                                    "Custom license text");
-- >
-- >adw_about_dialog_add_legal_section (ADW_ABOUT_DIALOG (about),
-- >                                    _("Copyright only"),
-- >                                    "© 2022 Example",
-- >                                    GTK_LICENSE_UNKNOWN,
-- >                                    NULL);
-- >
-- >adw_about_dialog_add_legal_section (ADW_ABOUT_DIALOG (about),
-- >                                    _("Custom license only"),
-- >                                    NULL,
-- >                                    GTK_LICENSE_CUSTOM,
-- >                                    "Something completely custom here.");
-- 
-- 
-- /Since: 1.5/
aboutDialogAddLegalSection ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@title@/: the name of the section
    -> Maybe (T.Text)
    -- ^ /@copyright@/: a copyright string
    -> Gtk.Enums.License
    -- ^ /@licenseType@/: the type of license
    -> Maybe (T.Text)
    -- ^ /@license@/: custom license information
    -> m ()
aboutDialogAddLegalSection :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> Maybe Text -> License -> Maybe Text -> m ()
aboutDialogAddLegalSection 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> CString -> CString -> CUInt -> CString -> IO ()
adw_about_dialog_add_legal_section Ptr AboutDialog
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 AboutDialogAddLegalSectionMethodInfo
instance (signature ~ (T.Text -> Maybe (T.Text) -> Gtk.Enums.License -> Maybe (T.Text) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogAddLegalSectionMethodInfo a signature where
    overloadedMethod = aboutDialogAddLegalSection

instance O.OverloadedMethodInfo AboutDialogAddLegalSectionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogAddLegalSection",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogAddLegalSection"
        })


#endif

-- method AboutDialog::add_link
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "title"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the link title" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "url"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the link URL" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_add_link" adw_about_dialog_add_link :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- title : TBasicType TUTF8
    CString ->                              -- url : TBasicType TUTF8
    IO ()

-- | Adds an extra link to the Details page.
-- 
-- Extra links are displayed under the comment and website.
-- 
-- Underlines in /@title@/ will be interpreted as indicating a mnemonic.
-- 
-- See [property/@aboutDialog@/:website].
-- 
-- /Since: 1.5/
aboutDialogAddLink ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@title@/: the link title
    -> T.Text
    -- ^ /@url@/: the link URL
    -> m ()
aboutDialogAddLink :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> Text -> m ()
aboutDialogAddLink 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> CString -> CString -> IO ()
adw_about_dialog_add_link Ptr AboutDialog
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 AboutDialogAddLinkMethodInfo
instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogAddLinkMethodInfo a signature where
    overloadedMethod = aboutDialogAddLink

instance O.OverloadedMethodInfo AboutDialogAddLinkMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogAddLink",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogAddLink"
        })


#endif

-- method AboutDialog::get_application_icon
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_application_icon" adw_about_dialog_get_application_icon :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the name of the application icon for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetApplicationIcon ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the application icon name
aboutDialogGetApplicationIcon :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetApplicationIcon 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_application_icon Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetApplicationIcon" 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 AboutDialogGetApplicationIconMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetApplicationIconMethodInfo a signature where
    overloadedMethod = aboutDialogGetApplicationIcon

instance O.OverloadedMethodInfo AboutDialogGetApplicationIconMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetApplicationIcon",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetApplicationIcon"
        })


#endif

-- method AboutDialog::get_application_name
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_application_name" adw_about_dialog_get_application_name :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the application name for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetApplicationName ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the application name
aboutDialogGetApplicationName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetApplicationName 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_application_name Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetApplicationName" 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 AboutDialogGetApplicationNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetApplicationNameMethodInfo a signature where
    overloadedMethod = aboutDialogGetApplicationName

instance O.OverloadedMethodInfo AboutDialogGetApplicationNameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetApplicationName",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetApplicationName"
        })


#endif

-- method AboutDialog::get_artists
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TCArray True (-1) (-1) (TBasicType TUTF8))
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_artists" adw_about_dialog_get_artists :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO (Ptr CString)

-- | Gets the list of artists of the application.
-- 
-- /Since: 1.5/
aboutDialogGetArtists ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m (Maybe [T.Text])
    -- ^ __Returns:__ The list of artists
aboutDialogGetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m (Maybe [Text])
aboutDialogGetArtists 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
adw_about_dialog_get_artists Ptr AboutDialog
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 AboutDialogGetArtistsMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetArtistsMethodInfo a signature where
    overloadedMethod = aboutDialogGetArtists

instance O.OverloadedMethodInfo AboutDialogGetArtistsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetArtists",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetArtists"
        })


#endif

-- method AboutDialog::get_comments
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_comments" adw_about_dialog_get_comments :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the comments about the application.
-- 
-- /Since: 1.5/
aboutDialogGetComments ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the comments
aboutDialogGetComments :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetComments 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_comments Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetComments" 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 AboutDialogGetCommentsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetCommentsMethodInfo a signature where
    overloadedMethod = aboutDialogGetComments

instance O.OverloadedMethodInfo AboutDialogGetCommentsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetComments",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetComments"
        })


#endif

-- method AboutDialog::get_copyright
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_copyright" adw_about_dialog_get_copyright :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the copyright information for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetCopyright ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the copyright information
aboutDialogGetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetCopyright 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_copyright Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetCopyright" 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 AboutDialogGetCopyrightMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetCopyrightMethodInfo a signature where
    overloadedMethod = aboutDialogGetCopyright

instance O.OverloadedMethodInfo AboutDialogGetCopyrightMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetCopyright",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetCopyright"
        })


#endif

-- method AboutDialog::get_debug_info
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_debug_info" adw_about_dialog_get_debug_info :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the debug information for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetDebugInfo ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the debug information
aboutDialogGetDebugInfo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetDebugInfo 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_debug_info Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetDebugInfo" 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 AboutDialogGetDebugInfoMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDebugInfoMethodInfo a signature where
    overloadedMethod = aboutDialogGetDebugInfo

instance O.OverloadedMethodInfo AboutDialogGetDebugInfoMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDebugInfo",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDebugInfo"
        })


#endif

-- method AboutDialog::get_debug_info_filename
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_debug_info_filename" adw_about_dialog_get_debug_info_filename :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the debug information filename for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetDebugInfoFilename ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the debug information filename
aboutDialogGetDebugInfoFilename :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetDebugInfoFilename 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_debug_info_filename Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetDebugInfoFilename" 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 AboutDialogGetDebugInfoFilenameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDebugInfoFilenameMethodInfo a signature where
    overloadedMethod = aboutDialogGetDebugInfoFilename

instance O.OverloadedMethodInfo AboutDialogGetDebugInfoFilenameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDebugInfoFilename",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDebugInfoFilename"
        })


#endif

-- method AboutDialog::get_designers
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TCArray True (-1) (-1) (TBasicType TUTF8))
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_designers" adw_about_dialog_get_designers :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO (Ptr CString)

-- | Gets the list of designers of the application.
-- 
-- /Since: 1.5/
aboutDialogGetDesigners ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m (Maybe [T.Text])
    -- ^ __Returns:__ The list of designers
aboutDialogGetDesigners :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m (Maybe [Text])
aboutDialogGetDesigners 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
adw_about_dialog_get_designers Ptr AboutDialog
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 AboutDialogGetDesignersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDesignersMethodInfo a signature where
    overloadedMethod = aboutDialogGetDesigners

instance O.OverloadedMethodInfo AboutDialogGetDesignersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDesigners",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDesigners"
        })


#endif

-- method AboutDialog::get_developer_name
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_developer_name" adw_about_dialog_get_developer_name :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the developer name for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetDeveloperName ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the developer_name
aboutDialogGetDeveloperName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetDeveloperName 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_developer_name Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetDeveloperName" 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 AboutDialogGetDeveloperNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDeveloperNameMethodInfo a signature where
    overloadedMethod = aboutDialogGetDeveloperName

instance O.OverloadedMethodInfo AboutDialogGetDeveloperNameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDeveloperName",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDeveloperName"
        })


#endif

-- method AboutDialog::get_developers
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TCArray True (-1) (-1) (TBasicType TUTF8))
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_developers" adw_about_dialog_get_developers :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO (Ptr CString)

-- | Gets the list of developers of the application.
-- 
-- /Since: 1.5/
aboutDialogGetDevelopers ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m (Maybe [T.Text])
    -- ^ __Returns:__ The list of developers
aboutDialogGetDevelopers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m (Maybe [Text])
aboutDialogGetDevelopers 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
adw_about_dialog_get_developers Ptr AboutDialog
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 AboutDialogGetDevelopersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDevelopersMethodInfo a signature where
    overloadedMethod = aboutDialogGetDevelopers

instance O.OverloadedMethodInfo AboutDialogGetDevelopersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDevelopers",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDevelopers"
        })


#endif

-- method AboutDialog::get_documenters
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TCArray True (-1) (-1) (TBasicType TUTF8))
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_documenters" adw_about_dialog_get_documenters :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO (Ptr CString)

-- | Gets the list of documenters of the application.
-- 
-- /Since: 1.5/
aboutDialogGetDocumenters ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m (Maybe [T.Text])
    -- ^ __Returns:__ The list of documenters
aboutDialogGetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m (Maybe [Text])
aboutDialogGetDocumenters 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr CString
result <- Ptr AboutDialog -> IO (Ptr CString)
adw_about_dialog_get_documenters Ptr AboutDialog
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 AboutDialogGetDocumentersMethodInfo
instance (signature ~ (m (Maybe [T.Text])), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetDocumentersMethodInfo a signature where
    overloadedMethod = aboutDialogGetDocumenters

instance O.OverloadedMethodInfo AboutDialogGetDocumentersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetDocumenters",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetDocumenters"
        })


#endif

-- method AboutDialog::get_issue_url
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_issue_url" adw_about_dialog_get_issue_url :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the issue tracker URL for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetIssueUrl ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the issue tracker URL
aboutDialogGetIssueUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetIssueUrl 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_issue_url Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetIssueUrl" 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 AboutDialogGetIssueUrlMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetIssueUrlMethodInfo a signature where
    overloadedMethod = aboutDialogGetIssueUrl

instance O.OverloadedMethodInfo AboutDialogGetIssueUrlMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetIssueUrl",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetIssueUrl"
        })


#endif

-- method AboutDialog::get_license
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_license" adw_about_dialog_get_license :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the license for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetLicense ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the license
aboutDialogGetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetLicense 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_license Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetLicense" 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 AboutDialogGetLicenseMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLicenseMethodInfo a signature where
    overloadedMethod = aboutDialogGetLicense

instance O.OverloadedMethodInfo AboutDialogGetLicenseMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetLicense",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetLicense"
        })


#endif

-- method AboutDialog::get_license_type
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TInterface Name { namespace = "Gtk" , name = "License" })
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_license_type" adw_about_dialog_get_license_type :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CUInt

-- | Gets the license type for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetLicenseType ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m Gtk.Enums.License
    -- ^ __Returns:__ the license type
aboutDialogGetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m License
aboutDialogGetLicenseType 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CUInt
result <- Ptr AboutDialog -> IO CUInt
adw_about_dialog_get_license_type Ptr AboutDialog
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 AboutDialogGetLicenseTypeMethodInfo
instance (signature ~ (m Gtk.Enums.License), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetLicenseTypeMethodInfo a signature where
    overloadedMethod = aboutDialogGetLicenseType

instance O.OverloadedMethodInfo AboutDialogGetLicenseTypeMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetLicenseType",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetLicenseType"
        })


#endif

-- method AboutDialog::get_release_notes
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_release_notes" adw_about_dialog_get_release_notes :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the release notes for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetReleaseNotes ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the release notes
aboutDialogGetReleaseNotes :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetReleaseNotes 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_release_notes Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetReleaseNotes" 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 AboutDialogGetReleaseNotesMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetReleaseNotesMethodInfo a signature where
    overloadedMethod = aboutDialogGetReleaseNotes

instance O.OverloadedMethodInfo AboutDialogGetReleaseNotesMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetReleaseNotes",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetReleaseNotes"
        })


#endif

-- method AboutDialog::get_release_notes_version
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_release_notes_version" adw_about_dialog_get_release_notes_version :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the version described by the application\'s release notes.
-- 
-- /Since: 1.5/
aboutDialogGetReleaseNotesVersion ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the release notes version
aboutDialogGetReleaseNotesVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetReleaseNotesVersion 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_release_notes_version Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetReleaseNotesVersion" 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 AboutDialogGetReleaseNotesVersionMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetReleaseNotesVersionMethodInfo a signature where
    overloadedMethod = aboutDialogGetReleaseNotesVersion

instance O.OverloadedMethodInfo AboutDialogGetReleaseNotesVersionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetReleaseNotesVersion",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetReleaseNotesVersion"
        })


#endif

-- method AboutDialog::get_support_url
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_support_url" adw_about_dialog_get_support_url :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the URL of the support page for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetSupportUrl ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the support page URL
aboutDialogGetSupportUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetSupportUrl 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_support_url Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetSupportUrl" 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 AboutDialogGetSupportUrlMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetSupportUrlMethodInfo a signature where
    overloadedMethod = aboutDialogGetSupportUrl

instance O.OverloadedMethodInfo AboutDialogGetSupportUrlMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetSupportUrl",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetSupportUrl"
        })


#endif

-- method AboutDialog::get_translator_credits
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_translator_credits" adw_about_dialog_get_translator_credits :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the translator credits string.
-- 
-- /Since: 1.5/
aboutDialogGetTranslatorCredits ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ The translator credits string
aboutDialogGetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetTranslatorCredits 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_translator_credits Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetTranslatorCredits" 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 AboutDialogGetTranslatorCreditsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetTranslatorCreditsMethodInfo a signature where
    overloadedMethod = aboutDialogGetTranslatorCredits

instance O.OverloadedMethodInfo AboutDialogGetTranslatorCreditsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetTranslatorCredits",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetTranslatorCredits"
        })


#endif

-- method AboutDialog::get_version
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_version" adw_about_dialog_get_version :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the version for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetVersion ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the version
aboutDialogGetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetVersion 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_version Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetVersion" 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 AboutDialogGetVersionMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetVersionMethodInfo a signature where
    overloadedMethod = aboutDialogGetVersion

instance O.OverloadedMethodInfo AboutDialogGetVersionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetVersion",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetVersion"
        })


#endif

-- method AboutDialog::get_website
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_get_website" adw_about_dialog_get_website :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    IO CString

-- | Gets the application website URL for /@self@/.
-- 
-- /Since: 1.5/
aboutDialogGetWebsite ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> m T.Text
    -- ^ __Returns:__ the website URL
aboutDialogGetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> m Text
aboutDialogGetWebsite 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
result <- Ptr AboutDialog -> IO CString
adw_about_dialog_get_website Ptr AboutDialog
self'
    Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"aboutDialogGetWebsite" 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 AboutDialogGetWebsiteMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogGetWebsiteMethodInfo a signature where
    overloadedMethod = aboutDialogGetWebsite

instance O.OverloadedMethodInfo AboutDialogGetWebsiteMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogGetWebsite",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogGetWebsite"
        })


#endif

-- method AboutDialog::set_application_icon
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "application_icon"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the application icon name"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_application_icon" adw_about_dialog_set_application_icon :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- application_icon : TBasicType TUTF8
    IO ()

-- | Sets the name of the application icon for /@self@/.
-- 
-- The icon is displayed at the top of the main page.
-- 
-- /Since: 1.5/
aboutDialogSetApplicationIcon ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@applicationIcon@/: the application icon name
    -> m ()
aboutDialogSetApplicationIcon :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetApplicationIcon 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
applicationIcon' <- Text -> IO CString
textToCString Text
applicationIcon
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_application_icon Ptr AboutDialog
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 AboutDialogSetApplicationIconMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetApplicationIconMethodInfo a signature where
    overloadedMethod = aboutDialogSetApplicationIcon

instance O.OverloadedMethodInfo AboutDialogSetApplicationIconMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetApplicationIcon",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetApplicationIcon"
        })


#endif

-- method AboutDialog::set_application_name
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "application_name"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the application name"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_application_name" adw_about_dialog_set_application_name :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- application_name : TBasicType TUTF8
    IO ()

-- | Sets the application name for /@self@/.
-- 
-- The name is displayed at the top of the main page.
-- 
-- /Since: 1.5/
aboutDialogSetApplicationName ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@applicationName@/: the application name
    -> m ()
aboutDialogSetApplicationName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetApplicationName 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
applicationName' <- Text -> IO CString
textToCString Text
applicationName
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_application_name Ptr AboutDialog
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 AboutDialogSetApplicationNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetApplicationNameMethodInfo a signature where
    overloadedMethod = aboutDialogSetApplicationName

instance O.OverloadedMethodInfo AboutDialogSetApplicationNameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetApplicationName",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetApplicationName"
        })


#endif

-- method AboutDialog::set_artists
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "artists"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of artists"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_artists" adw_about_dialog_set_artists :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    Ptr CString ->                          -- artists : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Sets the list of artists of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogSetArtists ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe ([T.Text])
    -- ^ /@artists@/: the list of artists
    -> m ()
aboutDialogSetArtists :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe [Text] -> m ()
aboutDialogSetArtists 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> Ptr CString -> IO ()
adw_about_dialog_set_artists Ptr AboutDialog
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 AboutDialogSetArtistsMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetArtistsMethodInfo a signature where
    overloadedMethod = aboutDialogSetArtists

instance O.OverloadedMethodInfo AboutDialogSetArtistsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetArtists",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetArtists"
        })


#endif

-- method AboutDialog::set_comments
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "comments"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the comments" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_comments" adw_about_dialog_set_comments :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- comments : TBasicType TUTF8
    IO ()

-- | Sets the comments about the application.
-- 
-- Comments will be shown on the Details page, above links.
-- 
-- Unlike [AboutDialog:comments]("GI.Gtk.Objects.AboutDialog#g:attr:comments"), this string can be long and
-- detailed. It can also contain links and Pango markup.
-- 
-- /Since: 1.5/
aboutDialogSetComments ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@comments@/: the comments
    -> m ()
aboutDialogSetComments :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetComments 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
comments' <- Text -> IO CString
textToCString Text
comments
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_comments Ptr AboutDialog
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 AboutDialogSetCommentsMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetCommentsMethodInfo a signature where
    overloadedMethod = aboutDialogSetComments

instance O.OverloadedMethodInfo AboutDialogSetCommentsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetComments",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetComments"
        })


#endif

-- method AboutDialog::set_copyright
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "copyright"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the copyright information"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_copyright" adw_about_dialog_set_copyright :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- copyright : TBasicType TUTF8
    IO ()

-- | Sets the copyright information for /@self@/.
-- 
-- This should be a short string of one or two lines, for example:
-- @© 2022 Example@.
-- 
-- The copyright information will be displayed on the Legal page, before the
-- application license.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add copyright
-- information for the application dependencies or other components.
-- 
-- /Since: 1.5/
aboutDialogSetCopyright ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@copyright@/: the copyright information
    -> m ()
aboutDialogSetCopyright :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetCopyright 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
copyright' <- Text -> IO CString
textToCString Text
copyright
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_copyright Ptr AboutDialog
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 AboutDialogSetCopyrightMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetCopyrightMethodInfo a signature where
    overloadedMethod = aboutDialogSetCopyright

instance O.OverloadedMethodInfo AboutDialogSetCopyrightMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetCopyright",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetCopyright"
        })


#endif

-- method AboutDialog::set_debug_info
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "debug_info"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the debug information"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_debug_info" adw_about_dialog_set_debug_info :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- debug_info : TBasicType TUTF8
    IO ()

-- | Sets the debug information for /@self@/.
-- 
-- Debug information will be shown on the Troubleshooting page. It\'s intended
-- to be attached to issue reports when reporting issues against the
-- application.
-- 
-- @AdwAboutDialog@ provides a quick way to save debug information to a file.
-- When saving, [property/@aboutDialog@/:debug-info-filename] would be used as
-- the suggested filename.
-- 
-- Debug information cannot contain markup or links.
-- 
-- /Since: 1.5/
aboutDialogSetDebugInfo ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@debugInfo@/: the debug information
    -> m ()
aboutDialogSetDebugInfo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetDebugInfo 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
debugInfo' <- Text -> IO CString
textToCString Text
debugInfo
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_debug_info Ptr AboutDialog
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 AboutDialogSetDebugInfoMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDebugInfoMethodInfo a signature where
    overloadedMethod = aboutDialogSetDebugInfo

instance O.OverloadedMethodInfo AboutDialogSetDebugInfoMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDebugInfo",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDebugInfo"
        })


#endif

-- method AboutDialog::set_debug_info_filename
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "filename"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the debug info filename"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_debug_info_filename" adw_about_dialog_set_debug_info_filename :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- filename : TBasicType TUTF8
    IO ()

-- | Sets the debug information filename for /@self@/.
-- 
-- It will be used as the suggested filename when saving debug information to a
-- file.
-- 
-- See [property/@aboutDialog@/:debug-info].
-- 
-- /Since: 1.5/
aboutDialogSetDebugInfoFilename ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@filename@/: the debug info filename
    -> m ()
aboutDialogSetDebugInfoFilename :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetDebugInfoFilename 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
filename' <- Text -> IO CString
textToCString Text
filename
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_debug_info_filename Ptr AboutDialog
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 AboutDialogSetDebugInfoFilenameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDebugInfoFilenameMethodInfo a signature where
    overloadedMethod = aboutDialogSetDebugInfoFilename

instance O.OverloadedMethodInfo AboutDialogSetDebugInfoFilenameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDebugInfoFilename",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDebugInfoFilename"
        })


#endif

-- method AboutDialog::set_designers
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "designers"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of designers"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_designers" adw_about_dialog_set_designers :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    Ptr CString ->                          -- designers : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Sets the list of designers of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogSetDesigners ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe ([T.Text])
    -- ^ /@designers@/: the list of designers
    -> m ()
aboutDialogSetDesigners :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe [Text] -> m ()
aboutDialogSetDesigners 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> Ptr CString -> IO ()
adw_about_dialog_set_designers Ptr AboutDialog
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 AboutDialogSetDesignersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDesignersMethodInfo a signature where
    overloadedMethod = aboutDialogSetDesigners

instance O.OverloadedMethodInfo AboutDialogSetDesignersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDesigners",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDesigners"
        })


#endif

-- method AboutDialog::set_developer_name
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "developer_name"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the developer name" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_developer_name" adw_about_dialog_set_developer_name :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- developer_name : TBasicType TUTF8
    IO ()

-- | Sets the developer name for /@self@/.
-- 
-- The developer name is displayed on the main page, under the application name.
-- 
-- If the application is developed by multiple people, the developer name can be
-- set to values like \"AppName team\", \"AppName developers\" or
-- \"The AppName project\", and the individual contributors can be listed on the
-- Credits page, with [property/@aboutDialog@/:developers] and related properties.
-- 
-- /Since: 1.5/
aboutDialogSetDeveloperName ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@developerName@/: the developer name
    -> m ()
aboutDialogSetDeveloperName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetDeveloperName 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
developerName' <- Text -> IO CString
textToCString Text
developerName
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_developer_name Ptr AboutDialog
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 AboutDialogSetDeveloperNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDeveloperNameMethodInfo a signature where
    overloadedMethod = aboutDialogSetDeveloperName

instance O.OverloadedMethodInfo AboutDialogSetDeveloperNameMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDeveloperName",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDeveloperName"
        })


#endif

-- method AboutDialog::set_developers
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "developers"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of developers"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_developers" adw_about_dialog_set_developers :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    Ptr CString ->                          -- developers : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Sets the list of developers of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogSetDevelopers ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe ([T.Text])
    -- ^ /@developers@/: the list of developers
    -> m ()
aboutDialogSetDevelopers :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe [Text] -> m ()
aboutDialogSetDevelopers 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> Ptr CString -> IO ()
adw_about_dialog_set_developers Ptr AboutDialog
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 AboutDialogSetDevelopersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDevelopersMethodInfo a signature where
    overloadedMethod = aboutDialogSetDevelopers

instance O.OverloadedMethodInfo AboutDialogSetDevelopersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDevelopers",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDevelopers"
        })


#endif

-- method AboutDialog::set_documenters
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "documenters"
--           , argType = TCArray True (-1) (-1) (TBasicType TUTF8)
--           , direction = DirectionIn
--           , mayBeNull = True
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the list of documenters"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_documenters" adw_about_dialog_set_documenters :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    Ptr CString ->                          -- documenters : TCArray True (-1) (-1) (TBasicType TUTF8)
    IO ()

-- | Sets the list of documenters of the application.
-- 
-- It will be displayed on the Credits page.
-- 
-- Each name may contain email addresses and URLs, see the introduction for more
-- details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:translator-credits]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogSetDocumenters ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Maybe ([T.Text])
    -- ^ /@documenters@/: the list of documenters
    -> m ()
aboutDialogSetDocumenters :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Maybe [Text] -> m ()
aboutDialogSetDocumenters 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> Ptr CString -> IO ()
adw_about_dialog_set_documenters Ptr AboutDialog
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 AboutDialogSetDocumentersMethodInfo
instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetDocumentersMethodInfo a signature where
    overloadedMethod = aboutDialogSetDocumenters

instance O.OverloadedMethodInfo AboutDialogSetDocumentersMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetDocumenters",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetDocumenters"
        })


#endif

-- method AboutDialog::set_issue_url
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "issue_url"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the issue tracker URL"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_issue_url" adw_about_dialog_set_issue_url :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- issue_url : TBasicType TUTF8
    IO ()

-- | Sets the issue tracker URL for /@self@/.
-- 
-- The issue tracker link is displayed on the main page.
-- 
-- /Since: 1.5/
aboutDialogSetIssueUrl ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@issueUrl@/: the issue tracker URL
    -> m ()
aboutDialogSetIssueUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetIssueUrl 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
issueUrl' <- Text -> IO CString
textToCString Text
issueUrl
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_issue_url Ptr AboutDialog
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 AboutDialogSetIssueUrlMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetIssueUrlMethodInfo a signature where
    overloadedMethod = aboutDialogSetIssueUrl

instance O.OverloadedMethodInfo AboutDialogSetIssueUrlMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetIssueUrl",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetIssueUrl"
        })


#endif

-- method AboutDialog::set_license
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "license"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the license" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_license" adw_about_dialog_set_license :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- license : TBasicType TUTF8
    IO ()

-- | Sets the license for /@self@/.
-- 
-- This can be used to set a custom text for the license if it can\'t be set via
-- [property/@aboutDialog@/:license-type].
-- 
-- When set, [property/@aboutDialog@/:license-type] will be set to
-- @GTK_LICENSE_CUSTOM@.
-- 
-- The license text will be displayed on the Legal page, below the copyright
-- information.
-- 
-- License text can contain Pango markup and links.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add license information
-- for the application dependencies or other components.
-- 
-- /Since: 1.5/
aboutDialogSetLicense ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@license@/: the license
    -> m ()
aboutDialogSetLicense :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetLicense 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
license' <- Text -> IO CString
textToCString Text
license
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_license Ptr AboutDialog
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 AboutDialogSetLicenseMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetLicenseMethodInfo a signature where
    overloadedMethod = aboutDialogSetLicense

instance O.OverloadedMethodInfo AboutDialogSetLicenseMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetLicense",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetLicense"
        })


#endif

-- method AboutDialog::set_license_type
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "license_type"
--           , argType =
--               TInterface Name { namespace = "Gtk" , name = "License" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the license type" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_license_type" adw_about_dialog_set_license_type :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CUInt ->                                -- license_type : TInterface (Name {namespace = "Gtk", name = "License"})
    IO ()

-- | Sets the license for /@self@/ from a list of known licenses.
-- 
-- If the application\'s license is not in the list,
-- [property/@aboutDialog@/:license] can be used instead. The license type will be
-- automatically set to @GTK_LICENSE_CUSTOM@ in that case.
-- 
-- If /@licenseType@/ is @GTK_LICENSE_UNKNOWN@, no information will be displayed.
-- 
-- If /@licenseType@/ is different from @GTK_LICENSE_CUSTOM@.
-- [property/@aboutDialog@/:license] will be cleared out.
-- 
-- The license description will be displayed on the Legal page, below the
-- copyright information.
-- 
-- [method/@aboutDialog@/.add_legal_section] can be used to add license information
-- for the application dependencies or other components.
-- 
-- /Since: 1.5/
aboutDialogSetLicenseType ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> Gtk.Enums.License
    -- ^ /@licenseType@/: the license type
    -> m ()
aboutDialogSetLicenseType :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> License -> m ()
aboutDialogSetLicenseType 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
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 AboutDialog -> CUInt -> IO ()
adw_about_dialog_set_license_type Ptr AboutDialog
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 AboutDialogSetLicenseTypeMethodInfo
instance (signature ~ (Gtk.Enums.License -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetLicenseTypeMethodInfo a signature where
    overloadedMethod = aboutDialogSetLicenseType

instance O.OverloadedMethodInfo AboutDialogSetLicenseTypeMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetLicenseType",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetLicenseType"
        })


#endif

-- method AboutDialog::set_release_notes
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "release_notes"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the release notes" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_release_notes" adw_about_dialog_set_release_notes :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- release_notes : TBasicType TUTF8
    IO ()

-- | Sets the release notes for /@self@/.
-- 
-- Release notes are displayed on the the What\'s New page.
-- 
-- Release notes are formatted the same way as
-- <https://freedesktop.org/software/appstream/docs/chap-Metadata.html#tag-description AppStream descriptions>.
-- 
-- The supported formatting options are:
-- 
-- * Paragraph (@\<p>@)
-- * Ordered list (@\<ol>@), with list items (@\<li>@)
-- * Unordered list (@\<ul>@), with list items (@\<li>@)
-- 
-- Within paragraphs and list items, emphasis (@\<em>@) and inline code
-- (@\<code>@) text styles are supported. The emphasis is rendered in italic,
-- while inline code is shown in a monospaced font.
-- 
-- Any text outside paragraphs or list items is ignored.
-- 
-- Nested lists are not supported.
-- 
-- @AdwAboutDialog@ displays the version above the release notes. If set, the
-- [property/@aboutDialog@/:release-notes-version] of the property will be used
-- as the version; otherwise, [property/@aboutDialog@/:version] is used.
-- 
-- /Since: 1.5/
aboutDialogSetReleaseNotes ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@releaseNotes@/: the release notes
    -> m ()
aboutDialogSetReleaseNotes :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetReleaseNotes 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
releaseNotes' <- Text -> IO CString
textToCString Text
releaseNotes
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_release_notes Ptr AboutDialog
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 AboutDialogSetReleaseNotesMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetReleaseNotesMethodInfo a signature where
    overloadedMethod = aboutDialogSetReleaseNotes

instance O.OverloadedMethodInfo AboutDialogSetReleaseNotesMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetReleaseNotes",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetReleaseNotes"
        })


#endif

-- method AboutDialog::set_release_notes_version
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "version"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the release notes version"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_release_notes_version" adw_about_dialog_set_release_notes_version :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- version : TBasicType TUTF8
    IO ()

-- | Sets the version described by the application\'s release notes.
-- 
-- The release notes version is displayed on the What\'s New page, above the
-- release notes.
-- 
-- If not set, [property/@aboutDialog@/:version] will be used instead.
-- 
-- For example, an application with the current version 2.0.2 might want to
-- keep the release notes from 2.0.0, and set the release notes version
-- accordingly.
-- 
-- See [property/@aboutDialog@/:release-notes].
-- 
-- /Since: 1.5/
aboutDialogSetReleaseNotesVersion ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@version@/: the release notes version
    -> m ()
aboutDialogSetReleaseNotesVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetReleaseNotesVersion 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
version' <- Text -> IO CString
textToCString Text
version
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_release_notes_version Ptr AboutDialog
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 AboutDialogSetReleaseNotesVersionMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetReleaseNotesVersionMethodInfo a signature where
    overloadedMethod = aboutDialogSetReleaseNotesVersion

instance O.OverloadedMethodInfo AboutDialogSetReleaseNotesVersionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetReleaseNotesVersion",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetReleaseNotesVersion"
        })


#endif

-- method AboutDialog::set_support_url
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "support_url"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the support page URL"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_support_url" adw_about_dialog_set_support_url :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- support_url : TBasicType TUTF8
    IO ()

-- | Sets the URL of the support page for /@self@/.
-- 
-- The support page link is displayed on the main page.
-- 
-- /Since: 1.5/
aboutDialogSetSupportUrl ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@supportUrl@/: the support page URL
    -> m ()
aboutDialogSetSupportUrl :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetSupportUrl 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
supportUrl' <- Text -> IO CString
textToCString Text
supportUrl
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_support_url Ptr AboutDialog
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 AboutDialogSetSupportUrlMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetSupportUrlMethodInfo a signature where
    overloadedMethod = aboutDialogSetSupportUrl

instance O.OverloadedMethodInfo AboutDialogSetSupportUrlMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetSupportUrl",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetSupportUrl"
        })


#endif

-- method AboutDialog::set_translator_credits
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "translator_credits"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the translator credits"
--                 , sinceVersion = Nothing
--                 }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_translator_credits" adw_about_dialog_set_translator_credits :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- translator_credits : TBasicType TUTF8
    IO ()

-- | Sets the translator credits string.
-- 
-- It will be displayed on the Credits page.
-- 
-- This string should be @\"translator-credits\"@ or @\"translator_credits\"@ and
-- should be marked as translatable.
-- 
-- The string may contain email addresses and URLs, see the introduction for
-- more details.
-- 
-- See also:
-- 
-- * [property/@aboutDialog@/:developers]
-- * [property/@aboutDialog@/:designers]
-- * [property/@aboutDialog@/:artists]
-- * [property/@aboutDialog@/:documenters]
-- * [method/@aboutDialog@/.add_credit_section]
-- * [method/@aboutDialog@/.add_acknowledgement_section]
-- 
-- /Since: 1.5/
aboutDialogSetTranslatorCredits ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@translatorCredits@/: the translator credits
    -> m ()
aboutDialogSetTranslatorCredits :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetTranslatorCredits 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
translatorCredits' <- Text -> IO CString
textToCString Text
translatorCredits
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_translator_credits Ptr AboutDialog
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 AboutDialogSetTranslatorCreditsMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetTranslatorCreditsMethodInfo a signature where
    overloadedMethod = aboutDialogSetTranslatorCredits

instance O.OverloadedMethodInfo AboutDialogSetTranslatorCreditsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetTranslatorCredits",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetTranslatorCredits"
        })


#endif

-- method AboutDialog::set_version
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "version"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the version" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_version" adw_about_dialog_set_version :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- version : TBasicType TUTF8
    IO ()

-- | Sets the version for /@self@/.
-- 
-- The version is displayed on the main page.
-- 
-- If [property/@aboutDialog@/:release-notes-version] is not set, the version will
-- also be displayed above the release notes on the What\'s New page.
-- 
-- /Since: 1.5/
aboutDialogSetVersion ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@version@/: the version
    -> m ()
aboutDialogSetVersion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetVersion 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
version' <- Text -> IO CString
textToCString Text
version
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_version Ptr AboutDialog
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 AboutDialogSetVersionMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetVersionMethodInfo a signature where
    overloadedMethod = aboutDialogSetVersion

instance O.OverloadedMethodInfo AboutDialogSetVersionMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetVersion",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetVersion"
        })


#endif

-- method AboutDialog::set_website
-- method type : OrdinaryMethod
-- Args: [ Arg
--           { argCName = "self"
--           , argType =
--               TInterface Name { namespace = "Adw" , name = "AboutDialog" }
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "an about dialog" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       , Arg
--           { argCName = "website"
--           , argType = TBasicType TUTF8
--           , direction = DirectionIn
--           , mayBeNull = False
--           , argDoc =
--               Documentation
--                 { rawDocText = Just "the website URL" , sinceVersion = Nothing }
--           , argScope = ScopeTypeInvalid
--           , argClosure = -1
--           , argDestroy = -1
--           , argCallerAllocates = False
--           , argCallbackUserData = False
--           , transfer = TransferNothing
--           }
--       ]
-- Lengths: []
-- returnType: Nothing
-- throws : False
-- Skip return : False

foreign import ccall "adw_about_dialog_set_website" adw_about_dialog_set_website :: 
    Ptr AboutDialog ->                      -- self : TInterface (Name {namespace = "Adw", name = "AboutDialog"})
    CString ->                              -- website : TBasicType TUTF8
    IO ()

-- | Sets the application website URL for /@self@/.
-- 
-- Website is displayed on the Details page, below comments, or on the main page
-- if the Details page doesn\'t have any other content.
-- 
-- Applications can add other links below, see [method/@aboutDialog@/.add_link].
-- 
-- /Since: 1.5/
aboutDialogSetWebsite ::
    (B.CallStack.HasCallStack, MonadIO m, IsAboutDialog a) =>
    a
    -- ^ /@self@/: an about dialog
    -> T.Text
    -- ^ /@website@/: the website URL
    -> m ()
aboutDialogSetWebsite :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsAboutDialog a) =>
a -> Text -> m ()
aboutDialogSetWebsite 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 AboutDialog
self' <- a -> IO (Ptr AboutDialog)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CString
website' <- Text -> IO CString
textToCString Text
website
    Ptr AboutDialog -> CString -> IO ()
adw_about_dialog_set_website Ptr AboutDialog
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 AboutDialogSetWebsiteMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsAboutDialog a) => O.OverloadedMethod AboutDialogSetWebsiteMethodInfo a signature where
    overloadedMethod = aboutDialogSetWebsite

instance O.OverloadedMethodInfo AboutDialogSetWebsiteMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Adw.Objects.AboutDialog.aboutDialogSetWebsite",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.7/docs/GI-Adw-Objects-AboutDialog.html#v:aboutDialogSetWebsite"
        })


#endif