{-# LINE 2 "./Graphics/UI/Gtk/Selectors/ColorSelectionDialog.chs" #-}-- -*-haskell-*--- GIMP Toolkit (GTK) Widget ColorSelectionDialog---- Author : Duncan Coutts---- Created: 2 August 2004---- Copyright (C) 2004-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)---- A standard dialog box for selecting a color--moduleGraphics.UI.Gtk.Selectors.ColorSelectionDialog(-- * Detail---- | The 'ColorSelectionDialog' provides a standard dialog which allows the-- user to select a color much like the 'FileSelection' provides a standard-- dialog for file selection.-- * Class Hierarchy-- |-- @-- | 'GObject'-- | +----'Object'-- | +----'Widget'-- | +----'Container'-- | +----'Bin'-- | +----'Window'-- | +----'Dialog'-- | +----ColorSelectionDialog-- @-- * TypesColorSelectionDialog,ColorSelectionDialogClass,castToColorSelectionDialog,gTypeColorSelectionDialog,toColorSelectionDialog,-- * ConstructorscolorSelectionDialogNew,-- * MethodscolorSelectionDialogGetColor,colorSelectionDialogGetOkButton,colorSelectionDialogGetCancelButton,colorSelectionDialogGetHelpButton,)whereimportControl.Monad(liftM)importSystem.Glib.FFIimportSystem.Glib.UTFStringimportGraphics.UI.Gtk.Abstract.Object(makeNewObject)importGraphics.UI.Gtk.Types{-# LINE 72 "./Graphics/UI/Gtk/Selectors/ColorSelectionDialog.chs" #-}importGraphics.UI.Gtk.General.Structs(colorSelectionDialogGetColor,colorSelectionDialogGetOkButton,colorSelectionDialogGetCancelButton,colorSelectionDialogGetHelpButton){-# LINE 80 "./Graphics/UI/Gtk/Selectors/ColorSelectionDialog.chs" #-}---------------------- Constructors-- | Creates a new 'ColorSelectionDialog'.--colorSelectionDialogNew::GlibStringstring=>string-- ^ @title@ - a string containing the title text-- for the dialog.->IOColorSelectionDialogcolorSelectionDialogNewtitle=makeNewObjectmkColorSelectionDialog$liftM(castPtr::PtrWidget->PtrColorSelectionDialog)$withUTFStringtitle$\titlePtr->gtk_color_selection_dialog_new{-# LINE 95 "./Graphics/UI/Gtk/Selectors/ColorSelectionDialog.chs" #-}titlePtrforeignimportccallunsafe"gtk_color_selection_dialog_new"gtk_color_selection_dialog_new::((PtrCChar)->(IO(PtrWidget)))