gi-gtk-3.0.28: GI/Gtk/Objects/PrintSettings.hs
{- |
Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte
License : LGPL-2.1
Maintainer : Iñaki García Etxebarria (inaki@blueleaf.cc)
A GtkPrintSettings object represents the settings of a print dialog in
a system-independent way. The main use for this object is that once
you’ve printed you can get a settings object that represents the settings
the user chose, and the next time you print you can pass that object in so
that the user doesn’t have to re-set all his settings.
Its also possible to enumerate the settings so that you can easily save
the settings for the next time your app runs, or even store them in a
document. The predefined keys try to use shared values as much as possible
so that moving such a document between systems still works.
Printing support was added in GTK+ 2.10.
-}
#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.PrintSettings
(
-- * Exported types
PrintSettings(..) ,
IsPrintSettings ,
toPrintSettings ,
noPrintSettings ,
-- * Methods
-- ** copy #method:copy#
#if ENABLE_OVERLOADING
PrintSettingsCopyMethodInfo ,
#endif
printSettingsCopy ,
-- ** foreach #method:foreach#
#if ENABLE_OVERLOADING
PrintSettingsForeachMethodInfo ,
#endif
printSettingsForeach ,
-- ** get #method:get#
#if ENABLE_OVERLOADING
PrintSettingsGetMethodInfo ,
#endif
printSettingsGet ,
-- ** getBool #method:getBool#
#if ENABLE_OVERLOADING
PrintSettingsGetBoolMethodInfo ,
#endif
printSettingsGetBool ,
-- ** getCollate #method:getCollate#
#if ENABLE_OVERLOADING
PrintSettingsGetCollateMethodInfo ,
#endif
printSettingsGetCollate ,
-- ** getDefaultSource #method:getDefaultSource#
#if ENABLE_OVERLOADING
PrintSettingsGetDefaultSourceMethodInfo ,
#endif
printSettingsGetDefaultSource ,
-- ** getDither #method:getDither#
#if ENABLE_OVERLOADING
PrintSettingsGetDitherMethodInfo ,
#endif
printSettingsGetDither ,
-- ** getDouble #method:getDouble#
#if ENABLE_OVERLOADING
PrintSettingsGetDoubleMethodInfo ,
#endif
printSettingsGetDouble ,
-- ** getDoubleWithDefault #method:getDoubleWithDefault#
#if ENABLE_OVERLOADING
PrintSettingsGetDoubleWithDefaultMethodInfo,
#endif
printSettingsGetDoubleWithDefault ,
-- ** getDuplex #method:getDuplex#
#if ENABLE_OVERLOADING
PrintSettingsGetDuplexMethodInfo ,
#endif
printSettingsGetDuplex ,
-- ** getFinishings #method:getFinishings#
#if ENABLE_OVERLOADING
PrintSettingsGetFinishingsMethodInfo ,
#endif
printSettingsGetFinishings ,
-- ** getInt #method:getInt#
#if ENABLE_OVERLOADING
PrintSettingsGetIntMethodInfo ,
#endif
printSettingsGetInt ,
-- ** getIntWithDefault #method:getIntWithDefault#
#if ENABLE_OVERLOADING
PrintSettingsGetIntWithDefaultMethodInfo,
#endif
printSettingsGetIntWithDefault ,
-- ** getLength #method:getLength#
#if ENABLE_OVERLOADING
PrintSettingsGetLengthMethodInfo ,
#endif
printSettingsGetLength ,
-- ** getMediaType #method:getMediaType#
#if ENABLE_OVERLOADING
PrintSettingsGetMediaTypeMethodInfo ,
#endif
printSettingsGetMediaType ,
-- ** getNCopies #method:getNCopies#
#if ENABLE_OVERLOADING
PrintSettingsGetNCopiesMethodInfo ,
#endif
printSettingsGetNCopies ,
-- ** getNumberUp #method:getNumberUp#
#if ENABLE_OVERLOADING
PrintSettingsGetNumberUpMethodInfo ,
#endif
printSettingsGetNumberUp ,
-- ** getNumberUpLayout #method:getNumberUpLayout#
#if ENABLE_OVERLOADING
PrintSettingsGetNumberUpLayoutMethodInfo,
#endif
printSettingsGetNumberUpLayout ,
-- ** getOrientation #method:getOrientation#
#if ENABLE_OVERLOADING
PrintSettingsGetOrientationMethodInfo ,
#endif
printSettingsGetOrientation ,
-- ** getOutputBin #method:getOutputBin#
#if ENABLE_OVERLOADING
PrintSettingsGetOutputBinMethodInfo ,
#endif
printSettingsGetOutputBin ,
-- ** getPageRanges #method:getPageRanges#
#if ENABLE_OVERLOADING
PrintSettingsGetPageRangesMethodInfo ,
#endif
printSettingsGetPageRanges ,
-- ** getPageSet #method:getPageSet#
#if ENABLE_OVERLOADING
PrintSettingsGetPageSetMethodInfo ,
#endif
printSettingsGetPageSet ,
-- ** getPaperHeight #method:getPaperHeight#
#if ENABLE_OVERLOADING
PrintSettingsGetPaperHeightMethodInfo ,
#endif
printSettingsGetPaperHeight ,
-- ** getPaperSize #method:getPaperSize#
#if ENABLE_OVERLOADING
PrintSettingsGetPaperSizeMethodInfo ,
#endif
printSettingsGetPaperSize ,
-- ** getPaperWidth #method:getPaperWidth#
#if ENABLE_OVERLOADING
PrintSettingsGetPaperWidthMethodInfo ,
#endif
printSettingsGetPaperWidth ,
-- ** getPrintPages #method:getPrintPages#
#if ENABLE_OVERLOADING
PrintSettingsGetPrintPagesMethodInfo ,
#endif
printSettingsGetPrintPages ,
-- ** getPrinter #method:getPrinter#
#if ENABLE_OVERLOADING
PrintSettingsGetPrinterMethodInfo ,
#endif
printSettingsGetPrinter ,
-- ** getPrinterLpi #method:getPrinterLpi#
#if ENABLE_OVERLOADING
PrintSettingsGetPrinterLpiMethodInfo ,
#endif
printSettingsGetPrinterLpi ,
-- ** getQuality #method:getQuality#
#if ENABLE_OVERLOADING
PrintSettingsGetQualityMethodInfo ,
#endif
printSettingsGetQuality ,
-- ** getResolution #method:getResolution#
#if ENABLE_OVERLOADING
PrintSettingsGetResolutionMethodInfo ,
#endif
printSettingsGetResolution ,
-- ** getResolutionX #method:getResolutionX#
#if ENABLE_OVERLOADING
PrintSettingsGetResolutionXMethodInfo ,
#endif
printSettingsGetResolutionX ,
-- ** getResolutionY #method:getResolutionY#
#if ENABLE_OVERLOADING
PrintSettingsGetResolutionYMethodInfo ,
#endif
printSettingsGetResolutionY ,
-- ** getReverse #method:getReverse#
#if ENABLE_OVERLOADING
PrintSettingsGetReverseMethodInfo ,
#endif
printSettingsGetReverse ,
-- ** getScale #method:getScale#
#if ENABLE_OVERLOADING
PrintSettingsGetScaleMethodInfo ,
#endif
printSettingsGetScale ,
-- ** getUseColor #method:getUseColor#
#if ENABLE_OVERLOADING
PrintSettingsGetUseColorMethodInfo ,
#endif
printSettingsGetUseColor ,
-- ** hasKey #method:hasKey#
#if ENABLE_OVERLOADING
PrintSettingsHasKeyMethodInfo ,
#endif
printSettingsHasKey ,
-- ** loadFile #method:loadFile#
#if ENABLE_OVERLOADING
PrintSettingsLoadFileMethodInfo ,
#endif
printSettingsLoadFile ,
-- ** loadKeyFile #method:loadKeyFile#
#if ENABLE_OVERLOADING
PrintSettingsLoadKeyFileMethodInfo ,
#endif
printSettingsLoadKeyFile ,
-- ** new #method:new#
printSettingsNew ,
-- ** newFromFile #method:newFromFile#
printSettingsNewFromFile ,
-- ** newFromGvariant #method:newFromGvariant#
printSettingsNewFromGvariant ,
-- ** newFromKeyFile #method:newFromKeyFile#
printSettingsNewFromKeyFile ,
-- ** set #method:set#
#if ENABLE_OVERLOADING
PrintSettingsSetMethodInfo ,
#endif
printSettingsSet ,
-- ** setBool #method:setBool#
#if ENABLE_OVERLOADING
PrintSettingsSetBoolMethodInfo ,
#endif
printSettingsSetBool ,
-- ** setCollate #method:setCollate#
#if ENABLE_OVERLOADING
PrintSettingsSetCollateMethodInfo ,
#endif
printSettingsSetCollate ,
-- ** setDefaultSource #method:setDefaultSource#
#if ENABLE_OVERLOADING
PrintSettingsSetDefaultSourceMethodInfo ,
#endif
printSettingsSetDefaultSource ,
-- ** setDither #method:setDither#
#if ENABLE_OVERLOADING
PrintSettingsSetDitherMethodInfo ,
#endif
printSettingsSetDither ,
-- ** setDouble #method:setDouble#
#if ENABLE_OVERLOADING
PrintSettingsSetDoubleMethodInfo ,
#endif
printSettingsSetDouble ,
-- ** setDuplex #method:setDuplex#
#if ENABLE_OVERLOADING
PrintSettingsSetDuplexMethodInfo ,
#endif
printSettingsSetDuplex ,
-- ** setFinishings #method:setFinishings#
#if ENABLE_OVERLOADING
PrintSettingsSetFinishingsMethodInfo ,
#endif
printSettingsSetFinishings ,
-- ** setInt #method:setInt#
#if ENABLE_OVERLOADING
PrintSettingsSetIntMethodInfo ,
#endif
printSettingsSetInt ,
-- ** setLength #method:setLength#
#if ENABLE_OVERLOADING
PrintSettingsSetLengthMethodInfo ,
#endif
printSettingsSetLength ,
-- ** setMediaType #method:setMediaType#
#if ENABLE_OVERLOADING
PrintSettingsSetMediaTypeMethodInfo ,
#endif
printSettingsSetMediaType ,
-- ** setNCopies #method:setNCopies#
#if ENABLE_OVERLOADING
PrintSettingsSetNCopiesMethodInfo ,
#endif
printSettingsSetNCopies ,
-- ** setNumberUp #method:setNumberUp#
#if ENABLE_OVERLOADING
PrintSettingsSetNumberUpMethodInfo ,
#endif
printSettingsSetNumberUp ,
-- ** setNumberUpLayout #method:setNumberUpLayout#
#if ENABLE_OVERLOADING
PrintSettingsSetNumberUpLayoutMethodInfo,
#endif
printSettingsSetNumberUpLayout ,
-- ** setOrientation #method:setOrientation#
#if ENABLE_OVERLOADING
PrintSettingsSetOrientationMethodInfo ,
#endif
printSettingsSetOrientation ,
-- ** setOutputBin #method:setOutputBin#
#if ENABLE_OVERLOADING
PrintSettingsSetOutputBinMethodInfo ,
#endif
printSettingsSetOutputBin ,
-- ** setPageRanges #method:setPageRanges#
#if ENABLE_OVERLOADING
PrintSettingsSetPageRangesMethodInfo ,
#endif
printSettingsSetPageRanges ,
-- ** setPageSet #method:setPageSet#
#if ENABLE_OVERLOADING
PrintSettingsSetPageSetMethodInfo ,
#endif
printSettingsSetPageSet ,
-- ** setPaperHeight #method:setPaperHeight#
#if ENABLE_OVERLOADING
PrintSettingsSetPaperHeightMethodInfo ,
#endif
printSettingsSetPaperHeight ,
-- ** setPaperSize #method:setPaperSize#
#if ENABLE_OVERLOADING
PrintSettingsSetPaperSizeMethodInfo ,
#endif
printSettingsSetPaperSize ,
-- ** setPaperWidth #method:setPaperWidth#
#if ENABLE_OVERLOADING
PrintSettingsSetPaperWidthMethodInfo ,
#endif
printSettingsSetPaperWidth ,
-- ** setPrintPages #method:setPrintPages#
#if ENABLE_OVERLOADING
PrintSettingsSetPrintPagesMethodInfo ,
#endif
printSettingsSetPrintPages ,
-- ** setPrinter #method:setPrinter#
#if ENABLE_OVERLOADING
PrintSettingsSetPrinterMethodInfo ,
#endif
printSettingsSetPrinter ,
-- ** setPrinterLpi #method:setPrinterLpi#
#if ENABLE_OVERLOADING
PrintSettingsSetPrinterLpiMethodInfo ,
#endif
printSettingsSetPrinterLpi ,
-- ** setQuality #method:setQuality#
#if ENABLE_OVERLOADING
PrintSettingsSetQualityMethodInfo ,
#endif
printSettingsSetQuality ,
-- ** setResolution #method:setResolution#
#if ENABLE_OVERLOADING
PrintSettingsSetResolutionMethodInfo ,
#endif
printSettingsSetResolution ,
-- ** setResolutionXy #method:setResolutionXy#
#if ENABLE_OVERLOADING
PrintSettingsSetResolutionXyMethodInfo ,
#endif
printSettingsSetResolutionXy ,
-- ** setReverse #method:setReverse#
#if ENABLE_OVERLOADING
PrintSettingsSetReverseMethodInfo ,
#endif
printSettingsSetReverse ,
-- ** setScale #method:setScale#
#if ENABLE_OVERLOADING
PrintSettingsSetScaleMethodInfo ,
#endif
printSettingsSetScale ,
-- ** setUseColor #method:setUseColor#
#if ENABLE_OVERLOADING
PrintSettingsSetUseColorMethodInfo ,
#endif
printSettingsSetUseColor ,
-- ** toFile #method:toFile#
#if ENABLE_OVERLOADING
PrintSettingsToFileMethodInfo ,
#endif
printSettingsToFile ,
-- ** toGvariant #method:toGvariant#
#if ENABLE_OVERLOADING
PrintSettingsToGvariantMethodInfo ,
#endif
printSettingsToGvariant ,
-- ** toKeyFile #method:toKeyFile#
#if ENABLE_OVERLOADING
PrintSettingsToKeyFileMethodInfo ,
#endif
printSettingsToKeyFile ,
-- ** unset #method:unset#
#if ENABLE_OVERLOADING
PrintSettingsUnsetMethodInfo ,
#endif
printSettingsUnset ,
) 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.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
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.Text as T
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 GI.GLib.Structs.KeyFile as GLib.KeyFile
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Callbacks as Gtk.Callbacks
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Structs.PageRange as Gtk.PageRange
import {-# SOURCE #-} qualified GI.Gtk.Structs.PaperSize as Gtk.PaperSize
-- | Memory-managed wrapper type.
newtype PrintSettings = PrintSettings (ManagedPtr PrintSettings)
foreign import ccall "gtk_print_settings_get_type"
c_gtk_print_settings_get_type :: IO GType
instance GObject PrintSettings where
gobjectType = c_gtk_print_settings_get_type
-- | Type class for types which can be safely cast to `PrintSettings`, for instance with `toPrintSettings`.
class (GObject o, O.IsDescendantOf PrintSettings o) => IsPrintSettings o
instance (GObject o, O.IsDescendantOf PrintSettings o) => IsPrintSettings o
instance O.HasParentTypes PrintSettings
type instance O.ParentTypes PrintSettings = '[GObject.Object.Object]
-- | Cast to `PrintSettings`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`.
toPrintSettings :: (MonadIO m, IsPrintSettings o) => o -> m PrintSettings
toPrintSettings = liftIO . unsafeCastTo PrintSettings
-- | A convenience alias for `Nothing` :: `Maybe` `PrintSettings`.
noPrintSettings :: Maybe PrintSettings
noPrintSettings = Nothing
#if ENABLE_OVERLOADING
type family ResolvePrintSettingsMethod (t :: Symbol) (o :: *) :: * where
ResolvePrintSettingsMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolvePrintSettingsMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolvePrintSettingsMethod "copy" o = PrintSettingsCopyMethodInfo
ResolvePrintSettingsMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolvePrintSettingsMethod "foreach" o = PrintSettingsForeachMethodInfo
ResolvePrintSettingsMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolvePrintSettingsMethod "get" o = PrintSettingsGetMethodInfo
ResolvePrintSettingsMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolvePrintSettingsMethod "hasKey" o = PrintSettingsHasKeyMethodInfo
ResolvePrintSettingsMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolvePrintSettingsMethod "loadFile" o = PrintSettingsLoadFileMethodInfo
ResolvePrintSettingsMethod "loadKeyFile" o = PrintSettingsLoadKeyFileMethodInfo
ResolvePrintSettingsMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolvePrintSettingsMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolvePrintSettingsMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolvePrintSettingsMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolvePrintSettingsMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolvePrintSettingsMethod "set" o = PrintSettingsSetMethodInfo
ResolvePrintSettingsMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolvePrintSettingsMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolvePrintSettingsMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolvePrintSettingsMethod "toFile" o = PrintSettingsToFileMethodInfo
ResolvePrintSettingsMethod "toGvariant" o = PrintSettingsToGvariantMethodInfo
ResolvePrintSettingsMethod "toKeyFile" o = PrintSettingsToKeyFileMethodInfo
ResolvePrintSettingsMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolvePrintSettingsMethod "unset" o = PrintSettingsUnsetMethodInfo
ResolvePrintSettingsMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolvePrintSettingsMethod "getBool" o = PrintSettingsGetBoolMethodInfo
ResolvePrintSettingsMethod "getCollate" o = PrintSettingsGetCollateMethodInfo
ResolvePrintSettingsMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolvePrintSettingsMethod "getDefaultSource" o = PrintSettingsGetDefaultSourceMethodInfo
ResolvePrintSettingsMethod "getDither" o = PrintSettingsGetDitherMethodInfo
ResolvePrintSettingsMethod "getDouble" o = PrintSettingsGetDoubleMethodInfo
ResolvePrintSettingsMethod "getDoubleWithDefault" o = PrintSettingsGetDoubleWithDefaultMethodInfo
ResolvePrintSettingsMethod "getDuplex" o = PrintSettingsGetDuplexMethodInfo
ResolvePrintSettingsMethod "getFinishings" o = PrintSettingsGetFinishingsMethodInfo
ResolvePrintSettingsMethod "getInt" o = PrintSettingsGetIntMethodInfo
ResolvePrintSettingsMethod "getIntWithDefault" o = PrintSettingsGetIntWithDefaultMethodInfo
ResolvePrintSettingsMethod "getLength" o = PrintSettingsGetLengthMethodInfo
ResolvePrintSettingsMethod "getMediaType" o = PrintSettingsGetMediaTypeMethodInfo
ResolvePrintSettingsMethod "getNCopies" o = PrintSettingsGetNCopiesMethodInfo
ResolvePrintSettingsMethod "getNumberUp" o = PrintSettingsGetNumberUpMethodInfo
ResolvePrintSettingsMethod "getNumberUpLayout" o = PrintSettingsGetNumberUpLayoutMethodInfo
ResolvePrintSettingsMethod "getOrientation" o = PrintSettingsGetOrientationMethodInfo
ResolvePrintSettingsMethod "getOutputBin" o = PrintSettingsGetOutputBinMethodInfo
ResolvePrintSettingsMethod "getPageRanges" o = PrintSettingsGetPageRangesMethodInfo
ResolvePrintSettingsMethod "getPageSet" o = PrintSettingsGetPageSetMethodInfo
ResolvePrintSettingsMethod "getPaperHeight" o = PrintSettingsGetPaperHeightMethodInfo
ResolvePrintSettingsMethod "getPaperSize" o = PrintSettingsGetPaperSizeMethodInfo
ResolvePrintSettingsMethod "getPaperWidth" o = PrintSettingsGetPaperWidthMethodInfo
ResolvePrintSettingsMethod "getPrintPages" o = PrintSettingsGetPrintPagesMethodInfo
ResolvePrintSettingsMethod "getPrinter" o = PrintSettingsGetPrinterMethodInfo
ResolvePrintSettingsMethod "getPrinterLpi" o = PrintSettingsGetPrinterLpiMethodInfo
ResolvePrintSettingsMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolvePrintSettingsMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolvePrintSettingsMethod "getQuality" o = PrintSettingsGetQualityMethodInfo
ResolvePrintSettingsMethod "getResolution" o = PrintSettingsGetResolutionMethodInfo
ResolvePrintSettingsMethod "getResolutionX" o = PrintSettingsGetResolutionXMethodInfo
ResolvePrintSettingsMethod "getResolutionY" o = PrintSettingsGetResolutionYMethodInfo
ResolvePrintSettingsMethod "getReverse" o = PrintSettingsGetReverseMethodInfo
ResolvePrintSettingsMethod "getScale" o = PrintSettingsGetScaleMethodInfo
ResolvePrintSettingsMethod "getUseColor" o = PrintSettingsGetUseColorMethodInfo
ResolvePrintSettingsMethod "setBool" o = PrintSettingsSetBoolMethodInfo
ResolvePrintSettingsMethod "setCollate" o = PrintSettingsSetCollateMethodInfo
ResolvePrintSettingsMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolvePrintSettingsMethod "setDefaultSource" o = PrintSettingsSetDefaultSourceMethodInfo
ResolvePrintSettingsMethod "setDither" o = PrintSettingsSetDitherMethodInfo
ResolvePrintSettingsMethod "setDouble" o = PrintSettingsSetDoubleMethodInfo
ResolvePrintSettingsMethod "setDuplex" o = PrintSettingsSetDuplexMethodInfo
ResolvePrintSettingsMethod "setFinishings" o = PrintSettingsSetFinishingsMethodInfo
ResolvePrintSettingsMethod "setInt" o = PrintSettingsSetIntMethodInfo
ResolvePrintSettingsMethod "setLength" o = PrintSettingsSetLengthMethodInfo
ResolvePrintSettingsMethod "setMediaType" o = PrintSettingsSetMediaTypeMethodInfo
ResolvePrintSettingsMethod "setNCopies" o = PrintSettingsSetNCopiesMethodInfo
ResolvePrintSettingsMethod "setNumberUp" o = PrintSettingsSetNumberUpMethodInfo
ResolvePrintSettingsMethod "setNumberUpLayout" o = PrintSettingsSetNumberUpLayoutMethodInfo
ResolvePrintSettingsMethod "setOrientation" o = PrintSettingsSetOrientationMethodInfo
ResolvePrintSettingsMethod "setOutputBin" o = PrintSettingsSetOutputBinMethodInfo
ResolvePrintSettingsMethod "setPageRanges" o = PrintSettingsSetPageRangesMethodInfo
ResolvePrintSettingsMethod "setPageSet" o = PrintSettingsSetPageSetMethodInfo
ResolvePrintSettingsMethod "setPaperHeight" o = PrintSettingsSetPaperHeightMethodInfo
ResolvePrintSettingsMethod "setPaperSize" o = PrintSettingsSetPaperSizeMethodInfo
ResolvePrintSettingsMethod "setPaperWidth" o = PrintSettingsSetPaperWidthMethodInfo
ResolvePrintSettingsMethod "setPrintPages" o = PrintSettingsSetPrintPagesMethodInfo
ResolvePrintSettingsMethod "setPrinter" o = PrintSettingsSetPrinterMethodInfo
ResolvePrintSettingsMethod "setPrinterLpi" o = PrintSettingsSetPrinterLpiMethodInfo
ResolvePrintSettingsMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolvePrintSettingsMethod "setQuality" o = PrintSettingsSetQualityMethodInfo
ResolvePrintSettingsMethod "setResolution" o = PrintSettingsSetResolutionMethodInfo
ResolvePrintSettingsMethod "setResolutionXy" o = PrintSettingsSetResolutionXyMethodInfo
ResolvePrintSettingsMethod "setReverse" o = PrintSettingsSetReverseMethodInfo
ResolvePrintSettingsMethod "setScale" o = PrintSettingsSetScaleMethodInfo
ResolvePrintSettingsMethod "setUseColor" o = PrintSettingsSetUseColorMethodInfo
ResolvePrintSettingsMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolvePrintSettingsMethod t PrintSettings, O.MethodInfo info PrintSettings p) => OL.IsLabel t (PrintSettings -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList PrintSettings
type instance O.AttributeList PrintSettings = PrintSettingsAttributeList
type PrintSettingsAttributeList = ('[ ] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
#endif
#if ENABLE_OVERLOADING
type instance O.SignalList PrintSettings = PrintSettingsSignalList
type PrintSettingsSignalList = ('[ '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
-- method PrintSettings::new
-- method type : Constructor
-- Args : []
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintSettings"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_new" gtk_print_settings_new ::
IO (Ptr PrintSettings)
{- |
Creates a new 'GI.Gtk.Objects.PrintSettings.PrintSettings' object.
/Since: 2.10/
-}
printSettingsNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m PrintSettings
{- ^ __Returns:__ a new 'GI.Gtk.Objects.PrintSettings.PrintSettings' object -}
printSettingsNew = liftIO $ do
result <- gtk_print_settings_new
checkUnexpectedReturnNULL "printSettingsNew" result
result' <- (wrapObject PrintSettings) result
return result'
#if ENABLE_OVERLOADING
#endif
-- method PrintSettings::new_from_file
-- method type : Constructor
-- Args : [Arg {argCName = "file_name", argType = TBasicType TFileName, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the filename to read the settings from", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintSettings"}))
-- throws : True
-- Skip return : False
foreign import ccall "gtk_print_settings_new_from_file" gtk_print_settings_new_from_file ::
CString -> -- file_name : TBasicType TFileName
Ptr (Ptr GError) -> -- error
IO (Ptr PrintSettings)
{- |
Reads the print settings from /@fileName@/. Returns a new 'GI.Gtk.Objects.PrintSettings.PrintSettings'
object with the restored settings, or 'Nothing' if an error occurred. If the
file could not be loaded then error is set to either a 'GI.GLib.Enums.FileError' or
'GI.GLib.Enums.KeyFileError'. See 'GI.Gtk.Objects.PrintSettings.printSettingsToFile'.
/Since: 2.12/
-}
printSettingsNewFromFile ::
(B.CallStack.HasCallStack, MonadIO m) =>
[Char]
{- ^ /@fileName@/: the filename to read the settings from -}
-> m PrintSettings
{- ^ __Returns:__ the restored 'GI.Gtk.Objects.PrintSettings.PrintSettings' /(Can throw 'Data.GI.Base.GError.GError')/ -}
printSettingsNewFromFile fileName = liftIO $ do
fileName' <- stringToCString fileName
onException (do
result <- propagateGError $ gtk_print_settings_new_from_file fileName'
checkUnexpectedReturnNULL "printSettingsNewFromFile" result
result' <- (wrapObject PrintSettings) result
freeMem fileName'
return result'
) (do
freeMem fileName'
)
#if ENABLE_OVERLOADING
#endif
-- method PrintSettings::new_from_gvariant
-- method type : Constructor
-- Args : [Arg {argCName = "variant", argType = TVariant, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "an a{sv} #GVariant", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintSettings"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_new_from_gvariant" gtk_print_settings_new_from_gvariant ::
Ptr GVariant -> -- variant : TVariant
IO (Ptr PrintSettings)
{- |
Deserialize print settings from an a{sv} variant in
the format produced by 'GI.Gtk.Objects.PrintSettings.printSettingsToGvariant'.
/Since: 3.22/
-}
printSettingsNewFromGvariant ::
(B.CallStack.HasCallStack, MonadIO m) =>
GVariant
{- ^ /@variant@/: an a{sv} 'GVariant' -}
-> m PrintSettings
{- ^ __Returns:__ a new 'GI.Gtk.Objects.PrintSettings.PrintSettings' object -}
printSettingsNewFromGvariant variant = liftIO $ do
variant' <- unsafeManagedPtrGetPtr variant
result <- gtk_print_settings_new_from_gvariant variant'
checkUnexpectedReturnNULL "printSettingsNewFromGvariant" result
result' <- (wrapObject PrintSettings) result
touchManagedPtr variant
return result'
#if ENABLE_OVERLOADING
#endif
-- method PrintSettings::new_from_key_file
-- method type : Constructor
-- Args : [Arg {argCName = "key_file", argType = TInterface (Name {namespace = "GLib", name = "KeyFile"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the #GKeyFile to retrieve the settings from", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "group_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the name of the group to use, or %NULL to use\n the default \8220Print Settings\8221", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintSettings"}))
-- throws : True
-- Skip return : False
foreign import ccall "gtk_print_settings_new_from_key_file" gtk_print_settings_new_from_key_file ::
Ptr GLib.KeyFile.KeyFile -> -- key_file : TInterface (Name {namespace = "GLib", name = "KeyFile"})
CString -> -- group_name : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO (Ptr PrintSettings)
{- |
Reads the print settings from the group /@groupName@/ in /@keyFile@/. Returns a
new 'GI.Gtk.Objects.PrintSettings.PrintSettings' object with the restored settings, or 'Nothing' if an
error occurred. If the file could not be loaded then error is set to either
a 'GI.GLib.Enums.FileError' or 'GI.GLib.Enums.KeyFileError'.
/Since: 2.12/
-}
printSettingsNewFromKeyFile ::
(B.CallStack.HasCallStack, MonadIO m) =>
GLib.KeyFile.KeyFile
{- ^ /@keyFile@/: the 'GI.GLib.Structs.KeyFile.KeyFile' to retrieve the settings from -}
-> Maybe (T.Text)
{- ^ /@groupName@/: the name of the group to use, or 'Nothing' to use
the default “Print Settings” -}
-> m PrintSettings
{- ^ __Returns:__ the restored 'GI.Gtk.Objects.PrintSettings.PrintSettings' /(Can throw 'Data.GI.Base.GError.GError')/ -}
printSettingsNewFromKeyFile keyFile groupName = liftIO $ do
keyFile' <- unsafeManagedPtrGetPtr keyFile
maybeGroupName <- case groupName of
Nothing -> return nullPtr
Just jGroupName -> do
jGroupName' <- textToCString jGroupName
return jGroupName'
onException (do
result <- propagateGError $ gtk_print_settings_new_from_key_file keyFile' maybeGroupName
checkUnexpectedReturnNULL "printSettingsNewFromKeyFile" result
result' <- (wrapObject PrintSettings) result
touchManagedPtr keyFile
freeMem maybeGroupName
return result'
) (do
freeMem maybeGroupName
)
#if ENABLE_OVERLOADING
#endif
-- method PrintSettings::copy
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "other", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintSettings"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_copy" gtk_print_settings_copy ::
Ptr PrintSettings -> -- other : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO (Ptr PrintSettings)
{- |
Copies a 'GI.Gtk.Objects.PrintSettings.PrintSettings' object.
/Since: 2.10/
-}
printSettingsCopy ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@other@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m PrintSettings
{- ^ __Returns:__ a newly allocated copy of /@other@/ -}
printSettingsCopy other = liftIO $ do
other' <- unsafeManagedPtrCastPtr other
result <- gtk_print_settings_copy other'
checkUnexpectedReturnNULL "printSettingsCopy" result
result' <- (wrapObject PrintSettings) result
touchManagedPtr other
return result'
#if ENABLE_OVERLOADING
data PrintSettingsCopyMethodInfo
instance (signature ~ (m PrintSettings), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsCopyMethodInfo a signature where
overloadedMethod _ = printSettingsCopy
#endif
-- method PrintSettings::foreach
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "func", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettingsFunc"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the function to call", sinceVersion = Nothing}, argScope = ScopeTypeCall, argClosure = 2, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "user data for @func", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_foreach" gtk_print_settings_foreach ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
FunPtr Gtk.Callbacks.C_PrintSettingsFunc -> -- func : TInterface (Name {namespace = "Gtk", name = "PrintSettingsFunc"})
Ptr () -> -- user_data : TBasicType TPtr
IO ()
{- |
Calls /@func@/ for each key-value pair of /@settings@/.
/Since: 2.10/
-}
printSettingsForeach ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Callbacks.PrintSettingsFunc
{- ^ /@func@/: the function to call -}
-> m ()
printSettingsForeach settings func = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
func' <- Gtk.Callbacks.mk_PrintSettingsFunc (Gtk.Callbacks.wrap_PrintSettingsFunc Nothing (Gtk.Callbacks.drop_closures_PrintSettingsFunc func))
let userData = nullPtr
gtk_print_settings_foreach settings' func' userData
safeFreeFunPtr $ castFunPtrToPtr func'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsForeachMethodInfo
instance (signature ~ (Gtk.Callbacks.PrintSettingsFunc -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsForeachMethodInfo a signature where
overloadedMethod _ = printSettingsForeach
#endif
-- method PrintSettings::get
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get" gtk_print_settings_get ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO CString
{- |
Looks up the string value associated with /@key@/.
/Since: 2.10/
-}
printSettingsGet ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m T.Text
{- ^ __Returns:__ the string value for /@key@/ -}
printSettingsGet settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_get settings' key'
checkUnexpectedReturnNULL "printSettingsGet" result
result' <- cstringToText result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetMethodInfo
instance (signature ~ (T.Text -> m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetMethodInfo a signature where
overloadedMethod _ = printSettingsGet
#endif
-- method PrintSettings::get_bool
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_bool" gtk_print_settings_get_bool ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO CInt
{- |
Returns the boolean represented by the value
that is associated with /@key@/.
The string “true” represents 'True', any other
string 'False'.
/Since: 2.10/
-}
printSettingsGetBool ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m Bool
{- ^ __Returns:__ 'True', if /@key@/ maps to a true value. -}
printSettingsGetBool settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_get_bool settings' key'
let result' = (/= 0) result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetBoolMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetBoolMethodInfo a signature where
overloadedMethod _ = printSettingsGetBool
#endif
-- method PrintSettings::get_collate
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_collate" gtk_print_settings_get_collate ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_COLLATE'.
/Since: 2.10/
-}
printSettingsGetCollate ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Bool
{- ^ __Returns:__ whether to collate the printed pages -}
printSettingsGetCollate settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_collate settings'
let result' = (/= 0) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetCollateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetCollateMethodInfo a signature where
overloadedMethod _ = printSettingsGetCollate
#endif
-- method PrintSettings::get_default_source
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_default_source" gtk_print_settings_get_default_source ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DEFAULT_SOURCE'.
/Since: 2.10/
-}
printSettingsGetDefaultSource ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the default source -}
printSettingsGetDefaultSource settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_default_source settings'
checkUnexpectedReturnNULL "printSettingsGetDefaultSource" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetDefaultSourceMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetDefaultSourceMethodInfo a signature where
overloadedMethod _ = printSettingsGetDefaultSource
#endif
-- method PrintSettings::get_dither
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_dither" gtk_print_settings_get_dither ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DITHER'.
/Since: 2.10/
-}
printSettingsGetDither ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the dithering that is used -}
printSettingsGetDither settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_dither settings'
checkUnexpectedReturnNULL "printSettingsGetDither" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetDitherMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetDitherMethodInfo a signature where
overloadedMethod _ = printSettingsGetDither
#endif
-- method PrintSettings::get_double
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_double" gtk_print_settings_get_double ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO CDouble
{- |
Returns the double value associated with /@key@/, or 0.
/Since: 2.10/
-}
printSettingsGetDouble ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m Double
{- ^ __Returns:__ the double value of /@key@/ -}
printSettingsGetDouble settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_get_double settings' key'
let result' = realToFrac result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetDoubleMethodInfo
instance (signature ~ (T.Text -> m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetDoubleMethodInfo a signature where
overloadedMethod _ = printSettingsGetDouble
#endif
-- method PrintSettings::get_double_with_default
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "def", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the default value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_double_with_default" gtk_print_settings_get_double_with_default ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CDouble -> -- def : TBasicType TDouble
IO CDouble
{- |
Returns the floating point number represented by
the value that is associated with /@key@/, or /@defaultVal@/
if the value does not represent a floating point number.
Floating point numbers are parsed with 'GI.GLib.Functions.asciiStrtod'.
/Since: 2.10/
-}
printSettingsGetDoubleWithDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Double
{- ^ /@def@/: the default value -}
-> m Double
{- ^ __Returns:__ the floating point number associated with /@key@/ -}
printSettingsGetDoubleWithDefault settings key def = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
let def' = realToFrac def
result <- gtk_print_settings_get_double_with_default settings' key' def'
let result' = realToFrac result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetDoubleWithDefaultMethodInfo
instance (signature ~ (T.Text -> Double -> m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetDoubleWithDefaultMethodInfo a signature where
overloadedMethod _ = printSettingsGetDoubleWithDefault
#endif
-- method PrintSettings::get_duplex
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintDuplex"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_duplex" gtk_print_settings_get_duplex ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DUPLEX'.
/Since: 2.10/
-}
printSettingsGetDuplex ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.PrintDuplex
{- ^ __Returns:__ whether to print the output in duplex. -}
printSettingsGetDuplex settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_duplex settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetDuplexMethodInfo
instance (signature ~ (m Gtk.Enums.PrintDuplex), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetDuplexMethodInfo a signature where
overloadedMethod _ = printSettingsGetDuplex
#endif
-- method PrintSettings::get_finishings
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_finishings" gtk_print_settings_get_finishings ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_FINISHINGS'.
/Since: 2.10/
-}
printSettingsGetFinishings ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the finishings -}
printSettingsGetFinishings settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_finishings settings'
checkUnexpectedReturnNULL "printSettingsGetFinishings" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetFinishingsMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetFinishingsMethodInfo a signature where
overloadedMethod _ = printSettingsGetFinishings
#endif
-- method PrintSettings::get_int
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_int" gtk_print_settings_get_int ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO Int32
{- |
Returns the integer value of /@key@/, or 0.
/Since: 2.10/
-}
printSettingsGetInt ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m Int32
{- ^ __Returns:__ the integer value of /@key@/ -}
printSettingsGetInt settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_get_int settings' key'
touchManagedPtr settings
freeMem key'
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetIntMethodInfo
instance (signature ~ (T.Text -> m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetIntMethodInfo a signature where
overloadedMethod _ = printSettingsGetInt
#endif
-- method PrintSettings::get_int_with_default
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "def", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the default value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_int_with_default" gtk_print_settings_get_int_with_default ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
Int32 -> -- def : TBasicType TInt
IO Int32
{- |
Returns the value of /@key@/, interpreted as
an integer, or the default value.
/Since: 2.10/
-}
printSettingsGetIntWithDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Int32
{- ^ /@def@/: the default value -}
-> m Int32
{- ^ __Returns:__ the integer value of /@key@/ -}
printSettingsGetIntWithDefault settings key def = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_get_int_with_default settings' key' def
touchManagedPtr settings
freeMem key'
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetIntWithDefaultMethodInfo
instance (signature ~ (T.Text -> Int32 -> m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetIntWithDefaultMethodInfo a signature where
overloadedMethod _ = printSettingsGetIntWithDefault
#endif
-- method PrintSettings::get_length
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the unit of the return value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_length" gtk_print_settings_get_length ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO CDouble
{- |
Returns the value associated with /@key@/, interpreted
as a length. The returned value is converted to /@units@/.
/Since: 2.10/
-}
printSettingsGetLength ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the unit of the return value -}
-> m Double
{- ^ __Returns:__ the length value of /@key@/, converted to /@unit@/ -}
printSettingsGetLength settings key unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
let unit' = (fromIntegral . fromEnum) unit
result <- gtk_print_settings_get_length settings' key' unit'
let result' = realToFrac result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetLengthMethodInfo
instance (signature ~ (T.Text -> Gtk.Enums.Unit -> m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetLengthMethodInfo a signature where
overloadedMethod _ = printSettingsGetLength
#endif
-- method PrintSettings::get_media_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_media_type" gtk_print_settings_get_media_type ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_MEDIA_TYPE'.
The set of media types is defined in PWG 5101.1-2002 PWG.
/Since: 2.10/
-}
printSettingsGetMediaType ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the media type -}
printSettingsGetMediaType settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_media_type settings'
checkUnexpectedReturnNULL "printSettingsGetMediaType" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetMediaTypeMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetMediaTypeMethodInfo a signature where
overloadedMethod _ = printSettingsGetMediaType
#endif
-- method PrintSettings::get_n_copies
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_n_copies" gtk_print_settings_get_n_copies ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO Int32
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_N_COPIES'.
/Since: 2.10/
-}
printSettingsGetNCopies ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Int32
{- ^ __Returns:__ the number of copies to print -}
printSettingsGetNCopies settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_n_copies settings'
touchManagedPtr settings
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetNCopiesMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetNCopiesMethodInfo a signature where
overloadedMethod _ = printSettingsGetNCopies
#endif
-- method PrintSettings::get_number_up
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_number_up" gtk_print_settings_get_number_up ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO Int32
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_NUMBER_UP'.
/Since: 2.10/
-}
printSettingsGetNumberUp ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Int32
{- ^ __Returns:__ the number of pages per sheet -}
printSettingsGetNumberUp settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_number_up settings'
touchManagedPtr settings
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetNumberUpMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetNumberUpMethodInfo a signature where
overloadedMethod _ = printSettingsGetNumberUp
#endif
-- method PrintSettings::get_number_up_layout
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "NumberUpLayout"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_number_up_layout" gtk_print_settings_get_number_up_layout ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_NUMBER_UP_LAYOUT'.
/Since: 2.14/
-}
printSettingsGetNumberUpLayout ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.NumberUpLayout
{- ^ __Returns:__ layout of page in number-up mode -}
printSettingsGetNumberUpLayout settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_number_up_layout settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetNumberUpLayoutMethodInfo
instance (signature ~ (m Gtk.Enums.NumberUpLayout), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetNumberUpLayoutMethodInfo a signature where
overloadedMethod _ = printSettingsGetNumberUpLayout
#endif
-- method PrintSettings::get_orientation
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PageOrientation"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_orientation" gtk_print_settings_get_orientation ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Get the value of 'GI.Gtk.Constants.PRINT_SETTINGS_ORIENTATION',
converted to a 'GI.Gtk.Enums.PageOrientation'.
/Since: 2.10/
-}
printSettingsGetOrientation ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.PageOrientation
{- ^ __Returns:__ the orientation -}
printSettingsGetOrientation settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_orientation settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetOrientationMethodInfo
instance (signature ~ (m Gtk.Enums.PageOrientation), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetOrientationMethodInfo a signature where
overloadedMethod _ = printSettingsGetOrientation
#endif
-- method PrintSettings::get_output_bin
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_output_bin" gtk_print_settings_get_output_bin ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_OUTPUT_BIN'.
/Since: 2.10/
-}
printSettingsGetOutputBin ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the output bin -}
printSettingsGetOutputBin settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_output_bin settings'
checkUnexpectedReturnNULL "printSettingsGetOutputBin" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetOutputBinMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetOutputBinMethodInfo a signature where
overloadedMethod _ = printSettingsGetOutputBin
#endif
-- method PrintSettings::get_page_ranges
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "num_ranges", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "return location for the length of the returned array", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : [Arg {argCName = "num_ranges", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "return location for the length of the returned array", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- returnType : Just (TCArray False (-1) 1 (TInterface (Name {namespace = "Gtk", name = "PageRange"})))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_page_ranges" gtk_print_settings_get_page_ranges ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Ptr Int32 -> -- num_ranges : TBasicType TInt
IO (Ptr Gtk.PageRange.PageRange)
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAGE_RANGES'.
/Since: 2.10/
-}
printSettingsGetPageRanges ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m [Gtk.PageRange.PageRange]
{- ^ __Returns:__ an array
of @/GtkPageRanges/@. Use 'GI.GLib.Functions.free' to free the array when
it is no longer needed. -}
printSettingsGetPageRanges settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
numRanges <- allocMem :: IO (Ptr Int32)
result <- gtk_print_settings_get_page_ranges settings' numRanges
numRanges' <- peek numRanges
checkUnexpectedReturnNULL "printSettingsGetPageRanges" result
result' <- (unpackBlockArrayWithLength 8 numRanges') result
result'' <- mapM (wrapPtr Gtk.PageRange.PageRange) result'
freeMem result
touchManagedPtr settings
freeMem numRanges
return result''
#if ENABLE_OVERLOADING
data PrintSettingsGetPageRangesMethodInfo
instance (signature ~ (m [Gtk.PageRange.PageRange]), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPageRangesMethodInfo a signature where
overloadedMethod _ = printSettingsGetPageRanges
#endif
-- method PrintSettings::get_page_set
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PageSet"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_page_set" gtk_print_settings_get_page_set ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAGE_SET'.
/Since: 2.10/
-}
printSettingsGetPageSet ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.PageSet
{- ^ __Returns:__ the set of pages to print -}
printSettingsGetPageSet settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_page_set settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPageSetMethodInfo
instance (signature ~ (m Gtk.Enums.PageSet), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPageSetMethodInfo a signature where
overloadedMethod _ = printSettingsGetPageSet
#endif
-- method PrintSettings::get_paper_height
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the unit for the return value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_paper_height" gtk_print_settings_get_paper_height ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO CDouble
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_HEIGHT',
converted to /@unit@/.
/Since: 2.10/
-}
printSettingsGetPaperHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the unit for the return value -}
-> m Double
{- ^ __Returns:__ the paper height, in units of /@unit@/ -}
printSettingsGetPaperHeight settings unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let unit' = (fromIntegral . fromEnum) unit
result <- gtk_print_settings_get_paper_height settings' unit'
let result' = realToFrac result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPaperHeightMethodInfo
instance (signature ~ (Gtk.Enums.Unit -> m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPaperHeightMethodInfo a signature where
overloadedMethod _ = printSettingsGetPaperHeight
#endif
-- method PrintSettings::get_paper_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PaperSize"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_paper_size" gtk_print_settings_get_paper_size ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO (Ptr Gtk.PaperSize.PaperSize)
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_FORMAT',
converted to a 'GI.Gtk.Structs.PaperSize.PaperSize'.
/Since: 2.10/
-}
printSettingsGetPaperSize ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.PaperSize.PaperSize
{- ^ __Returns:__ the paper size -}
printSettingsGetPaperSize settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_paper_size settings'
checkUnexpectedReturnNULL "printSettingsGetPaperSize" result
result' <- (wrapBoxed Gtk.PaperSize.PaperSize) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPaperSizeMethodInfo
instance (signature ~ (m Gtk.PaperSize.PaperSize), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPaperSizeMethodInfo a signature where
overloadedMethod _ = printSettingsGetPaperSize
#endif
-- method PrintSettings::get_paper_width
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the unit for the return value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_paper_width" gtk_print_settings_get_paper_width ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO CDouble
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_WIDTH',
converted to /@unit@/.
/Since: 2.10/
-}
printSettingsGetPaperWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the unit for the return value -}
-> m Double
{- ^ __Returns:__ the paper width, in units of /@unit@/ -}
printSettingsGetPaperWidth settings unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let unit' = (fromIntegral . fromEnum) unit
result <- gtk_print_settings_get_paper_width settings' unit'
let result' = realToFrac result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPaperWidthMethodInfo
instance (signature ~ (Gtk.Enums.Unit -> m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPaperWidthMethodInfo a signature where
overloadedMethod _ = printSettingsGetPaperWidth
#endif
-- method PrintSettings::get_print_pages
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintPages"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_print_pages" gtk_print_settings_get_print_pages ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PRINT_PAGES'.
/Since: 2.10/
-}
printSettingsGetPrintPages ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.PrintPages
{- ^ __Returns:__ which pages to print -}
printSettingsGetPrintPages settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_print_pages settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPrintPagesMethodInfo
instance (signature ~ (m Gtk.Enums.PrintPages), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPrintPagesMethodInfo a signature where
overloadedMethod _ = printSettingsGetPrintPages
#endif
-- method PrintSettings::get_printer
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TUTF8)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_printer" gtk_print_settings_get_printer ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CString
{- |
Convenience function to obtain the value of
'GI.Gtk.Constants.PRINT_SETTINGS_PRINTER'.
/Since: 2.10/
-}
printSettingsGetPrinter ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m T.Text
{- ^ __Returns:__ the printer name -}
printSettingsGetPrinter settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_printer settings'
checkUnexpectedReturnNULL "printSettingsGetPrinter" result
result' <- cstringToText result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPrinterMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPrinterMethodInfo a signature where
overloadedMethod _ = printSettingsGetPrinter
#endif
-- method PrintSettings::get_printer_lpi
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_printer_lpi" gtk_print_settings_get_printer_lpi ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CDouble
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PRINTER_LPI'.
/Since: 2.16/
-}
printSettingsGetPrinterLpi ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Double
{- ^ __Returns:__ the resolution in lpi (lines per inch) -}
printSettingsGetPrinterLpi settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_printer_lpi settings'
let result' = realToFrac result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetPrinterLpiMethodInfo
instance (signature ~ (m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetPrinterLpiMethodInfo a signature where
overloadedMethod _ = printSettingsGetPrinterLpi
#endif
-- method PrintSettings::get_quality
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "PrintQuality"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_quality" gtk_print_settings_get_quality ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CUInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_QUALITY'.
/Since: 2.10/
-}
printSettingsGetQuality ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Gtk.Enums.PrintQuality
{- ^ __Returns:__ the print quality -}
printSettingsGetQuality settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_quality settings'
let result' = (toEnum . fromIntegral) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetQualityMethodInfo
instance (signature ~ (m Gtk.Enums.PrintQuality), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetQualityMethodInfo a signature where
overloadedMethod _ = printSettingsGetQuality
#endif
-- method PrintSettings::get_resolution
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_resolution" gtk_print_settings_get_resolution ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO Int32
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION'.
/Since: 2.10/
-}
printSettingsGetResolution ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Int32
{- ^ __Returns:__ the resolution in dpi -}
printSettingsGetResolution settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_resolution settings'
touchManagedPtr settings
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetResolutionMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetResolutionMethodInfo a signature where
overloadedMethod _ = printSettingsGetResolution
#endif
-- method PrintSettings::get_resolution_x
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_resolution_x" gtk_print_settings_get_resolution_x ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO Int32
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_X'.
/Since: 2.16/
-}
printSettingsGetResolutionX ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Int32
{- ^ __Returns:__ the horizontal resolution in dpi -}
printSettingsGetResolutionX settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_resolution_x settings'
touchManagedPtr settings
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetResolutionXMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetResolutionXMethodInfo a signature where
overloadedMethod _ = printSettingsGetResolutionX
#endif
-- method PrintSettings::get_resolution_y
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TInt)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_resolution_y" gtk_print_settings_get_resolution_y ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO Int32
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_Y'.
/Since: 2.16/
-}
printSettingsGetResolutionY ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Int32
{- ^ __Returns:__ the vertical resolution in dpi -}
printSettingsGetResolutionY settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_resolution_y settings'
touchManagedPtr settings
return result
#if ENABLE_OVERLOADING
data PrintSettingsGetResolutionYMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetResolutionYMethodInfo a signature where
overloadedMethod _ = printSettingsGetResolutionY
#endif
-- method PrintSettings::get_reverse
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_reverse" gtk_print_settings_get_reverse ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_REVERSE'.
/Since: 2.10/
-}
printSettingsGetReverse ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Bool
{- ^ __Returns:__ whether to reverse the order of the printed pages -}
printSettingsGetReverse settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_reverse settings'
let result' = (/= 0) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetReverseMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetReverseMethodInfo a signature where
overloadedMethod _ = printSettingsGetReverse
#endif
-- method PrintSettings::get_scale
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TDouble)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_scale" gtk_print_settings_get_scale ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CDouble
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_SCALE'.
/Since: 2.10/
-}
printSettingsGetScale ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Double
{- ^ __Returns:__ the scale in percent -}
printSettingsGetScale settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_scale settings'
let result' = realToFrac result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetScaleMethodInfo
instance (signature ~ (m Double), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetScaleMethodInfo a signature where
overloadedMethod _ = printSettingsGetScale
#endif
-- method PrintSettings::get_use_color
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_get_use_color" gtk_print_settings_get_use_color ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO CInt
{- |
Gets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_USE_COLOR'.
/Since: 2.10/
-}
printSettingsGetUseColor ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m Bool
{- ^ __Returns:__ whether to use color -}
printSettingsGetUseColor settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_get_use_color settings'
let result' = (/= 0) result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsGetUseColorMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsGetUseColorMethodInfo a signature where
overloadedMethod _ = printSettingsGetUseColor
#endif
-- method PrintSettings::has_key
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_has_key" gtk_print_settings_has_key ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO CInt
{- |
Returns 'True', if a value is associated with /@key@/.
/Since: 2.10/
-}
printSettingsHasKey ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m Bool
{- ^ __Returns:__ 'True', if /@key@/ has a value -}
printSettingsHasKey settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
result <- gtk_print_settings_has_key settings' key'
let result' = (/= 0) result
touchManagedPtr settings
freeMem key'
return result'
#if ENABLE_OVERLOADING
data PrintSettingsHasKeyMethodInfo
instance (signature ~ (T.Text -> m Bool), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsHasKeyMethodInfo a signature where
overloadedMethod _ = printSettingsHasKey
#endif
-- method PrintSettings::load_file
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file_name", argType = TBasicType TFileName, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the filename to read the settings from", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : True
-- Skip return : False
foreign import ccall "gtk_print_settings_load_file" gtk_print_settings_load_file ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- file_name : TBasicType TFileName
Ptr (Ptr GError) -> -- error
IO CInt
{- |
Reads the print settings from /@fileName@/. If the file could not be loaded
then error is set to either a 'GI.GLib.Enums.FileError' or 'GI.GLib.Enums.KeyFileError'.
See 'GI.Gtk.Objects.PrintSettings.printSettingsToFile'.
/Since: 2.14/
-}
printSettingsLoadFile ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> [Char]
{- ^ /@fileName@/: the filename to read the settings from -}
-> m ()
{- ^ /(Can throw 'Data.GI.Base.GError.GError')/ -}
printSettingsLoadFile settings fileName = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
fileName' <- stringToCString fileName
onException (do
_ <- propagateGError $ gtk_print_settings_load_file settings' fileName'
touchManagedPtr settings
freeMem fileName'
return ()
) (do
freeMem fileName'
)
#if ENABLE_OVERLOADING
data PrintSettingsLoadFileMethodInfo
instance (signature ~ ([Char] -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsLoadFileMethodInfo a signature where
overloadedMethod _ = printSettingsLoadFile
#endif
-- method PrintSettings::load_key_file
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key_file", argType = TInterface (Name {namespace = "GLib", name = "KeyFile"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the #GKeyFile to retrieve the settings from", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "group_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the name of the group to use, or %NULL to use the default\n \8220Print Settings\8221", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : True
-- Skip return : False
foreign import ccall "gtk_print_settings_load_key_file" gtk_print_settings_load_key_file ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Ptr GLib.KeyFile.KeyFile -> -- key_file : TInterface (Name {namespace = "GLib", name = "KeyFile"})
CString -> -- group_name : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO CInt
{- |
Reads the print settings from the group /@groupName@/ in /@keyFile@/. If the
file could not be loaded then error is set to either a 'GI.GLib.Enums.FileError' or
'GI.GLib.Enums.KeyFileError'.
/Since: 2.14/
-}
printSettingsLoadKeyFile ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> GLib.KeyFile.KeyFile
{- ^ /@keyFile@/: the 'GI.GLib.Structs.KeyFile.KeyFile' to retrieve the settings from -}
-> Maybe (T.Text)
{- ^ /@groupName@/: the name of the group to use, or 'Nothing' to use the default
“Print Settings” -}
-> m ()
{- ^ /(Can throw 'Data.GI.Base.GError.GError')/ -}
printSettingsLoadKeyFile settings keyFile groupName = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
keyFile' <- unsafeManagedPtrGetPtr keyFile
maybeGroupName <- case groupName of
Nothing -> return nullPtr
Just jGroupName -> do
jGroupName' <- textToCString jGroupName
return jGroupName'
onException (do
_ <- propagateGError $ gtk_print_settings_load_key_file settings' keyFile' maybeGroupName
touchManagedPtr settings
touchManagedPtr keyFile
freeMem maybeGroupName
return ()
) (do
freeMem maybeGroupName
)
#if ENABLE_OVERLOADING
data PrintSettingsLoadKeyFileMethodInfo
instance (signature ~ (GLib.KeyFile.KeyFile -> Maybe (T.Text) -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsLoadKeyFileMethodInfo a signature where
overloadedMethod _ = printSettingsLoadKeyFile
#endif
-- method PrintSettings::set
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "a string value, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set" gtk_print_settings_set ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CString -> -- value : TBasicType TUTF8
IO ()
{- |
Associates /@value@/ with /@key@/.
/Since: 2.10/
-}
printSettingsSet ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Maybe (T.Text)
{- ^ /@value@/: a string value, or 'Nothing' -}
-> m ()
printSettingsSet settings key value = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
maybeValue <- case value of
Nothing -> return nullPtr
Just jValue -> do
jValue' <- textToCString jValue
return jValue'
gtk_print_settings_set settings' key' maybeValue
touchManagedPtr settings
freeMem key'
freeMem maybeValue
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetMethodInfo
instance (signature ~ (T.Text -> Maybe (T.Text) -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetMethodInfo a signature where
overloadedMethod _ = printSettingsSet
#endif
-- method PrintSettings::set_bool
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a boolean", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_bool" gtk_print_settings_set_bool ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CInt -> -- value : TBasicType TBoolean
IO ()
{- |
Sets /@key@/ to a boolean value.
/Since: 2.10/
-}
printSettingsSetBool ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Bool
{- ^ /@value@/: a boolean -}
-> m ()
printSettingsSetBool settings key value = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
let value' = (fromIntegral . fromEnum) value
gtk_print_settings_set_bool settings' key' value'
touchManagedPtr settings
freeMem key'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetBoolMethodInfo
instance (signature ~ (T.Text -> Bool -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetBoolMethodInfo a signature where
overloadedMethod _ = printSettingsSetBool
#endif
-- method PrintSettings::set_collate
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "collate", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "whether to collate the output", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_collate" gtk_print_settings_set_collate ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CInt -> -- collate : TBasicType TBoolean
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_COLLATE'.
/Since: 2.10/
-}
printSettingsSetCollate ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Bool
{- ^ /@collate@/: whether to collate the output -}
-> m ()
printSettingsSetCollate settings collate = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let collate' = (fromIntegral . fromEnum) collate
gtk_print_settings_set_collate settings' collate'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetCollateMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetCollateMethodInfo a signature where
overloadedMethod _ = printSettingsSetCollate
#endif
-- method PrintSettings::set_default_source
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "default_source", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the default source", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_default_source" gtk_print_settings_set_default_source ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- default_source : TBasicType TUTF8
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DEFAULT_SOURCE'.
/Since: 2.10/
-}
printSettingsSetDefaultSource ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@defaultSource@/: the default source -}
-> m ()
printSettingsSetDefaultSource settings defaultSource = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
defaultSource' <- textToCString defaultSource
gtk_print_settings_set_default_source settings' defaultSource'
touchManagedPtr settings
freeMem defaultSource'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetDefaultSourceMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetDefaultSourceMethodInfo a signature where
overloadedMethod _ = printSettingsSetDefaultSource
#endif
-- method PrintSettings::set_dither
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "dither", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the dithering that is used", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_dither" gtk_print_settings_set_dither ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- dither : TBasicType TUTF8
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DITHER'.
/Since: 2.10/
-}
printSettingsSetDither ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@dither@/: the dithering that is used -}
-> m ()
printSettingsSetDither settings dither = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
dither' <- textToCString dither
gtk_print_settings_set_dither settings' dither'
touchManagedPtr settings
freeMem dither'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetDitherMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetDitherMethodInfo a signature where
overloadedMethod _ = printSettingsSetDither
#endif
-- method PrintSettings::set_double
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a double value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_double" gtk_print_settings_set_double ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CDouble -> -- value : TBasicType TDouble
IO ()
{- |
Sets /@key@/ to a double value.
/Since: 2.10/
-}
printSettingsSetDouble ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Double
{- ^ /@value@/: a double value -}
-> m ()
printSettingsSetDouble settings key value = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
let value' = realToFrac value
gtk_print_settings_set_double settings' key' value'
touchManagedPtr settings
freeMem key'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetDoubleMethodInfo
instance (signature ~ (T.Text -> Double -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetDoubleMethodInfo a signature where
overloadedMethod _ = printSettingsSetDouble
#endif
-- method PrintSettings::set_duplex
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "duplex", argType = TInterface (Name {namespace = "Gtk", name = "PrintDuplex"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintDuplex value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_duplex" gtk_print_settings_set_duplex ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- duplex : TInterface (Name {namespace = "Gtk", name = "PrintDuplex"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_DUPLEX'.
/Since: 2.10/
-}
printSettingsSetDuplex ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.PrintDuplex
{- ^ /@duplex@/: a 'GI.Gtk.Enums.PrintDuplex' value -}
-> m ()
printSettingsSetDuplex settings duplex = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let duplex' = (fromIntegral . fromEnum) duplex
gtk_print_settings_set_duplex settings' duplex'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetDuplexMethodInfo
instance (signature ~ (Gtk.Enums.PrintDuplex -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetDuplexMethodInfo a signature where
overloadedMethod _ = printSettingsSetDuplex
#endif
-- method PrintSettings::set_finishings
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "finishings", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the finishings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_finishings" gtk_print_settings_set_finishings ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- finishings : TBasicType TUTF8
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_FINISHINGS'.
/Since: 2.10/
-}
printSettingsSetFinishings ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@finishings@/: the finishings -}
-> m ()
printSettingsSetFinishings settings finishings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
finishings' <- textToCString finishings
gtk_print_settings_set_finishings settings' finishings'
touchManagedPtr settings
freeMem finishings'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetFinishingsMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetFinishingsMethodInfo a signature where
overloadedMethod _ = printSettingsSetFinishings
#endif
-- method PrintSettings::set_int
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "an integer", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_int" gtk_print_settings_set_int ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
Int32 -> -- value : TBasicType TInt
IO ()
{- |
Sets /@key@/ to an integer value.
/Since: 2.10/
-}
printSettingsSetInt ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Int32
{- ^ /@value@/: an integer -}
-> m ()
printSettingsSetInt settings key value = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
gtk_print_settings_set_int settings' key' value
touchManagedPtr settings
freeMem key'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetIntMethodInfo
instance (signature ~ (T.Text -> Int32 -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetIntMethodInfo a signature where
overloadedMethod _ = printSettingsSetInt
#endif
-- method PrintSettings::set_length
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a length", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the unit of @length", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_length" gtk_print_settings_set_length ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
CDouble -> -- value : TBasicType TDouble
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO ()
{- |
Associates a length in units of /@unit@/ with /@key@/.
/Since: 2.10/
-}
printSettingsSetLength ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> Double
{- ^ /@value@/: a length -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the unit of /@length@/ -}
-> m ()
printSettingsSetLength settings key value unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
let value' = realToFrac value
let unit' = (fromIntegral . fromEnum) unit
gtk_print_settings_set_length settings' key' value' unit'
touchManagedPtr settings
freeMem key'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetLengthMethodInfo
instance (signature ~ (T.Text -> Double -> Gtk.Enums.Unit -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetLengthMethodInfo a signature where
overloadedMethod _ = printSettingsSetLength
#endif
-- method PrintSettings::set_media_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "media_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the media type", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_media_type" gtk_print_settings_set_media_type ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- media_type : TBasicType TUTF8
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_MEDIA_TYPE'.
The set of media types is defined in PWG 5101.1-2002 PWG.
/Since: 2.10/
-}
printSettingsSetMediaType ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@mediaType@/: the media type -}
-> m ()
printSettingsSetMediaType settings mediaType = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
mediaType' <- textToCString mediaType
gtk_print_settings_set_media_type settings' mediaType'
touchManagedPtr settings
freeMem mediaType'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetMediaTypeMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetMediaTypeMethodInfo a signature where
overloadedMethod _ = printSettingsSetMediaType
#endif
-- method PrintSettings::set_n_copies
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "num_copies", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the number of copies", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_n_copies" gtk_print_settings_set_n_copies ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Int32 -> -- num_copies : TBasicType TInt
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_N_COPIES'.
/Since: 2.10/
-}
printSettingsSetNCopies ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Int32
{- ^ /@numCopies@/: the number of copies -}
-> m ()
printSettingsSetNCopies settings numCopies = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
gtk_print_settings_set_n_copies settings' numCopies
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetNCopiesMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetNCopiesMethodInfo a signature where
overloadedMethod _ = printSettingsSetNCopies
#endif
-- method PrintSettings::set_number_up
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "number_up", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the number of pages per sheet", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_number_up" gtk_print_settings_set_number_up ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Int32 -> -- number_up : TBasicType TInt
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_NUMBER_UP'.
/Since: 2.10/
-}
printSettingsSetNumberUp ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Int32
{- ^ /@numberUp@/: the number of pages per sheet -}
-> m ()
printSettingsSetNumberUp settings numberUp = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
gtk_print_settings_set_number_up settings' numberUp
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetNumberUpMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetNumberUpMethodInfo a signature where
overloadedMethod _ = printSettingsSetNumberUp
#endif
-- method PrintSettings::set_number_up_layout
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "number_up_layout", argType = TInterface (Name {namespace = "Gtk", name = "NumberUpLayout"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkNumberUpLayout value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_number_up_layout" gtk_print_settings_set_number_up_layout ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- number_up_layout : TInterface (Name {namespace = "Gtk", name = "NumberUpLayout"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_NUMBER_UP_LAYOUT'.
/Since: 2.14/
-}
printSettingsSetNumberUpLayout ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.NumberUpLayout
{- ^ /@numberUpLayout@/: a 'GI.Gtk.Enums.NumberUpLayout' value -}
-> m ()
printSettingsSetNumberUpLayout settings numberUpLayout = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let numberUpLayout' = (fromIntegral . fromEnum) numberUpLayout
gtk_print_settings_set_number_up_layout settings' numberUpLayout'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetNumberUpLayoutMethodInfo
instance (signature ~ (Gtk.Enums.NumberUpLayout -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetNumberUpLayoutMethodInfo a signature where
overloadedMethod _ = printSettingsSetNumberUpLayout
#endif
-- method PrintSettings::set_orientation
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "orientation", argType = TInterface (Name {namespace = "Gtk", name = "PageOrientation"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a page orientation", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_orientation" gtk_print_settings_set_orientation ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- orientation : TInterface (Name {namespace = "Gtk", name = "PageOrientation"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_ORIENTATION'.
/Since: 2.10/
-}
printSettingsSetOrientation ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.PageOrientation
{- ^ /@orientation@/: a page orientation -}
-> m ()
printSettingsSetOrientation settings orientation = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let orientation' = (fromIntegral . fromEnum) orientation
gtk_print_settings_set_orientation settings' orientation'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetOrientationMethodInfo
instance (signature ~ (Gtk.Enums.PageOrientation -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetOrientationMethodInfo a signature where
overloadedMethod _ = printSettingsSetOrientation
#endif
-- method PrintSettings::set_output_bin
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "output_bin", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the output bin", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_output_bin" gtk_print_settings_set_output_bin ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- output_bin : TBasicType TUTF8
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_OUTPUT_BIN'.
/Since: 2.10/
-}
printSettingsSetOutputBin ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@outputBin@/: the output bin -}
-> m ()
printSettingsSetOutputBin settings outputBin = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
outputBin' <- textToCString outputBin
gtk_print_settings_set_output_bin settings' outputBin'
touchManagedPtr settings
freeMem outputBin'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetOutputBinMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetOutputBinMethodInfo a signature where
overloadedMethod _ = printSettingsSetOutputBin
#endif
-- method PrintSettings::set_page_ranges
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_ranges", argType = TCArray False (-1) 2 (TInterface (Name {namespace = "Gtk", name = "PageRange"})), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "an array of #GtkPageRanges", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "num_ranges", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the length of @page_ranges", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : [Arg {argCName = "num_ranges", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the length of @page_ranges", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_page_ranges" gtk_print_settings_set_page_ranges ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Ptr Gtk.PageRange.PageRange -> -- page_ranges : TCArray False (-1) 2 (TInterface (Name {namespace = "Gtk", name = "PageRange"}))
Int32 -> -- num_ranges : TBasicType TInt
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAGE_RANGES'.
/Since: 2.10/
-}
printSettingsSetPageRanges ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> [Gtk.PageRange.PageRange]
{- ^ /@pageRanges@/: an array of @/GtkPageRanges/@ -}
-> m ()
printSettingsSetPageRanges settings pageRanges = liftIO $ do
let numRanges = fromIntegral $ length pageRanges
settings' <- unsafeManagedPtrCastPtr settings
pageRanges' <- mapM unsafeManagedPtrGetPtr pageRanges
pageRanges'' <- packBlockArray 8 pageRanges'
gtk_print_settings_set_page_ranges settings' pageRanges'' numRanges
touchManagedPtr settings
mapM_ touchManagedPtr pageRanges
freeMem pageRanges''
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPageRangesMethodInfo
instance (signature ~ ([Gtk.PageRange.PageRange] -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPageRangesMethodInfo a signature where
overloadedMethod _ = printSettingsSetPageRanges
#endif
-- method PrintSettings::set_page_set
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_set", argType = TInterface (Name {namespace = "Gtk", name = "PageSet"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPageSet value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_page_set" gtk_print_settings_set_page_set ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- page_set : TInterface (Name {namespace = "Gtk", name = "PageSet"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAGE_SET'.
/Since: 2.10/
-}
printSettingsSetPageSet ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.PageSet
{- ^ /@pageSet@/: a 'GI.Gtk.Enums.PageSet' value -}
-> m ()
printSettingsSetPageSet settings pageSet = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let pageSet' = (fromIntegral . fromEnum) pageSet
gtk_print_settings_set_page_set settings' pageSet'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPageSetMethodInfo
instance (signature ~ (Gtk.Enums.PageSet -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPageSetMethodInfo a signature where
overloadedMethod _ = printSettingsSetPageSet
#endif
-- method PrintSettings::set_paper_height
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "height", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the paper height", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the units of @height", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_paper_height" gtk_print_settings_set_paper_height ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CDouble -> -- height : TBasicType TDouble
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_HEIGHT'.
/Since: 2.10/
-}
printSettingsSetPaperHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Double
{- ^ /@height@/: the paper height -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the units of /@height@/ -}
-> m ()
printSettingsSetPaperHeight settings height unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let height' = realToFrac height
let unit' = (fromIntegral . fromEnum) unit
gtk_print_settings_set_paper_height settings' height' unit'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPaperHeightMethodInfo
instance (signature ~ (Double -> Gtk.Enums.Unit -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPaperHeightMethodInfo a signature where
overloadedMethod _ = printSettingsSetPaperHeight
#endif
-- method PrintSettings::set_paper_size
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "paper_size", argType = TInterface (Name {namespace = "Gtk", name = "PaperSize"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a paper size", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_paper_size" gtk_print_settings_set_paper_size ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Ptr Gtk.PaperSize.PaperSize -> -- paper_size : TInterface (Name {namespace = "Gtk", name = "PaperSize"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_FORMAT',
'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_WIDTH' and
'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_HEIGHT'.
/Since: 2.10/
-}
printSettingsSetPaperSize ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.PaperSize.PaperSize
{- ^ /@paperSize@/: a paper size -}
-> m ()
printSettingsSetPaperSize settings paperSize = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
paperSize' <- unsafeManagedPtrGetPtr paperSize
gtk_print_settings_set_paper_size settings' paperSize'
touchManagedPtr settings
touchManagedPtr paperSize
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPaperSizeMethodInfo
instance (signature ~ (Gtk.PaperSize.PaperSize -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPaperSizeMethodInfo a signature where
overloadedMethod _ = printSettingsSetPaperSize
#endif
-- method PrintSettings::set_paper_width
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the paper width", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface (Name {namespace = "Gtk", name = "Unit"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the units of @width", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_paper_width" gtk_print_settings_set_paper_width ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CDouble -> -- width : TBasicType TDouble
CUInt -> -- unit : TInterface (Name {namespace = "Gtk", name = "Unit"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PAPER_WIDTH'.
/Since: 2.10/
-}
printSettingsSetPaperWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Double
{- ^ /@width@/: the paper width -}
-> Gtk.Enums.Unit
{- ^ /@unit@/: the units of /@width@/ -}
-> m ()
printSettingsSetPaperWidth settings width unit = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let width' = realToFrac width
let unit' = (fromIntegral . fromEnum) unit
gtk_print_settings_set_paper_width settings' width' unit'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPaperWidthMethodInfo
instance (signature ~ (Double -> Gtk.Enums.Unit -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPaperWidthMethodInfo a signature where
overloadedMethod _ = printSettingsSetPaperWidth
#endif
-- method PrintSettings::set_print_pages
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pages", argType = TInterface (Name {namespace = "Gtk", name = "PrintPages"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintPages value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_print_pages" gtk_print_settings_set_print_pages ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- pages : TInterface (Name {namespace = "Gtk", name = "PrintPages"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PRINT_PAGES'.
/Since: 2.10/
-}
printSettingsSetPrintPages ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.PrintPages
{- ^ /@pages@/: a 'GI.Gtk.Enums.PrintPages' value -}
-> m ()
printSettingsSetPrintPages settings pages = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let pages' = (fromIntegral . fromEnum) pages
gtk_print_settings_set_print_pages settings' pages'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPrintPagesMethodInfo
instance (signature ~ (Gtk.Enums.PrintPages -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPrintPagesMethodInfo a signature where
overloadedMethod _ = printSettingsSetPrintPages
#endif
-- method PrintSettings::set_printer
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "printer", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the printer name", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_printer" gtk_print_settings_set_printer ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- printer : TBasicType TUTF8
IO ()
{- |
Convenience function to set 'GI.Gtk.Constants.PRINT_SETTINGS_PRINTER'
to /@printer@/.
/Since: 2.10/
-}
printSettingsSetPrinter ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@printer@/: the printer name -}
-> m ()
printSettingsSetPrinter settings printer = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
printer' <- textToCString printer
gtk_print_settings_set_printer settings' printer'
touchManagedPtr settings
freeMem printer'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPrinterMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPrinterMethodInfo a signature where
overloadedMethod _ = printSettingsSetPrinter
#endif
-- method PrintSettings::set_printer_lpi
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "lpi", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the resolution in lpi (lines per inch)", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_printer_lpi" gtk_print_settings_set_printer_lpi ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CDouble -> -- lpi : TBasicType TDouble
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_PRINTER_LPI'.
/Since: 2.16/
-}
printSettingsSetPrinterLpi ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Double
{- ^ /@lpi@/: the resolution in lpi (lines per inch) -}
-> m ()
printSettingsSetPrinterLpi settings lpi = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let lpi' = realToFrac lpi
gtk_print_settings_set_printer_lpi settings' lpi'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetPrinterLpiMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetPrinterLpiMethodInfo a signature where
overloadedMethod _ = printSettingsSetPrinterLpi
#endif
-- method PrintSettings::set_quality
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "quality", argType = TInterface (Name {namespace = "Gtk", name = "PrintQuality"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintQuality value", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_quality" gtk_print_settings_set_quality ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CUInt -> -- quality : TInterface (Name {namespace = "Gtk", name = "PrintQuality"})
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_QUALITY'.
/Since: 2.10/
-}
printSettingsSetQuality ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Gtk.Enums.PrintQuality
{- ^ /@quality@/: a 'GI.Gtk.Enums.PrintQuality' value -}
-> m ()
printSettingsSetQuality settings quality = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let quality' = (fromIntegral . fromEnum) quality
gtk_print_settings_set_quality settings' quality'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetQualityMethodInfo
instance (signature ~ (Gtk.Enums.PrintQuality -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetQualityMethodInfo a signature where
overloadedMethod _ = printSettingsSetQuality
#endif
-- method PrintSettings::set_resolution
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolution", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the resolution in dpi", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_resolution" gtk_print_settings_set_resolution ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Int32 -> -- resolution : TBasicType TInt
IO ()
{- |
Sets the values of 'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION',
'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_X' and
'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_Y'.
/Since: 2.10/
-}
printSettingsSetResolution ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Int32
{- ^ /@resolution@/: the resolution in dpi -}
-> m ()
printSettingsSetResolution settings resolution = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
gtk_print_settings_set_resolution settings' resolution
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetResolutionMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetResolutionMethodInfo a signature where
overloadedMethod _ = printSettingsSetResolution
#endif
-- method PrintSettings::set_resolution_xy
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolution_x", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the horizontal resolution in dpi", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolution_y", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the vertical resolution in dpi", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_resolution_xy" gtk_print_settings_set_resolution_xy ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Int32 -> -- resolution_x : TBasicType TInt
Int32 -> -- resolution_y : TBasicType TInt
IO ()
{- |
Sets the values of 'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION',
'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_X' and
'GI.Gtk.Constants.PRINT_SETTINGS_RESOLUTION_Y'.
/Since: 2.16/
-}
printSettingsSetResolutionXy ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Int32
{- ^ /@resolutionX@/: the horizontal resolution in dpi -}
-> Int32
{- ^ /@resolutionY@/: the vertical resolution in dpi -}
-> m ()
printSettingsSetResolutionXy settings resolutionX resolutionY = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
gtk_print_settings_set_resolution_xy settings' resolutionX resolutionY
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetResolutionXyMethodInfo
instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetResolutionXyMethodInfo a signature where
overloadedMethod _ = printSettingsSetResolutionXy
#endif
-- method PrintSettings::set_reverse
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "reverse", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "whether to reverse the output", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_reverse" gtk_print_settings_set_reverse ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CInt -> -- reverse : TBasicType TBoolean
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_REVERSE'.
/Since: 2.10/
-}
printSettingsSetReverse ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Bool
{- ^ /@reverse@/: whether to reverse the output -}
-> m ()
printSettingsSetReverse settings reverse = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let reverse' = (fromIntegral . fromEnum) reverse
gtk_print_settings_set_reverse settings' reverse'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetReverseMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetReverseMethodInfo a signature where
overloadedMethod _ = printSettingsSetReverse
#endif
-- method PrintSettings::set_scale
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scale", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the scale in percent", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_scale" gtk_print_settings_set_scale ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CDouble -> -- scale : TBasicType TDouble
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_SCALE'.
/Since: 2.10/
-}
printSettingsSetScale ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Double
{- ^ /@scale@/: the scale in percent -}
-> m ()
printSettingsSetScale settings scale = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let scale' = realToFrac scale
gtk_print_settings_set_scale settings' scale'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetScaleMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetScaleMethodInfo a signature where
overloadedMethod _ = printSettingsSetScale
#endif
-- method PrintSettings::set_use_color
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "use_color", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "whether to use color", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_set_use_color" gtk_print_settings_set_use_color ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CInt -> -- use_color : TBasicType TBoolean
IO ()
{- |
Sets the value of 'GI.Gtk.Constants.PRINT_SETTINGS_USE_COLOR'.
/Since: 2.10/
-}
printSettingsSetUseColor ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> Bool
{- ^ /@useColor@/: whether to use color -}
-> m ()
printSettingsSetUseColor settings useColor = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
let useColor' = (fromIntegral . fromEnum) useColor
gtk_print_settings_set_use_color settings' useColor'
touchManagedPtr settings
return ()
#if ENABLE_OVERLOADING
data PrintSettingsSetUseColorMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsSetUseColorMethodInfo a signature where
overloadedMethod _ = printSettingsSetUseColor
#endif
-- method PrintSettings::to_file
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file_name", argType = TBasicType TFileName, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the file to save to", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TBasicType TBoolean)
-- throws : True
-- Skip return : False
foreign import ccall "gtk_print_settings_to_file" gtk_print_settings_to_file ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- file_name : TBasicType TFileName
Ptr (Ptr GError) -> -- error
IO CInt
{- |
This function saves the print settings from /@settings@/ to /@fileName@/. If the
file could not be loaded then error is set to either a 'GI.GLib.Enums.FileError' or
'GI.GLib.Enums.KeyFileError'.
/Since: 2.12/
-}
printSettingsToFile ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> [Char]
{- ^ /@fileName@/: the file to save to -}
-> m ()
{- ^ /(Can throw 'Data.GI.Base.GError.GError')/ -}
printSettingsToFile settings fileName = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
fileName' <- stringToCString fileName
onException (do
_ <- propagateGError $ gtk_print_settings_to_file settings' fileName'
touchManagedPtr settings
freeMem fileName'
return ()
) (do
freeMem fileName'
)
#if ENABLE_OVERLOADING
data PrintSettingsToFileMethodInfo
instance (signature ~ ([Char] -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsToFileMethodInfo a signature where
overloadedMethod _ = printSettingsToFile
#endif
-- method PrintSettings::to_gvariant
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just TVariant
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_to_gvariant" gtk_print_settings_to_gvariant ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
IO (Ptr GVariant)
{- |
Serialize print settings to an a{sv} variant.
/Since: 3.22/
-}
printSettingsToGvariant ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> m GVariant
{- ^ __Returns:__ a new, floating, 'GVariant' -}
printSettingsToGvariant settings = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
result <- gtk_print_settings_to_gvariant settings'
checkUnexpectedReturnNULL "printSettingsToGvariant" result
result' <- B.GVariant.newGVariantFromPtr result
touchManagedPtr settings
return result'
#if ENABLE_OVERLOADING
data PrintSettingsToGvariantMethodInfo
instance (signature ~ (m GVariant), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsToGvariantMethodInfo a signature where
overloadedMethod _ = printSettingsToGvariant
#endif
-- method PrintSettings::to_key_file
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key_file", argType = TInterface (Name {namespace = "GLib", name = "KeyFile"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the #GKeyFile to save the print settings to", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "group_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "the group to add the settings to in @key_file, or\n %NULL to use the default \8220Print Settings\8221", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_to_key_file" gtk_print_settings_to_key_file ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
Ptr GLib.KeyFile.KeyFile -> -- key_file : TInterface (Name {namespace = "GLib", name = "KeyFile"})
CString -> -- group_name : TBasicType TUTF8
IO ()
{- |
This function adds the print settings from /@settings@/ to /@keyFile@/.
/Since: 2.12/
-}
printSettingsToKeyFile ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> GLib.KeyFile.KeyFile
{- ^ /@keyFile@/: the 'GI.GLib.Structs.KeyFile.KeyFile' to save the print settings to -}
-> Maybe (T.Text)
{- ^ /@groupName@/: the group to add the settings to in /@keyFile@/, or
'Nothing' to use the default “Print Settings” -}
-> m ()
printSettingsToKeyFile settings keyFile groupName = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
keyFile' <- unsafeManagedPtrGetPtr keyFile
maybeGroupName <- case groupName of
Nothing -> return nullPtr
Just jGroupName -> do
jGroupName' <- textToCString jGroupName
return jGroupName'
gtk_print_settings_to_key_file settings' keyFile' maybeGroupName
touchManagedPtr settings
touchManagedPtr keyFile
freeMem maybeGroupName
return ()
#if ENABLE_OVERLOADING
data PrintSettingsToKeyFileMethodInfo
instance (signature ~ (GLib.KeyFile.KeyFile -> Maybe (T.Text) -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsToKeyFileMethodInfo a signature where
overloadedMethod _ = printSettingsToKeyFile
#endif
-- method PrintSettings::unset
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "settings", argType = TInterface (Name {namespace = "Gtk", name = "PrintSettings"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkPrintSettings", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a key", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_print_settings_unset" gtk_print_settings_unset ::
Ptr PrintSettings -> -- settings : TInterface (Name {namespace = "Gtk", name = "PrintSettings"})
CString -> -- key : TBasicType TUTF8
IO ()
{- |
Removes any value associated with /@key@/.
This has the same effect as setting the value to 'Nothing'.
/Since: 2.10/
-}
printSettingsUnset ::
(B.CallStack.HasCallStack, MonadIO m, IsPrintSettings a) =>
a
{- ^ /@settings@/: a 'GI.Gtk.Objects.PrintSettings.PrintSettings' -}
-> T.Text
{- ^ /@key@/: a key -}
-> m ()
printSettingsUnset settings key = liftIO $ do
settings' <- unsafeManagedPtrCastPtr settings
key' <- textToCString key
gtk_print_settings_unset settings' key'
touchManagedPtr settings
freeMem key'
return ()
#if ENABLE_OVERLOADING
data PrintSettingsUnsetMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsPrintSettings a) => O.MethodInfo PrintSettingsUnsetMethodInfo a signature where
overloadedMethod _ = printSettingsUnset
#endif