{-# LINE 2 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}-- -*-haskell-*--- GIMP Toolkit (GTK) Widget AboutDialog---- Author : Duncan Coutts---- Created: 1 March 2005---- Copyright (C) 2005 Duncan Coutts---- This library is free software; you can redistribute it and/or-- modify it under the terms of the GNU Lesser General Public-- License as published by the Free Software Foundation; either-- version 2.1 of the License, or (at your option) any later version.---- This library is distributed in the hope that it will be useful,-- but WITHOUT ANY WARRANTY; without even the implied warranty of-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU-- Lesser General Public License for more details.---- |-- Maintainer : gtk2hs-users@lists.sourceforge.net-- Stability : provisional-- Portability : portable (depends on GHC)---- Display information about an application---- * Module available since Gtk+ version 2.6--moduleGraphics.UI.Gtk.Windows.AboutDialog(-- * Detail---- | The 'AboutDialog' offers a simple way to display information about a-- program like its logo, name, copyright, website and license. It is also-- possible to give credits to the authors, documenters, translators and-- artists who have worked on the program. An about dialog is typically opened-- when the user selects the @About@ option from the @Help@ menu. All parts of-- the dialog are optional.---- About dialog often contain links and email addresses. 'AboutDialog'-- supports this by offering global hooks, which are called when the user-- clicks on a link or email address, see 'aboutDialogSetEmailHook' and-- 'aboutDialogSetUrlHook'. Email addresses in the authors, documenters and-- artists properties are recognized by looking for @\<user\@host>@, URLs are-- recognized by looking for @http:\/\/url@, with @url@ extending to the next-- space, tab or line break.-- Since 2.18 'AboutDialog' provides default website and email hooks that-- use 'showURI'.---- Note that Gtk+ sets a default title of @_(\"About %s\")@ on the dialog-- window (where %s is replaced by the name of the application, but in order to-- ensure proper translation of the title, applications should set the title-- property explicitly when constructing a 'AboutDialog', as shown in the-- following example:---- Note that prior to Gtk+ 2.12, the 'aboutDialogProgramName' property was called-- 'aboutDialogName'. Both names may be used in Gtk2Hs.-- * Class Hierarchy-- |-- @-- | 'GObject'-- | +----'Object'-- | +----'Widget'-- | +----'Container'-- | +----'Bin'-- | +----'Window'-- | +----'Dialog'-- | +----AboutDialog-- @-- * TypesAboutDialog,AboutDialogClass,castToAboutDialog,gTypeAboutDialog,toAboutDialog,-- * ConstructorsaboutDialogNew,-- * MethodsaboutDialogSetEmailHook,aboutDialogSetUrlHook,-- * AttributesaboutDialogProgramName,aboutDialogName,aboutDialogVersion,aboutDialogCopyright,aboutDialogComments,aboutDialogLicense,aboutDialogWebsite,aboutDialogWebsiteLabel,aboutDialogAuthors,aboutDialogDocumenters,aboutDialogArtists,aboutDialogTranslatorCredits,aboutDialogLogo,aboutDialogLogoIconName,aboutDialogWrapLicense,-- * DeprecatedaboutDialogGetName,aboutDialogSetName,aboutDialogGetVersion,aboutDialogSetVersion,aboutDialogGetCopyright,aboutDialogSetCopyright,aboutDialogGetComments,aboutDialogSetComments,aboutDialogGetLicense,aboutDialogSetLicense,aboutDialogGetWebsite,aboutDialogSetWebsite,aboutDialogGetWebsiteLabel,aboutDialogSetWebsiteLabel,aboutDialogSetAuthors,aboutDialogGetAuthors,aboutDialogSetArtists,aboutDialogGetArtists,aboutDialogSetDocumenters,aboutDialogGetDocumenters,aboutDialogGetTranslatorCredits,aboutDialogSetTranslatorCredits,aboutDialogGetLogo,aboutDialogSetLogo,aboutDialogGetLogoIconName,aboutDialogSetLogoIconName,aboutDialogGetWrapLicense,aboutDialogSetWrapLicense,)whereimportControl.Monad(liftM)importData.Maybe(fromMaybe)importSystem.Glib.FFIimportSystem.Glib.UTFStringimportSystem.Glib.AttributesimportSystem.Glib.PropertiesimportSystem.Glib.GObject(makeNewGObject,destroyFunPtr)importGraphics.UI.Gtk.Abstract.Object(makeNewObject)importGraphics.UI.Gtk.Types{-# LINE 151 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}{-# LINE 153 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}---------------------- Constructors-- | Creates a new 'AboutDialog'.--aboutDialogNew::IOAboutDialogaboutDialogNew=makeNewObjectmkAboutDialog$liftM(castPtr::PtrWidget->PtrAboutDialog)$gtk_about_dialog_new{-# LINE 165 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}---------------------- Methods-- | Returns the program name displayed in the about dialog.--aboutDialogGetName::AboutDialogClassself=>self->IOString-- ^ returns The program name.aboutDialogGetNameself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_program_nameargPtr1){-# LINE 176 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the name to display in the about dialog. If this is not set, it-- defaults to the program executable name.--aboutDialogSetName::AboutDialogClassself=>self->String-- ^ @name@ - the program name->IO()aboutDialogSetNameselfname=withUTFStringname$\namePtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_program_nameargPtr1arg2){-# LINE 192 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)namePtr-- | Returns the version string.--aboutDialogGetVersion::AboutDialogClassself=>self->IOStringaboutDialogGetVersionself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_versionargPtr1){-# LINE 203 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the version string to display in the about dialog.--aboutDialogSetVersion::AboutDialogClassself=>self->String->IO()aboutDialogSetVersionselfversion=withUTFStringversion$\versionPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_versionargPtr1arg2){-# LINE 212 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)versionPtr-- | Returns the copyright string.--aboutDialogGetCopyright::AboutDialogClassself=>self->IOStringaboutDialogGetCopyrightself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_copyrightargPtr1){-# LINE 220 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the copyright string to display in the about dialog. This should be-- a short string of one or two lines.--aboutDialogSetCopyright::AboutDialogClassself=>self->String->IO()aboutDialogSetCopyrightselfcopyright=withUTFStringcopyright$\copyrightPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_copyrightargPtr1arg2){-# LINE 230 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)copyrightPtr-- | Returns the comments string.--aboutDialogGetComments::AboutDialogClassself=>self->IOStringaboutDialogGetCommentsself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_commentsargPtr1){-# LINE 238 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the comments string to display in the about dialog. This should be a-- short string of one or two lines.--aboutDialogSetComments::AboutDialogClassself=>self->String->IO()aboutDialogSetCommentsselfcomments=withUTFStringcomments$\commentsPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_commentsargPtr1arg2){-# LINE 248 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)commentsPtr-- | Returns the license information.--aboutDialogGetLicense::AboutDialogClassself=>self->IO(MaybeString)aboutDialogGetLicenseself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_licenseargPtr1){-# LINE 256 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=maybePeekpeekUTFString-- | Sets the license information to be displayed in the secondary license-- dialog. If @license@ is @Nothing@, the license button is hidden.--aboutDialogSetLicense::AboutDialogClassself=>self->MaybeString-- ^ @license@ - the license information or @Nothing@->IO()aboutDialogSetLicenseselflicense=maybeWithwithUTFStringlicense$\licensePtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_licenseargPtr1arg2){-# LINE 268 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)licensePtr-- | Returns the website URL.--aboutDialogGetWebsite::AboutDialogClassself=>self->IOStringaboutDialogGetWebsiteself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_websiteargPtr1){-# LINE 276 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the URL to use for the website link.--aboutDialogSetWebsite::AboutDialogClassself=>self->String-- ^ @website@ - a URL string starting with \"http:\/\/\"->IO()aboutDialogSetWebsiteselfwebsite=withUTFStringwebsite$\websitePtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_websiteargPtr1arg2){-# LINE 287 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)websitePtr-- | Returns the label used for the website link.--aboutDialogGetWebsiteLabel::AboutDialogClassself=>self->IOStringaboutDialogGetWebsiteLabelself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_website_labelargPtr1){-# LINE 295 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the label to be used for the website link. It defaults to the-- website URL.--aboutDialogSetWebsiteLabel::AboutDialogClassself=>self->String->IO()aboutDialogSetWebsiteLabelselfwebsiteLabel=withUTFStringwebsiteLabel$\websiteLabelPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_website_labelargPtr1arg2){-# LINE 305 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)websiteLabelPtr-- | Sets the strings which are displayed in the authors tab of the secondary-- credits dialog.--aboutDialogSetAuthors::AboutDialogClassself=>self->[String]-- ^ @authors@ - a list of author names->IO()aboutDialogSetAuthorsselfauthors=withUTFStringArray0authors$\authorsPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_authorsargPtr1arg2){-# LINE 317 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)authorsPtr-- | Returns the string which are displayed in the authors tab of the-- secondary credits dialog.--aboutDialogGetAuthors::AboutDialogClassself=>self->IO[String]aboutDialogGetAuthorsself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_authorsargPtr1){-# LINE 326 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFStringArray0-- | Sets the strings which are displayed in the artists tab of the secondary-- credits dialog.--aboutDialogSetArtists::AboutDialogClassself=>self->[String]-- ^ @artists@ - a list of artist names->IO()aboutDialogSetArtistsselfartists=withUTFStringArray0artists$\artistsPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_artistsargPtr1arg2){-# LINE 338 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)artistsPtr-- | Returns the string which are displayed in the artists tab of the-- secondary credits dialog.--aboutDialogGetArtists::AboutDialogClassself=>self->IO[String]aboutDialogGetArtistsself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_artistsargPtr1){-# LINE 347 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFStringArray0-- | Sets the strings which are displayed in the documenters tab of the-- secondary credits dialog.--aboutDialogSetDocumenters::AboutDialogClassself=>self->[String]-- ^ @artists@ - a list of documenter names->IO()aboutDialogSetDocumentersselfdocumenters=withUTFStringArray0documenters$\documentersPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_documentersargPtr1arg2){-# LINE 359 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)documentersPtr-- | Returns the string which are displayed in the documenters tab of the-- secondary credits dialog.--aboutDialogGetDocumenters::AboutDialogClassself=>self->IO[String]aboutDialogGetDocumentersself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_documentersargPtr1){-# LINE 368 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFStringArray0-- | Returns the translator credits string which is displayed in the-- translators tab of the secondary credits dialog.--aboutDialogGetTranslatorCredits::AboutDialogClassself=>self->IOStringaboutDialogGetTranslatorCreditsself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_translator_creditsargPtr1){-# LINE 377 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the translator credits string which is displayed in the translators-- tab of the secondary credits dialog.---- The intended use for this string is to display the translator of the-- language which is currently used in the user interface.--aboutDialogSetTranslatorCredits::AboutDialogClassself=>self->String->IO()aboutDialogSetTranslatorCreditsselftranslatorCredits=withUTFStringtranslatorCredits$\translatorCreditsPtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_translator_creditsargPtr1arg2){-# LINE 390 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)translatorCreditsPtr-- | Returns the pixbuf displayed as logo in the about dialog.--aboutDialogGetLogo::AboutDialogClassself=>self->IOPixbufaboutDialogGetLogoself=makeNewGObjectmkPixbuf$(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_logoargPtr1){-# LINE 399 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)-- | Sets the pixbuf to be displayed as logo in the about dialog. If it is-- @Nothing@, the default window icon set with 'windowSetDefaultIcon' will be-- used.--aboutDialogSetLogo::AboutDialogClassself=>self->MaybePixbuf-- ^ @logo@ - a 'Pixbuf', or @Nothing@->IO()aboutDialogSetLogoselflogo=(\(AboutDialogarg1)(Pixbufarg2)->withForeignPtrarg1$\argPtr1->withForeignPtrarg2$\argPtr2->gtk_about_dialog_set_logoargPtr1argPtr2){-# LINE 410 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)(fromMaybe(PixbufnullForeignPtr)logo)-- | Returns the icon name displayed as logo in the about dialog.--aboutDialogGetLogoIconName::AboutDialogClassself=>self->IOStringaboutDialogGetLogoIconNameself=(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_logo_icon_nameargPtr1){-# LINE 418 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)>>=peekUTFString-- | Sets the pixbuf to be displayed as logo in the about dialog. If it is-- @Nothing@, the default window icon set with 'windowSetDefaultIcon' will be-- used.--aboutDialogSetLogoIconName::AboutDialogClassself=>self->MaybeString-- ^ @iconName@ - an icon name, or @Nothing@->IO()aboutDialogSetLogoIconNameselficonName=maybeWithwithUTFStringiconName$\iconNamePtr->(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_logo_icon_nameargPtr1arg2){-# LINE 431 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)iconNamePtr-- | Installs a global function to be called whenever the user activates an-- email link in an about dialog.--aboutDialogSetEmailHook::(String->IO())-- ^ @(\url -> ...)@ - a function to call when an email-- link is activated.->IO()aboutDialogSetEmailHookfunc=dofuncPtr<-mkAboutDialogActivateLinkFunc(\_linkPtr_->dolink<-peekUTFStringlinkPtrfunclink)gtk_about_dialog_set_email_hook{-# LINE 447 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}funcPtr(castFunPtrToPtrfuncPtr)destroyFunPtrreturn()-- | Installs a global function to be called whenever the user activates a URL-- link in an about dialog.--aboutDialogSetUrlHook::(String->IO())-- ^ @(\url -> ...)@ - a function to call when a URL link-- is activated.->IO()aboutDialogSetUrlHookfunc=dofuncPtr<-mkAboutDialogActivateLinkFunc(\_linkPtr_->dolink<-peekUTFStringlinkPtrfunclink)gtk_about_dialog_set_url_hook{-# LINE 465 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}funcPtr(castFunPtrToPtrfuncPtr)destroyFunPtrreturn()typeAboutDialogActivateLinkFunc=FunPtr(((PtrAboutDialog)->((PtrCChar)->((Ptr())->(IO()))))){-# LINE 471 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}foreignimportccall"wrapper"mkAboutDialogActivateLinkFunc::(PtrAboutDialog->CString->Ptr()->IO())->IOAboutDialogActivateLinkFunc-- | Returns whether the license text in @about@ is automatically wrapped.---- * Available since Gtk+ version 2.8--aboutDialogGetWrapLicense::AboutDialogClassself=>self->IOBool-- ^ returns @True@ if the license text is wrappedaboutDialogGetWrapLicenseself=liftMtoBool$(\(AboutDialogarg1)->withForeignPtrarg1$\argPtr1->gtk_about_dialog_get_wrap_licenseargPtr1){-# LINE 485 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)-- | Sets whether the license text in @about@ is automatically wrapped.---- * Available since Gtk+ version 2.8--aboutDialogSetWrapLicense::AboutDialogClassself=>self->Bool-- ^ @wrapLicense@ - whether to wrap the license->IO()aboutDialogSetWrapLicenseselfwrapLicense=(\(AboutDialogarg1)arg2->withForeignPtrarg1$\argPtr1->gtk_about_dialog_set_wrap_licenseargPtr1arg2){-# LINE 496 "./Graphics/UI/Gtk/Windows/AboutDialog.chs" #-}(toAboutDialogself)(fromBoolwrapLicense)---------------------- Attributes-- | The name of the program. If this is not set, it defaults to-- 'gGetApplicationName'.--aboutDialogName::AboutDialogClassself=>AttrselfStringaboutDialogName=newAttrFromStringProperty"name"-- | The name of the program. If this is not set, it defaults to-- 'gGetApplicationName'.--aboutDialogProgramName::AboutDialogClassself=>AttrselfStringaboutDialogProgramName=newAttrFromStringProperty"program-name"-- | The version of the program.--aboutDialogVersion::AboutDialogClassself=>AttrselfStringaboutDialogVersion=newAttrFromStringProperty"version"-- | Copyright information for the program.--aboutDialogCopyright::AboutDialogClassself=>AttrselfStringaboutDialogCopyright=newAttrFromStringProperty"copyright"-- | Comments about the program. This string is displayed in a label in the-- main dialog, thus it should be a short explanation of the main purpose of-- the program, not a detailed list of features.--aboutDialogComments::AboutDialogClassself=>AttrselfStringaboutDialogComments=newAttrFromStringProperty"comments"-- | The license of the program. This string is displayed in a text view in a-- secondary dialog, therefore it is fine to use a long multi-paragraph text.-- Note that the text is only wrapped in the text view if the 'aboutDialogWrapLicense'-- property is set to @True@; otherwise the text itself must contain the-- intended linebreaks.---- Default value: @Nothing@--aboutDialogLicense::AboutDialogClassself=>Attrself(MaybeString)aboutDialogLicense=newAttrFromMaybeStringProperty"license"-- | The URL for the link to the website of the program. This should be a-- string starting with \"http:\/\/.--aboutDialogWebsite::AboutDialogClassself=>AttrselfStringaboutDialogWebsite=newAttrFromStringProperty"website"-- | The label for the link to the website of the program. If this is not set,-- it defaults to the URL specified in the website property.--aboutDialogWebsiteLabel::AboutDialogClassself=>AttrselfStringaboutDialogWebsiteLabel=newAttrFromStringProperty"website-label"-- | The authors of the program. Each string may-- contain email addresses and URLs, which will be displayed as links, see the-- introduction for more details.--aboutDialogAuthors::AboutDialogClassself=>Attrself[String]aboutDialogAuthors=newAttraboutDialogGetAuthorsaboutDialogSetAuthors-- | The people documenting the program.-- Each string may contain email addresses and URLs, which will be displayed as-- links, see the introduction for more details.--aboutDialogDocumenters::AboutDialogClassself=>Attrself[String]aboutDialogDocumenters=newAttraboutDialogGetDocumentersaboutDialogSetDocumenters-- | The people who contributed artwork to the program.-- Each string may contain email addresses and URLs, which will be-- displayed as links, see the introduction for more details.--aboutDialogArtists::AboutDialogClassself=>Attrself[String]aboutDialogArtists=newAttraboutDialogGetArtistsaboutDialogSetArtists-- | Credits to the translators. This string should be marked as translatable.-- The string may contain email addresses and URLs, which will be displayed as-- links, see the introduction for more details.--aboutDialogTranslatorCredits::AboutDialogClassself=>AttrselfStringaboutDialogTranslatorCredits=newAttrFromStringProperty"translator-credits"-- | A logo for the about box. If this is not set, it defaults to-- 'windowGetDefaultIconList'.--aboutDialogLogo::AboutDialogClassself=>ReadWriteAttrselfPixbuf(MaybePixbuf)aboutDialogLogo=newAttraboutDialogGetLogoaboutDialogSetLogo-- | A named icon to use as the logo for the about box. This property-- overrides the logo property.---- Default value: @Nothing@--aboutDialogLogoIconName::AboutDialogClassself=>ReadWriteAttrselfString(MaybeString)aboutDialogLogoIconName=newAttraboutDialogGetLogoIconNameaboutDialogSetLogoIconName-- | Whether to wrap the text in the license dialog.---- Default value: @False@--aboutDialogWrapLicense::AboutDialogClassself=>AttrselfBoolaboutDialogWrapLicense=newAttrFromBoolProperty"wrap-license"foreignimportccallsafe"gtk_about_dialog_new"gtk_about_dialog_new::(IO(PtrWidget))foreignimportccallsafe"gtk_about_dialog_get_program_name"gtk_about_dialog_get_program_name::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_program_name"gtk_about_dialog_set_program_name::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_version"gtk_about_dialog_get_version::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_version"gtk_about_dialog_set_version::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_copyright"gtk_about_dialog_get_copyright::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_copyright"gtk_about_dialog_set_copyright::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_comments"gtk_about_dialog_get_comments::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_comments"gtk_about_dialog_set_comments::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_license"gtk_about_dialog_get_license::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_license"gtk_about_dialog_set_license::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_website"gtk_about_dialog_get_website::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_website"gtk_about_dialog_set_website::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_website_label"gtk_about_dialog_get_website_label::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_website_label"gtk_about_dialog_set_website_label::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_set_authors"gtk_about_dialog_set_authors::((PtrAboutDialog)->((Ptr(PtrCChar))->(IO())))foreignimportccallsafe"gtk_about_dialog_get_authors"gtk_about_dialog_get_authors::((PtrAboutDialog)->(IO(Ptr(PtrCChar))))foreignimportccallsafe"gtk_about_dialog_set_artists"gtk_about_dialog_set_artists::((PtrAboutDialog)->((Ptr(PtrCChar))->(IO())))foreignimportccallsafe"gtk_about_dialog_get_artists"gtk_about_dialog_get_artists::((PtrAboutDialog)->(IO(Ptr(PtrCChar))))foreignimportccallsafe"gtk_about_dialog_set_documenters"gtk_about_dialog_set_documenters::((PtrAboutDialog)->((Ptr(PtrCChar))->(IO())))foreignimportccallsafe"gtk_about_dialog_get_documenters"gtk_about_dialog_get_documenters::((PtrAboutDialog)->(IO(Ptr(PtrCChar))))foreignimportccallsafe"gtk_about_dialog_get_translator_credits"gtk_about_dialog_get_translator_credits::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_translator_credits"gtk_about_dialog_set_translator_credits::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_logo"gtk_about_dialog_get_logo::((PtrAboutDialog)->(IO(PtrPixbuf)))foreignimportccallsafe"gtk_about_dialog_set_logo"gtk_about_dialog_set_logo::((PtrAboutDialog)->((PtrPixbuf)->(IO())))foreignimportccallsafe"gtk_about_dialog_get_logo_icon_name"gtk_about_dialog_get_logo_icon_name::((PtrAboutDialog)->(IO(PtrCChar)))foreignimportccallsafe"gtk_about_dialog_set_logo_icon_name"gtk_about_dialog_set_logo_icon_name::((PtrAboutDialog)->((PtrCChar)->(IO())))foreignimportccallsafe"gtk_about_dialog_set_email_hook"gtk_about_dialog_set_email_hook::((FunPtr((PtrAboutDialog)->((PtrCChar)->((Ptr())->(IO())))))->((Ptr())->((FunPtr((Ptr())->(IO())))->(IO(FunPtr((PtrAboutDialog)->((PtrCChar)->((Ptr())->(IO())))))))))foreignimportccallsafe"gtk_about_dialog_set_url_hook"gtk_about_dialog_set_url_hook::((FunPtr((PtrAboutDialog)->((PtrCChar)->((Ptr())->(IO())))))->((Ptr())->((FunPtr((Ptr())->(IO())))->(IO(FunPtr((PtrAboutDialog)->((PtrCChar)->((Ptr())->(IO())))))))))foreignimportccallsafe"gtk_about_dialog_get_wrap_license"gtk_about_dialog_get_wrap_license::((PtrAboutDialog)->(IOCInt))foreignimportccallsafe"gtk_about_dialog_set_wrap_license"gtk_about_dialog_set_wrap_license::((PtrAboutDialog)->(CInt->(IO())))