gi-gtk-3.0.28: GI/Gtk/Interfaces/RecentChooser.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)
'GI.Gtk.Interfaces.RecentChooser.RecentChooser' is an interface that can be implemented by widgets
displaying the list of recently used files. In GTK+, the main objects
that implement this interface are 'GI.Gtk.Objects.RecentChooserWidget.RecentChooserWidget',
'GI.Gtk.Objects.RecentChooserDialog.RecentChooserDialog' and 'GI.Gtk.Objects.RecentChooserMenu.RecentChooserMenu'.
Recently used files are supported since GTK+ 2.10.
-}
#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Interfaces.RecentChooser
(
-- * Exported types
RecentChooser(..) ,
noRecentChooser ,
IsRecentChooser ,
toRecentChooser ,
-- * Methods
-- ** addFilter #method:addFilter#
#if ENABLE_OVERLOADING
RecentChooserAddFilterMethodInfo ,
#endif
recentChooserAddFilter ,
-- ** getCurrentItem #method:getCurrentItem#
#if ENABLE_OVERLOADING
RecentChooserGetCurrentItemMethodInfo ,
#endif
recentChooserGetCurrentItem ,
-- ** getCurrentUri #method:getCurrentUri#
#if ENABLE_OVERLOADING
RecentChooserGetCurrentUriMethodInfo ,
#endif
recentChooserGetCurrentUri ,
-- ** getFilter #method:getFilter#
#if ENABLE_OVERLOADING
RecentChooserGetFilterMethodInfo ,
#endif
recentChooserGetFilter ,
-- ** getItems #method:getItems#
#if ENABLE_OVERLOADING
RecentChooserGetItemsMethodInfo ,
#endif
recentChooserGetItems ,
-- ** getLimit #method:getLimit#
#if ENABLE_OVERLOADING
RecentChooserGetLimitMethodInfo ,
#endif
recentChooserGetLimit ,
-- ** getLocalOnly #method:getLocalOnly#
#if ENABLE_OVERLOADING
RecentChooserGetLocalOnlyMethodInfo ,
#endif
recentChooserGetLocalOnly ,
-- ** getSelectMultiple #method:getSelectMultiple#
#if ENABLE_OVERLOADING
RecentChooserGetSelectMultipleMethodInfo,
#endif
recentChooserGetSelectMultiple ,
-- ** getShowIcons #method:getShowIcons#
#if ENABLE_OVERLOADING
RecentChooserGetShowIconsMethodInfo ,
#endif
recentChooserGetShowIcons ,
-- ** getShowNotFound #method:getShowNotFound#
#if ENABLE_OVERLOADING
RecentChooserGetShowNotFoundMethodInfo ,
#endif
recentChooserGetShowNotFound ,
-- ** getShowPrivate #method:getShowPrivate#
#if ENABLE_OVERLOADING
RecentChooserGetShowPrivateMethodInfo ,
#endif
recentChooserGetShowPrivate ,
-- ** getShowTips #method:getShowTips#
#if ENABLE_OVERLOADING
RecentChooserGetShowTipsMethodInfo ,
#endif
recentChooserGetShowTips ,
-- ** getSortType #method:getSortType#
#if ENABLE_OVERLOADING
RecentChooserGetSortTypeMethodInfo ,
#endif
recentChooserGetSortType ,
-- ** getUris #method:getUris#
#if ENABLE_OVERLOADING
RecentChooserGetUrisMethodInfo ,
#endif
recentChooserGetUris ,
-- ** listFilters #method:listFilters#
#if ENABLE_OVERLOADING
RecentChooserListFiltersMethodInfo ,
#endif
recentChooserListFilters ,
-- ** removeFilter #method:removeFilter#
#if ENABLE_OVERLOADING
RecentChooserRemoveFilterMethodInfo ,
#endif
recentChooserRemoveFilter ,
-- ** selectAll #method:selectAll#
#if ENABLE_OVERLOADING
RecentChooserSelectAllMethodInfo ,
#endif
recentChooserSelectAll ,
-- ** selectUri #method:selectUri#
#if ENABLE_OVERLOADING
RecentChooserSelectUriMethodInfo ,
#endif
recentChooserSelectUri ,
-- ** setCurrentUri #method:setCurrentUri#
#if ENABLE_OVERLOADING
RecentChooserSetCurrentUriMethodInfo ,
#endif
recentChooserSetCurrentUri ,
-- ** setFilter #method:setFilter#
#if ENABLE_OVERLOADING
RecentChooserSetFilterMethodInfo ,
#endif
recentChooserSetFilter ,
-- ** setLimit #method:setLimit#
#if ENABLE_OVERLOADING
RecentChooserSetLimitMethodInfo ,
#endif
recentChooserSetLimit ,
-- ** setLocalOnly #method:setLocalOnly#
#if ENABLE_OVERLOADING
RecentChooserSetLocalOnlyMethodInfo ,
#endif
recentChooserSetLocalOnly ,
-- ** setSelectMultiple #method:setSelectMultiple#
#if ENABLE_OVERLOADING
RecentChooserSetSelectMultipleMethodInfo,
#endif
recentChooserSetSelectMultiple ,
-- ** setShowIcons #method:setShowIcons#
#if ENABLE_OVERLOADING
RecentChooserSetShowIconsMethodInfo ,
#endif
recentChooserSetShowIcons ,
-- ** setShowNotFound #method:setShowNotFound#
#if ENABLE_OVERLOADING
RecentChooserSetShowNotFoundMethodInfo ,
#endif
recentChooserSetShowNotFound ,
-- ** setShowPrivate #method:setShowPrivate#
#if ENABLE_OVERLOADING
RecentChooserSetShowPrivateMethodInfo ,
#endif
recentChooserSetShowPrivate ,
-- ** setShowTips #method:setShowTips#
#if ENABLE_OVERLOADING
RecentChooserSetShowTipsMethodInfo ,
#endif
recentChooserSetShowTips ,
-- ** setSortFunc #method:setSortFunc#
#if ENABLE_OVERLOADING
RecentChooserSetSortFuncMethodInfo ,
#endif
recentChooserSetSortFunc ,
-- ** setSortType #method:setSortType#
#if ENABLE_OVERLOADING
RecentChooserSetSortTypeMethodInfo ,
#endif
recentChooserSetSortType ,
-- ** unselectAll #method:unselectAll#
#if ENABLE_OVERLOADING
RecentChooserUnselectAllMethodInfo ,
#endif
recentChooserUnselectAll ,
-- ** unselectUri #method:unselectUri#
#if ENABLE_OVERLOADING
RecentChooserUnselectUriMethodInfo ,
#endif
recentChooserUnselectUri ,
-- * Properties
-- ** filter #attr:filter#
{- | The 'GI.Gtk.Objects.RecentFilter.RecentFilter' object to be used when displaying
the recently used resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserFilterPropertyInfo ,
#endif
clearRecentChooserFilter ,
constructRecentChooserFilter ,
getRecentChooserFilter ,
#if ENABLE_OVERLOADING
recentChooserFilter ,
#endif
setRecentChooserFilter ,
-- ** limit #attr:limit#
{- | The maximum number of recently used resources to be displayed,
or -1 to display all items.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserLimitPropertyInfo ,
#endif
constructRecentChooserLimit ,
getRecentChooserLimit ,
#if ENABLE_OVERLOADING
recentChooserLimit ,
#endif
setRecentChooserLimit ,
-- ** localOnly #attr:localOnly#
{- | Whether this 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' should display only local (file:)
resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserLocalOnlyPropertyInfo ,
#endif
constructRecentChooserLocalOnly ,
getRecentChooserLocalOnly ,
#if ENABLE_OVERLOADING
recentChooserLocalOnly ,
#endif
setRecentChooserLocalOnly ,
-- ** recentManager #attr:recentManager#
{- | The 'GI.Gtk.Objects.RecentManager.RecentManager' instance used by the 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' to
display the list of recently used resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserRecentManagerPropertyInfo ,
#endif
constructRecentChooserRecentManager ,
#if ENABLE_OVERLOADING
recentChooserRecentManager ,
#endif
-- ** selectMultiple #attr:selectMultiple#
{- | Allow the user to select multiple resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserSelectMultiplePropertyInfo ,
#endif
constructRecentChooserSelectMultiple ,
getRecentChooserSelectMultiple ,
#if ENABLE_OVERLOADING
recentChooserSelectMultiple ,
#endif
setRecentChooserSelectMultiple ,
-- ** showIcons #attr:showIcons#
{- | Whether this 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' should display an icon near the item.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserShowIconsPropertyInfo ,
#endif
constructRecentChooserShowIcons ,
getRecentChooserShowIcons ,
#if ENABLE_OVERLOADING
recentChooserShowIcons ,
#endif
setRecentChooserShowIcons ,
-- ** showNotFound #attr:showNotFound#
{- | Whether this 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' should display the recently used resources
even if not present anymore. Setting this to 'False' will perform a
potentially expensive check on every local resource (every remote
resource will always be displayed).
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserShowNotFoundPropertyInfo ,
#endif
constructRecentChooserShowNotFound ,
getRecentChooserShowNotFound ,
#if ENABLE_OVERLOADING
recentChooserShowNotFound ,
#endif
setRecentChooserShowNotFound ,
-- ** showPrivate #attr:showPrivate#
{- | /No description available in the introspection data./
-}
#if ENABLE_OVERLOADING
RecentChooserShowPrivatePropertyInfo ,
#endif
constructRecentChooserShowPrivate ,
getRecentChooserShowPrivate ,
#if ENABLE_OVERLOADING
recentChooserShowPrivate ,
#endif
setRecentChooserShowPrivate ,
-- ** showTips #attr:showTips#
{- | Whether this 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' should display a tooltip containing the
full path of the recently used resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserShowTipsPropertyInfo ,
#endif
constructRecentChooserShowTips ,
getRecentChooserShowTips ,
#if ENABLE_OVERLOADING
recentChooserShowTips ,
#endif
setRecentChooserShowTips ,
-- ** sortType #attr:sortType#
{- | Sorting order to be used when displaying the recently used resources.
/Since: 2.10/
-}
#if ENABLE_OVERLOADING
RecentChooserSortTypePropertyInfo ,
#endif
constructRecentChooserSortType ,
getRecentChooserSortType ,
#if ENABLE_OVERLOADING
recentChooserSortType ,
#endif
setRecentChooserSortType ,
-- * Signals
-- ** itemActivated #signal:itemActivated#
C_RecentChooserItemActivatedCallback ,
RecentChooserItemActivatedCallback ,
#if ENABLE_OVERLOADING
RecentChooserItemActivatedSignalInfo ,
#endif
afterRecentChooserItemActivated ,
genClosure_RecentChooserItemActivated ,
mk_RecentChooserItemActivatedCallback ,
noRecentChooserItemActivatedCallback ,
onRecentChooserItemActivated ,
wrap_RecentChooserItemActivatedCallback ,
-- ** selectionChanged #signal:selectionChanged#
C_RecentChooserSelectionChangedCallback ,
RecentChooserSelectionChangedCallback ,
#if ENABLE_OVERLOADING
RecentChooserSelectionChangedSignalInfo ,
#endif
afterRecentChooserSelectionChanged ,
genClosure_RecentChooserSelectionChanged,
mk_RecentChooserSelectionChangedCallback,
noRecentChooserSelectionChangedCallback ,
onRecentChooserSelectionChanged ,
wrap_RecentChooserSelectionChangedCallback,
) 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.Callbacks as GLib.Callbacks
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.Objects.RecentFilter as Gtk.RecentFilter
import {-# SOURCE #-} qualified GI.Gtk.Objects.RecentManager as Gtk.RecentManager
import {-# SOURCE #-} qualified GI.Gtk.Structs.RecentInfo as Gtk.RecentInfo
-- interface RecentChooser
-- | Memory-managed wrapper type.
newtype RecentChooser = RecentChooser (ManagedPtr RecentChooser)
-- | A convenience alias for `Nothing` :: `Maybe` `RecentChooser`.
noRecentChooser :: Maybe RecentChooser
noRecentChooser = Nothing
-- signal RecentChooser::item-activated
{- |
This signal is emitted when the user \"activates\" a recent item
in the recent chooser. This can happen by double-clicking on an item
in the recently used resources list, or by pressing
@Enter@.
/Since: 2.10/
-}
type RecentChooserItemActivatedCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `RecentChooserItemActivatedCallback`@.
noRecentChooserItemActivatedCallback :: Maybe RecentChooserItemActivatedCallback
noRecentChooserItemActivatedCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_RecentChooserItemActivatedCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_RecentChooserItemActivatedCallback`.
foreign import ccall "wrapper"
mk_RecentChooserItemActivatedCallback :: C_RecentChooserItemActivatedCallback -> IO (FunPtr C_RecentChooserItemActivatedCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_RecentChooserItemActivated :: MonadIO m => RecentChooserItemActivatedCallback -> m (GClosure C_RecentChooserItemActivatedCallback)
genClosure_RecentChooserItemActivated cb = liftIO $ do
let cb' = wrap_RecentChooserItemActivatedCallback cb
mk_RecentChooserItemActivatedCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `RecentChooserItemActivatedCallback` into a `C_RecentChooserItemActivatedCallback`.
wrap_RecentChooserItemActivatedCallback ::
RecentChooserItemActivatedCallback ->
C_RecentChooserItemActivatedCallback
wrap_RecentChooserItemActivatedCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@item-activated@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' recentChooser #itemActivated callback
@
-}
onRecentChooserItemActivated :: (IsRecentChooser a, MonadIO m) => a -> RecentChooserItemActivatedCallback -> m SignalHandlerId
onRecentChooserItemActivated obj cb = liftIO $ do
let cb' = wrap_RecentChooserItemActivatedCallback cb
cb'' <- mk_RecentChooserItemActivatedCallback cb'
connectSignalFunPtr obj "item-activated" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@item-activated@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' recentChooser #itemActivated callback
@
-}
afterRecentChooserItemActivated :: (IsRecentChooser a, MonadIO m) => a -> RecentChooserItemActivatedCallback -> m SignalHandlerId
afterRecentChooserItemActivated obj cb = liftIO $ do
let cb' = wrap_RecentChooserItemActivatedCallback cb
cb'' <- mk_RecentChooserItemActivatedCallback cb'
connectSignalFunPtr obj "item-activated" cb'' SignalConnectAfter
-- signal RecentChooser::selection-changed
{- |
This signal is emitted when there is a change in the set of
selected recently used resources. This can happen when a user
modifies the selection with the mouse or the keyboard, or when
explicitly calling functions to change the selection.
/Since: 2.10/
-}
type RecentChooserSelectionChangedCallback =
IO ()
-- | A convenience synonym for @`Nothing` :: `Maybe` `RecentChooserSelectionChangedCallback`@.
noRecentChooserSelectionChangedCallback :: Maybe RecentChooserSelectionChangedCallback
noRecentChooserSelectionChangedCallback = Nothing
-- | Type for the callback on the (unwrapped) C side.
type C_RecentChooserSelectionChangedCallback =
Ptr () -> -- object
Ptr () -> -- user_data
IO ()
-- | Generate a function pointer callable from C code, from a `C_RecentChooserSelectionChangedCallback`.
foreign import ccall "wrapper"
mk_RecentChooserSelectionChangedCallback :: C_RecentChooserSelectionChangedCallback -> IO (FunPtr C_RecentChooserSelectionChangedCallback)
-- | Wrap the callback into a `GClosure`.
genClosure_RecentChooserSelectionChanged :: MonadIO m => RecentChooserSelectionChangedCallback -> m (GClosure C_RecentChooserSelectionChangedCallback)
genClosure_RecentChooserSelectionChanged cb = liftIO $ do
let cb' = wrap_RecentChooserSelectionChangedCallback cb
mk_RecentChooserSelectionChangedCallback cb' >>= B.GClosure.newGClosure
-- | Wrap a `RecentChooserSelectionChangedCallback` into a `C_RecentChooserSelectionChangedCallback`.
wrap_RecentChooserSelectionChangedCallback ::
RecentChooserSelectionChangedCallback ->
C_RecentChooserSelectionChangedCallback
wrap_RecentChooserSelectionChangedCallback _cb _ _ = do
_cb
{- |
Connect a signal handler for the “@selection-changed@” signal, to be run before the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.on' recentChooser #selectionChanged callback
@
-}
onRecentChooserSelectionChanged :: (IsRecentChooser a, MonadIO m) => a -> RecentChooserSelectionChangedCallback -> m SignalHandlerId
onRecentChooserSelectionChanged obj cb = liftIO $ do
let cb' = wrap_RecentChooserSelectionChangedCallback cb
cb'' <- mk_RecentChooserSelectionChangedCallback cb'
connectSignalFunPtr obj "selection-changed" cb'' SignalConnectBefore
{- |
Connect a signal handler for the “@selection-changed@” signal, to be run after the default handler.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Signals.after' recentChooser #selectionChanged callback
@
-}
afterRecentChooserSelectionChanged :: (IsRecentChooser a, MonadIO m) => a -> RecentChooserSelectionChangedCallback -> m SignalHandlerId
afterRecentChooserSelectionChanged obj cb = liftIO $ do
let cb' = wrap_RecentChooserSelectionChangedCallback cb
cb'' <- mk_RecentChooserSelectionChangedCallback cb'
connectSignalFunPtr obj "selection-changed" cb'' SignalConnectAfter
#if ENABLE_OVERLOADING
data RecentChooserItemActivatedSignalInfo
instance SignalInfo RecentChooserItemActivatedSignalInfo where
type HaskellCallbackType RecentChooserItemActivatedSignalInfo = RecentChooserItemActivatedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_RecentChooserItemActivatedCallback cb
cb'' <- mk_RecentChooserItemActivatedCallback cb'
connectSignalFunPtr obj "item-activated" cb'' connectMode
data RecentChooserSelectionChangedSignalInfo
instance SignalInfo RecentChooserSelectionChangedSignalInfo where
type HaskellCallbackType RecentChooserSelectionChangedSignalInfo = RecentChooserSelectionChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_RecentChooserSelectionChangedCallback cb
cb'' <- mk_RecentChooserSelectionChangedCallback cb'
connectSignalFunPtr obj "selection-changed" cb'' connectMode
type instance O.SignalList RecentChooser = RecentChooserSignalList
type RecentChooserSignalList = ('[ '("itemActivated", RecentChooserItemActivatedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("selectionChanged", RecentChooserSelectionChangedSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_recent_chooser_get_type"
c_gtk_recent_chooser_get_type :: IO GType
instance GObject RecentChooser where
gobjectType = c_gtk_recent_chooser_get_type
-- | Type class for types which can be safely cast to `RecentChooser`, for instance with `toRecentChooser`.
class (GObject o, O.IsDescendantOf RecentChooser o) => IsRecentChooser o
instance (GObject o, O.IsDescendantOf RecentChooser o) => IsRecentChooser o
instance O.HasParentTypes RecentChooser
type instance O.ParentTypes RecentChooser = '[GObject.Object.Object]
-- | Cast to `RecentChooser`, for types for which this is known to be safe. For general casts, use `Data.GI.Base.ManagedPtr.castTo`.
toRecentChooser :: (MonadIO m, IsRecentChooser o) => o -> m RecentChooser
toRecentChooser = liftIO . unsafeCastTo RecentChooser
-- VVV Prop "filter"
-- Type: TInterface (Name {namespace = "Gtk", name = "RecentFilter"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just True)
{- |
Get the value of the “@filter@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #filter
@
-}
getRecentChooserFilter :: (MonadIO m, IsRecentChooser o) => o -> m Gtk.RecentFilter.RecentFilter
getRecentChooserFilter obj = liftIO $ checkUnexpectedNothing "getRecentChooserFilter" $ B.Properties.getObjectPropertyObject obj "filter" Gtk.RecentFilter.RecentFilter
{- |
Set the value of the “@filter@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #filter 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserFilter :: (MonadIO m, IsRecentChooser o, Gtk.RecentFilter.IsRecentFilter a) => o -> a -> m ()
setRecentChooserFilter obj val = liftIO $ B.Properties.setObjectPropertyObject obj "filter" (Just val)
{- |
Construct a `GValueConstruct` with valid value for the “@filter@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserFilter :: (IsRecentChooser o, Gtk.RecentFilter.IsRecentFilter a) => a -> IO (GValueConstruct o)
constructRecentChooserFilter val = B.Properties.constructObjectPropertyObject "filter" (Just val)
{- |
Set the value of the “@filter@” property to `Nothing`.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.clear' #filter
@
-}
clearRecentChooserFilter :: (MonadIO m, IsRecentChooser o) => o -> m ()
clearRecentChooserFilter obj = liftIO $ B.Properties.setObjectPropertyObject obj "filter" (Nothing :: Maybe Gtk.RecentFilter.RecentFilter)
#if ENABLE_OVERLOADING
data RecentChooserFilterPropertyInfo
instance AttrInfo RecentChooserFilterPropertyInfo where
type AttrAllowedOps RecentChooserFilterPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint RecentChooserFilterPropertyInfo = Gtk.RecentFilter.IsRecentFilter
type AttrBaseTypeConstraint RecentChooserFilterPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserFilterPropertyInfo = Gtk.RecentFilter.RecentFilter
type AttrLabel RecentChooserFilterPropertyInfo = "filter"
type AttrOrigin RecentChooserFilterPropertyInfo = RecentChooser
attrGet _ = getRecentChooserFilter
attrSet _ = setRecentChooserFilter
attrConstruct _ = constructRecentChooserFilter
attrClear _ = clearRecentChooserFilter
#endif
-- VVV Prop "limit"
-- Type: TBasicType TInt
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@limit@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #limit
@
-}
getRecentChooserLimit :: (MonadIO m, IsRecentChooser o) => o -> m Int32
getRecentChooserLimit obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "limit"
{- |
Set the value of the “@limit@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #limit 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserLimit :: (MonadIO m, IsRecentChooser o) => o -> Int32 -> m ()
setRecentChooserLimit obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "limit" val
{- |
Construct a `GValueConstruct` with valid value for the “@limit@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserLimit :: (IsRecentChooser o) => Int32 -> IO (GValueConstruct o)
constructRecentChooserLimit val = B.Properties.constructObjectPropertyInt32 "limit" val
#if ENABLE_OVERLOADING
data RecentChooserLimitPropertyInfo
instance AttrInfo RecentChooserLimitPropertyInfo where
type AttrAllowedOps RecentChooserLimitPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserLimitPropertyInfo = (~) Int32
type AttrBaseTypeConstraint RecentChooserLimitPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserLimitPropertyInfo = Int32
type AttrLabel RecentChooserLimitPropertyInfo = "limit"
type AttrOrigin RecentChooserLimitPropertyInfo = RecentChooser
attrGet _ = getRecentChooserLimit
attrSet _ = setRecentChooserLimit
attrConstruct _ = constructRecentChooserLimit
attrClear _ = undefined
#endif
-- VVV Prop "local-only"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@local-only@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #localOnly
@
-}
getRecentChooserLocalOnly :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserLocalOnly obj = liftIO $ B.Properties.getObjectPropertyBool obj "local-only"
{- |
Set the value of the “@local-only@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #localOnly 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserLocalOnly :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserLocalOnly obj val = liftIO $ B.Properties.setObjectPropertyBool obj "local-only" val
{- |
Construct a `GValueConstruct` with valid value for the “@local-only@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserLocalOnly :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserLocalOnly val = B.Properties.constructObjectPropertyBool "local-only" val
#if ENABLE_OVERLOADING
data RecentChooserLocalOnlyPropertyInfo
instance AttrInfo RecentChooserLocalOnlyPropertyInfo where
type AttrAllowedOps RecentChooserLocalOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserLocalOnlyPropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserLocalOnlyPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserLocalOnlyPropertyInfo = Bool
type AttrLabel RecentChooserLocalOnlyPropertyInfo = "local-only"
type AttrOrigin RecentChooserLocalOnlyPropertyInfo = RecentChooser
attrGet _ = getRecentChooserLocalOnly
attrSet _ = setRecentChooserLocalOnly
attrConstruct _ = constructRecentChooserLocalOnly
attrClear _ = undefined
#endif
-- VVV Prop "recent-manager"
-- Type: TInterface (Name {namespace = "Gtk", name = "RecentManager"})
-- Flags: [PropertyWritable,PropertyConstructOnly]
-- Nullable: (Nothing,Nothing)
{- |
Construct a `GValueConstruct` with valid value for the “@recent-manager@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserRecentManager :: (IsRecentChooser o, Gtk.RecentManager.IsRecentManager a) => a -> IO (GValueConstruct o)
constructRecentChooserRecentManager val = B.Properties.constructObjectPropertyObject "recent-manager" (Just val)
#if ENABLE_OVERLOADING
data RecentChooserRecentManagerPropertyInfo
instance AttrInfo RecentChooserRecentManagerPropertyInfo where
type AttrAllowedOps RecentChooserRecentManagerPropertyInfo = '[ 'AttrConstruct, 'AttrClear]
type AttrSetTypeConstraint RecentChooserRecentManagerPropertyInfo = Gtk.RecentManager.IsRecentManager
type AttrBaseTypeConstraint RecentChooserRecentManagerPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserRecentManagerPropertyInfo = ()
type AttrLabel RecentChooserRecentManagerPropertyInfo = "recent-manager"
type AttrOrigin RecentChooserRecentManagerPropertyInfo = RecentChooser
attrGet _ = undefined
attrSet _ = undefined
attrConstruct _ = constructRecentChooserRecentManager
attrClear _ = undefined
#endif
-- VVV Prop "select-multiple"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@select-multiple@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #selectMultiple
@
-}
getRecentChooserSelectMultiple :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserSelectMultiple obj = liftIO $ B.Properties.getObjectPropertyBool obj "select-multiple"
{- |
Set the value of the “@select-multiple@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #selectMultiple 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserSelectMultiple :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserSelectMultiple obj val = liftIO $ B.Properties.setObjectPropertyBool obj "select-multiple" val
{- |
Construct a `GValueConstruct` with valid value for the “@select-multiple@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserSelectMultiple :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserSelectMultiple val = B.Properties.constructObjectPropertyBool "select-multiple" val
#if ENABLE_OVERLOADING
data RecentChooserSelectMultiplePropertyInfo
instance AttrInfo RecentChooserSelectMultiplePropertyInfo where
type AttrAllowedOps RecentChooserSelectMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserSelectMultiplePropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserSelectMultiplePropertyInfo = IsRecentChooser
type AttrGetType RecentChooserSelectMultiplePropertyInfo = Bool
type AttrLabel RecentChooserSelectMultiplePropertyInfo = "select-multiple"
type AttrOrigin RecentChooserSelectMultiplePropertyInfo = RecentChooser
attrGet _ = getRecentChooserSelectMultiple
attrSet _ = setRecentChooserSelectMultiple
attrConstruct _ = constructRecentChooserSelectMultiple
attrClear _ = undefined
#endif
-- VVV Prop "show-icons"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@show-icons@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #showIcons
@
-}
getRecentChooserShowIcons :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserShowIcons obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-icons"
{- |
Set the value of the “@show-icons@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #showIcons 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserShowIcons :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserShowIcons obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-icons" val
{- |
Construct a `GValueConstruct` with valid value for the “@show-icons@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserShowIcons :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserShowIcons val = B.Properties.constructObjectPropertyBool "show-icons" val
#if ENABLE_OVERLOADING
data RecentChooserShowIconsPropertyInfo
instance AttrInfo RecentChooserShowIconsPropertyInfo where
type AttrAllowedOps RecentChooserShowIconsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserShowIconsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserShowIconsPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserShowIconsPropertyInfo = Bool
type AttrLabel RecentChooserShowIconsPropertyInfo = "show-icons"
type AttrOrigin RecentChooserShowIconsPropertyInfo = RecentChooser
attrGet _ = getRecentChooserShowIcons
attrSet _ = setRecentChooserShowIcons
attrConstruct _ = constructRecentChooserShowIcons
attrClear _ = undefined
#endif
-- VVV Prop "show-not-found"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@show-not-found@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #showNotFound
@
-}
getRecentChooserShowNotFound :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserShowNotFound obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-not-found"
{- |
Set the value of the “@show-not-found@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #showNotFound 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserShowNotFound :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserShowNotFound obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-not-found" val
{- |
Construct a `GValueConstruct` with valid value for the “@show-not-found@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserShowNotFound :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserShowNotFound val = B.Properties.constructObjectPropertyBool "show-not-found" val
#if ENABLE_OVERLOADING
data RecentChooserShowNotFoundPropertyInfo
instance AttrInfo RecentChooserShowNotFoundPropertyInfo where
type AttrAllowedOps RecentChooserShowNotFoundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserShowNotFoundPropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserShowNotFoundPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserShowNotFoundPropertyInfo = Bool
type AttrLabel RecentChooserShowNotFoundPropertyInfo = "show-not-found"
type AttrOrigin RecentChooserShowNotFoundPropertyInfo = RecentChooser
attrGet _ = getRecentChooserShowNotFound
attrSet _ = setRecentChooserShowNotFound
attrConstruct _ = constructRecentChooserShowNotFound
attrClear _ = undefined
#endif
-- VVV Prop "show-private"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@show-private@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #showPrivate
@
-}
getRecentChooserShowPrivate :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserShowPrivate obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-private"
{- |
Set the value of the “@show-private@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #showPrivate 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserShowPrivate :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserShowPrivate obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-private" val
{- |
Construct a `GValueConstruct` with valid value for the “@show-private@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserShowPrivate :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserShowPrivate val = B.Properties.constructObjectPropertyBool "show-private" val
#if ENABLE_OVERLOADING
data RecentChooserShowPrivatePropertyInfo
instance AttrInfo RecentChooserShowPrivatePropertyInfo where
type AttrAllowedOps RecentChooserShowPrivatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserShowPrivatePropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserShowPrivatePropertyInfo = IsRecentChooser
type AttrGetType RecentChooserShowPrivatePropertyInfo = Bool
type AttrLabel RecentChooserShowPrivatePropertyInfo = "show-private"
type AttrOrigin RecentChooserShowPrivatePropertyInfo = RecentChooser
attrGet _ = getRecentChooserShowPrivate
attrSet _ = setRecentChooserShowPrivate
attrConstruct _ = constructRecentChooserShowPrivate
attrClear _ = undefined
#endif
-- VVV Prop "show-tips"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@show-tips@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #showTips
@
-}
getRecentChooserShowTips :: (MonadIO m, IsRecentChooser o) => o -> m Bool
getRecentChooserShowTips obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-tips"
{- |
Set the value of the “@show-tips@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #showTips 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserShowTips :: (MonadIO m, IsRecentChooser o) => o -> Bool -> m ()
setRecentChooserShowTips obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-tips" val
{- |
Construct a `GValueConstruct` with valid value for the “@show-tips@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserShowTips :: (IsRecentChooser o) => Bool -> IO (GValueConstruct o)
constructRecentChooserShowTips val = B.Properties.constructObjectPropertyBool "show-tips" val
#if ENABLE_OVERLOADING
data RecentChooserShowTipsPropertyInfo
instance AttrInfo RecentChooserShowTipsPropertyInfo where
type AttrAllowedOps RecentChooserShowTipsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserShowTipsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint RecentChooserShowTipsPropertyInfo = IsRecentChooser
type AttrGetType RecentChooserShowTipsPropertyInfo = Bool
type AttrLabel RecentChooserShowTipsPropertyInfo = "show-tips"
type AttrOrigin RecentChooserShowTipsPropertyInfo = RecentChooser
attrGet _ = getRecentChooserShowTips
attrSet _ = setRecentChooserShowTips
attrConstruct _ = constructRecentChooserShowTips
attrClear _ = undefined
#endif
-- VVV Prop "sort-type"
-- Type: TInterface (Name {namespace = "Gtk", name = "RecentSortType"})
-- Flags: [PropertyReadable,PropertyWritable]
-- Nullable: (Just False,Just False)
{- |
Get the value of the “@sort-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.get' recentChooser #sortType
@
-}
getRecentChooserSortType :: (MonadIO m, IsRecentChooser o) => o -> m Gtk.Enums.RecentSortType
getRecentChooserSortType obj = liftIO $ B.Properties.getObjectPropertyEnum obj "sort-type"
{- |
Set the value of the “@sort-type@” property.
When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
@
'Data.GI.Base.Attributes.set' recentChooser [ #sortType 'Data.GI.Base.Attributes.:=' value ]
@
-}
setRecentChooserSortType :: (MonadIO m, IsRecentChooser o) => o -> Gtk.Enums.RecentSortType -> m ()
setRecentChooserSortType obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "sort-type" val
{- |
Construct a `GValueConstruct` with valid value for the “@sort-type@” property. This is rarely needed directly, but it is used by `Data.GI.Base.Constructible.new`.
-}
constructRecentChooserSortType :: (IsRecentChooser o) => Gtk.Enums.RecentSortType -> IO (GValueConstruct o)
constructRecentChooserSortType val = B.Properties.constructObjectPropertyEnum "sort-type" val
#if ENABLE_OVERLOADING
data RecentChooserSortTypePropertyInfo
instance AttrInfo RecentChooserSortTypePropertyInfo where
type AttrAllowedOps RecentChooserSortTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint RecentChooserSortTypePropertyInfo = (~) Gtk.Enums.RecentSortType
type AttrBaseTypeConstraint RecentChooserSortTypePropertyInfo = IsRecentChooser
type AttrGetType RecentChooserSortTypePropertyInfo = Gtk.Enums.RecentSortType
type AttrLabel RecentChooserSortTypePropertyInfo = "sort-type"
type AttrOrigin RecentChooserSortTypePropertyInfo = RecentChooser
attrGet _ = getRecentChooserSortType
attrSet _ = setRecentChooserSortType
attrConstruct _ = constructRecentChooserSortType
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList RecentChooser
type instance O.AttributeList RecentChooser = RecentChooserAttributeList
type RecentChooserAttributeList = ('[ '("filter", RecentChooserFilterPropertyInfo), '("limit", RecentChooserLimitPropertyInfo), '("localOnly", RecentChooserLocalOnlyPropertyInfo), '("recentManager", RecentChooserRecentManagerPropertyInfo), '("selectMultiple", RecentChooserSelectMultiplePropertyInfo), '("showIcons", RecentChooserShowIconsPropertyInfo), '("showNotFound", RecentChooserShowNotFoundPropertyInfo), '("showPrivate", RecentChooserShowPrivatePropertyInfo), '("showTips", RecentChooserShowTipsPropertyInfo), '("sortType", RecentChooserSortTypePropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
recentChooserFilter :: AttrLabelProxy "filter"
recentChooserFilter = AttrLabelProxy
recentChooserLimit :: AttrLabelProxy "limit"
recentChooserLimit = AttrLabelProxy
recentChooserLocalOnly :: AttrLabelProxy "localOnly"
recentChooserLocalOnly = AttrLabelProxy
recentChooserRecentManager :: AttrLabelProxy "recentManager"
recentChooserRecentManager = AttrLabelProxy
recentChooserSelectMultiple :: AttrLabelProxy "selectMultiple"
recentChooserSelectMultiple = AttrLabelProxy
recentChooserShowIcons :: AttrLabelProxy "showIcons"
recentChooserShowIcons = AttrLabelProxy
recentChooserShowNotFound :: AttrLabelProxy "showNotFound"
recentChooserShowNotFound = AttrLabelProxy
recentChooserShowPrivate :: AttrLabelProxy "showPrivate"
recentChooserShowPrivate = AttrLabelProxy
recentChooserShowTips :: AttrLabelProxy "showTips"
recentChooserShowTips = AttrLabelProxy
recentChooserSortType :: AttrLabelProxy "sortType"
recentChooserSortType = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
type family ResolveRecentChooserMethod (t :: Symbol) (o :: *) :: * where
ResolveRecentChooserMethod "addFilter" o = RecentChooserAddFilterMethodInfo
ResolveRecentChooserMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveRecentChooserMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveRecentChooserMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveRecentChooserMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveRecentChooserMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveRecentChooserMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveRecentChooserMethod "listFilters" o = RecentChooserListFiltersMethodInfo
ResolveRecentChooserMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveRecentChooserMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveRecentChooserMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveRecentChooserMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveRecentChooserMethod "removeFilter" o = RecentChooserRemoveFilterMethodInfo
ResolveRecentChooserMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveRecentChooserMethod "selectAll" o = RecentChooserSelectAllMethodInfo
ResolveRecentChooserMethod "selectUri" o = RecentChooserSelectUriMethodInfo
ResolveRecentChooserMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveRecentChooserMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveRecentChooserMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveRecentChooserMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveRecentChooserMethod "unselectAll" o = RecentChooserUnselectAllMethodInfo
ResolveRecentChooserMethod "unselectUri" o = RecentChooserUnselectUriMethodInfo
ResolveRecentChooserMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveRecentChooserMethod "getCurrentItem" o = RecentChooserGetCurrentItemMethodInfo
ResolveRecentChooserMethod "getCurrentUri" o = RecentChooserGetCurrentUriMethodInfo
ResolveRecentChooserMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveRecentChooserMethod "getFilter" o = RecentChooserGetFilterMethodInfo
ResolveRecentChooserMethod "getItems" o = RecentChooserGetItemsMethodInfo
ResolveRecentChooserMethod "getLimit" o = RecentChooserGetLimitMethodInfo
ResolveRecentChooserMethod "getLocalOnly" o = RecentChooserGetLocalOnlyMethodInfo
ResolveRecentChooserMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveRecentChooserMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveRecentChooserMethod "getSelectMultiple" o = RecentChooserGetSelectMultipleMethodInfo
ResolveRecentChooserMethod "getShowIcons" o = RecentChooserGetShowIconsMethodInfo
ResolveRecentChooserMethod "getShowNotFound" o = RecentChooserGetShowNotFoundMethodInfo
ResolveRecentChooserMethod "getShowPrivate" o = RecentChooserGetShowPrivateMethodInfo
ResolveRecentChooserMethod "getShowTips" o = RecentChooserGetShowTipsMethodInfo
ResolveRecentChooserMethod "getSortType" o = RecentChooserGetSortTypeMethodInfo
ResolveRecentChooserMethod "getUris" o = RecentChooserGetUrisMethodInfo
ResolveRecentChooserMethod "setCurrentUri" o = RecentChooserSetCurrentUriMethodInfo
ResolveRecentChooserMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveRecentChooserMethod "setFilter" o = RecentChooserSetFilterMethodInfo
ResolveRecentChooserMethod "setLimit" o = RecentChooserSetLimitMethodInfo
ResolveRecentChooserMethod "setLocalOnly" o = RecentChooserSetLocalOnlyMethodInfo
ResolveRecentChooserMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveRecentChooserMethod "setSelectMultiple" o = RecentChooserSetSelectMultipleMethodInfo
ResolveRecentChooserMethod "setShowIcons" o = RecentChooserSetShowIconsMethodInfo
ResolveRecentChooserMethod "setShowNotFound" o = RecentChooserSetShowNotFoundMethodInfo
ResolveRecentChooserMethod "setShowPrivate" o = RecentChooserSetShowPrivateMethodInfo
ResolveRecentChooserMethod "setShowTips" o = RecentChooserSetShowTipsMethodInfo
ResolveRecentChooserMethod "setSortFunc" o = RecentChooserSetSortFuncMethodInfo
ResolveRecentChooserMethod "setSortType" o = RecentChooserSetSortTypeMethodInfo
ResolveRecentChooserMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveRecentChooserMethod t RecentChooser, O.MethodInfo info RecentChooser p) => OL.IsLabel t (RecentChooser -> 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
-- method RecentChooser::add_filter
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface (Name {namespace = "Gtk", name = "RecentFilter"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentFilter", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_add_filter" gtk_recent_chooser_add_filter ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
Ptr Gtk.RecentFilter.RecentFilter -> -- filter : TInterface (Name {namespace = "Gtk", name = "RecentFilter"})
IO ()
{- |
Adds /@filter@/ to the list of 'GI.Gtk.Objects.RecentFilter.RecentFilter' objects held by /@chooser@/.
If no previous filter objects were defined, this function will call
'GI.Gtk.Interfaces.RecentChooser.recentChooserSetFilter'.
/Since: 2.10/
-}
recentChooserAddFilter ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> b
{- ^ /@filter@/: a 'GI.Gtk.Objects.RecentFilter.RecentFilter' -}
-> m ()
recentChooserAddFilter chooser filter = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
filter' <- unsafeManagedPtrCastPtr filter
gtk_recent_chooser_add_filter chooser' filter'
touchManagedPtr chooser
touchManagedPtr filter
return ()
#if ENABLE_OVERLOADING
data RecentChooserAddFilterMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) => O.MethodInfo RecentChooserAddFilterMethodInfo a signature where
overloadedMethod _ = recentChooserAddFilter
#endif
-- method RecentChooser::get_current_item
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "RecentInfo"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_get_current_item" gtk_recent_chooser_get_current_item ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO (Ptr Gtk.RecentInfo.RecentInfo)
{- |
Gets the 'GI.Gtk.Structs.RecentInfo.RecentInfo' currently selected by /@chooser@/.
/Since: 2.10/
-}
recentChooserGetCurrentItem ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Gtk.RecentInfo.RecentInfo
{- ^ __Returns:__ a 'GI.Gtk.Structs.RecentInfo.RecentInfo'. Use 'GI.Gtk.Structs.RecentInfo.recentInfoUnref' when
when you have finished using it. -}
recentChooserGetCurrentItem chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_current_item chooser'
checkUnexpectedReturnNULL "recentChooserGetCurrentItem" result
result' <- (wrapBoxed Gtk.RecentInfo.RecentInfo) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetCurrentItemMethodInfo
instance (signature ~ (m Gtk.RecentInfo.RecentInfo), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetCurrentItemMethodInfo a signature where
overloadedMethod _ = recentChooserGetCurrentItem
#endif
-- method RecentChooser::get_current_uri
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_current_uri" gtk_recent_chooser_get_current_uri ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CString
{- |
Gets the URI currently selected by /@chooser@/.
/Since: 2.10/
-}
recentChooserGetCurrentUri ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m T.Text
{- ^ __Returns:__ a newly allocated string holding a URI. -}
recentChooserGetCurrentUri chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_current_uri chooser'
checkUnexpectedReturnNULL "recentChooserGetCurrentUri" result
result' <- cstringToText result
freeMem result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetCurrentUriMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetCurrentUriMethodInfo a signature where
overloadedMethod _ = recentChooserGetCurrentUri
#endif
-- method RecentChooser::get_filter
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "RecentFilter"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_get_filter" gtk_recent_chooser_get_filter ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO (Ptr Gtk.RecentFilter.RecentFilter)
{- |
Gets the 'GI.Gtk.Objects.RecentFilter.RecentFilter' object currently used by /@chooser@/ to affect
the display of the recently used resources.
/Since: 2.10/
-}
recentChooserGetFilter ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Gtk.RecentFilter.RecentFilter
{- ^ __Returns:__ a 'GI.Gtk.Objects.RecentFilter.RecentFilter' object. -}
recentChooserGetFilter chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_filter chooser'
checkUnexpectedReturnNULL "recentChooserGetFilter" result
result' <- (newObject Gtk.RecentFilter.RecentFilter) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetFilterMethodInfo
instance (signature ~ (m Gtk.RecentFilter.RecentFilter), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetFilterMethodInfo a signature where
overloadedMethod _ = recentChooserGetFilter
#endif
-- method RecentChooser::get_items
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TGList (TInterface (Name {namespace = "Gtk", name = "RecentInfo"})))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_get_items" gtk_recent_chooser_get_items ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO (Ptr (GList (Ptr Gtk.RecentInfo.RecentInfo)))
{- |
Gets the list of recently used resources in form of 'GI.Gtk.Structs.RecentInfo.RecentInfo' objects.
The return value of this function is affected by the “sort-type” and
“limit” properties of /@chooser@/.
/Since: 2.10/
-}
recentChooserGetItems ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m [Gtk.RecentInfo.RecentInfo]
{- ^ __Returns:__ A newly allocated
list of 'GI.Gtk.Structs.RecentInfo.RecentInfo' objects. You should
use 'GI.Gtk.Structs.RecentInfo.recentInfoUnref' on every item of the list, and then free
the list itself using @/g_list_free()/@. -}
recentChooserGetItems chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_items chooser'
result' <- unpackGList result
result'' <- mapM (wrapBoxed Gtk.RecentInfo.RecentInfo) result'
g_list_free result
touchManagedPtr chooser
return result''
#if ENABLE_OVERLOADING
data RecentChooserGetItemsMethodInfo
instance (signature ~ (m [Gtk.RecentInfo.RecentInfo]), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetItemsMethodInfo a signature where
overloadedMethod _ = recentChooserGetItems
#endif
-- method RecentChooser::get_limit
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_limit" gtk_recent_chooser_get_limit ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO Int32
{- |
Gets the number of items returned by 'GI.Gtk.Interfaces.RecentChooser.recentChooserGetItems'
and 'GI.Gtk.Interfaces.RecentChooser.recentChooserGetUris'.
/Since: 2.10/
-}
recentChooserGetLimit ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Int32
{- ^ __Returns:__ A positive integer, or -1 meaning that all items are
returned. -}
recentChooserGetLimit chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_limit chooser'
touchManagedPtr chooser
return result
#if ENABLE_OVERLOADING
data RecentChooserGetLimitMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetLimitMethodInfo a signature where
overloadedMethod _ = recentChooserGetLimit
#endif
-- method RecentChooser::get_local_only
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_local_only" gtk_recent_chooser_get_local_only ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Gets whether only local resources should be shown in the recently used
resources selector. See 'GI.Gtk.Interfaces.RecentChooser.recentChooserSetLocalOnly'
/Since: 2.10/
-}
recentChooserGetLocalOnly ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if only local resources should be shown. -}
recentChooserGetLocalOnly chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_local_only chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetLocalOnlyMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetLocalOnlyMethodInfo a signature where
overloadedMethod _ = recentChooserGetLocalOnly
#endif
-- method RecentChooser::get_select_multiple
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_select_multiple" gtk_recent_chooser_get_select_multiple ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Gets whether /@chooser@/ can select multiple items.
/Since: 2.10/
-}
recentChooserGetSelectMultiple ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if /@chooser@/ can select more than one item. -}
recentChooserGetSelectMultiple chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_select_multiple chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetSelectMultipleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetSelectMultipleMethodInfo a signature where
overloadedMethod _ = recentChooserGetSelectMultiple
#endif
-- method RecentChooser::get_show_icons
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_show_icons" gtk_recent_chooser_get_show_icons ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Retrieves whether /@chooser@/ should show an icon near the resource.
/Since: 2.10/
-}
recentChooserGetShowIcons ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if the icons should be displayed, 'False' otherwise. -}
recentChooserGetShowIcons chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_show_icons chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetShowIconsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetShowIconsMethodInfo a signature where
overloadedMethod _ = recentChooserGetShowIcons
#endif
-- method RecentChooser::get_show_not_found
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_show_not_found" gtk_recent_chooser_get_show_not_found ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Retrieves whether /@chooser@/ should show the recently used resources that
were not found.
/Since: 2.10/
-}
recentChooserGetShowNotFound ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if the resources not found should be displayed, and
'False' otheriwse. -}
recentChooserGetShowNotFound chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_show_not_found chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetShowNotFoundMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetShowNotFoundMethodInfo a signature where
overloadedMethod _ = recentChooserGetShowNotFound
#endif
-- method RecentChooser::get_show_private
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_show_private" gtk_recent_chooser_get_show_private ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Returns whether /@chooser@/ should display recently used resources
registered as private.
/Since: 2.10/
-}
recentChooserGetShowPrivate ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if the recent chooser should show private items,
'False' otherwise. -}
recentChooserGetShowPrivate chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_show_private chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetShowPrivateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetShowPrivateMethodInfo a signature where
overloadedMethod _ = recentChooserGetShowPrivate
#endif
-- method RecentChooser::get_show_tips
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", 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_recent_chooser_get_show_tips" gtk_recent_chooser_get_show_tips ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CInt
{- |
Gets whether /@chooser@/ should display tooltips containing the full path
of a recently user resource.
/Since: 2.10/
-}
recentChooserGetShowTips ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Bool
{- ^ __Returns:__ 'True' if the recent chooser should show tooltips,
'False' otherwise. -}
recentChooserGetShowTips chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_show_tips chooser'
let result' = (/= 0) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetShowTipsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetShowTipsMethodInfo a signature where
overloadedMethod _ = recentChooserGetShowTips
#endif
-- method RecentChooser::get_sort_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TInterface (Name {namespace = "Gtk", name = "RecentSortType"}))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_get_sort_type" gtk_recent_chooser_get_sort_type ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO CUInt
{- |
Gets the value set by 'GI.Gtk.Interfaces.RecentChooser.recentChooserSetSortType'.
/Since: 2.10/
-}
recentChooserGetSortType ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m Gtk.Enums.RecentSortType
{- ^ __Returns:__ the sorting order of the /@chooser@/. -}
recentChooserGetSortType chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_get_sort_type chooser'
let result' = (toEnum . fromIntegral) result
touchManagedPtr chooser
return result'
#if ENABLE_OVERLOADING
data RecentChooserGetSortTypeMethodInfo
instance (signature ~ (m Gtk.Enums.RecentSortType), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetSortTypeMethodInfo a signature where
overloadedMethod _ = recentChooserGetSortType
#endif
-- method RecentChooser::get_uris
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TUInt64, direction = DirectionOut, mayBeNull = False, argDoc = Documentation {rawDocText = Just "return location for a the length of the\n URI list, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : Just (TCArray True (-1) 1 (TBasicType TUTF8))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_get_uris" gtk_recent_chooser_get_uris ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
Ptr Word64 -> -- length : TBasicType TUInt64
IO (Ptr CString)
{- |
Gets the URI of the recently used resources.
The return value of this function is affected by the “sort-type” and “limit”
properties of /@chooser@/.
Since the returned array is 'Nothing' terminated, /@length@/ may be 'Nothing'.
/Since: 2.10/
-}
recentChooserGetUris ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m (([T.Text], Word64))
{- ^ __Returns:__
A newly allocated, 'Nothing'-terminated array of strings. Use
'GI.GLib.Functions.strfreev' to free it. -}
recentChooserGetUris chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
length_ <- allocMem :: IO (Ptr Word64)
result <- gtk_recent_chooser_get_uris chooser' length_
checkUnexpectedReturnNULL "recentChooserGetUris" result
result' <- unpackZeroTerminatedUTF8CArray result
mapZeroTerminatedCArray freeMem result
freeMem result
length_' <- peek length_
touchManagedPtr chooser
freeMem length_
return (result', length_')
#if ENABLE_OVERLOADING
data RecentChooserGetUrisMethodInfo
instance (signature ~ (m (([T.Text], Word64))), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserGetUrisMethodInfo a signature where
overloadedMethod _ = recentChooserGetUris
#endif
-- method RecentChooser::list_filters
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Just (TGSList (TInterface (Name {namespace = "Gtk", name = "RecentFilter"})))
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_list_filters" gtk_recent_chooser_list_filters ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO (Ptr (GSList (Ptr Gtk.RecentFilter.RecentFilter)))
{- |
Gets the 'GI.Gtk.Objects.RecentFilter.RecentFilter' objects held by /@chooser@/.
/Since: 2.10/
-}
recentChooserListFilters ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m [Gtk.RecentFilter.RecentFilter]
{- ^ __Returns:__ A singly linked list
of 'GI.Gtk.Objects.RecentFilter.RecentFilter' objects. You
should just free the returned list using @/g_slist_free()/@. -}
recentChooserListFilters chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
result <- gtk_recent_chooser_list_filters chooser'
result' <- unpackGSList result
result'' <- mapM (newObject Gtk.RecentFilter.RecentFilter) result'
g_slist_free result
touchManagedPtr chooser
return result''
#if ENABLE_OVERLOADING
data RecentChooserListFiltersMethodInfo
instance (signature ~ (m [Gtk.RecentFilter.RecentFilter]), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserListFiltersMethodInfo a signature where
overloadedMethod _ = recentChooserListFilters
#endif
-- method RecentChooser::remove_filter
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface (Name {namespace = "Gtk", name = "RecentFilter"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentFilter", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_remove_filter" gtk_recent_chooser_remove_filter ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
Ptr Gtk.RecentFilter.RecentFilter -> -- filter : TInterface (Name {namespace = "Gtk", name = "RecentFilter"})
IO ()
{- |
Removes /@filter@/ from the list of 'GI.Gtk.Objects.RecentFilter.RecentFilter' objects held by /@chooser@/.
/Since: 2.10/
-}
recentChooserRemoveFilter ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> b
{- ^ /@filter@/: a 'GI.Gtk.Objects.RecentFilter.RecentFilter' -}
-> m ()
recentChooserRemoveFilter chooser filter = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
filter' <- unsafeManagedPtrCastPtr filter
gtk_recent_chooser_remove_filter chooser' filter'
touchManagedPtr chooser
touchManagedPtr filter
return ()
#if ENABLE_OVERLOADING
data RecentChooserRemoveFilterMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) => O.MethodInfo RecentChooserRemoveFilterMethodInfo a signature where
overloadedMethod _ = recentChooserRemoveFilter
#endif
-- method RecentChooser::select_all
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_select_all" gtk_recent_chooser_select_all ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO ()
{- |
Selects all the items inside /@chooser@/, if the /@chooser@/ supports
multiple selection.
/Since: 2.10/
-}
recentChooserSelectAll ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m ()
recentChooserSelectAll chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
gtk_recent_chooser_select_all chooser'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSelectAllMethodInfo
instance (signature ~ (m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSelectAllMethodInfo a signature where
overloadedMethod _ = recentChooserSelectAll
#endif
-- method RecentChooser::select_uri
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a URI", 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_recent_chooser_select_uri" gtk_recent_chooser_select_uri ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CString -> -- uri : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO CInt
{- |
Selects /@uri@/ inside /@chooser@/.
/Since: 2.10/
-}
recentChooserSelectUri ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> T.Text
{- ^ /@uri@/: a URI -}
-> m ()
{- ^ /(Can throw 'Data.GI.Base.GError.GError')/ -}
recentChooserSelectUri chooser uri = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
uri' <- textToCString uri
onException (do
_ <- propagateGError $ gtk_recent_chooser_select_uri chooser' uri'
touchManagedPtr chooser
freeMem uri'
return ()
) (do
freeMem uri'
)
#if ENABLE_OVERLOADING
data RecentChooserSelectUriMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSelectUriMethodInfo a signature where
overloadedMethod _ = recentChooserSelectUri
#endif
-- method RecentChooser::set_current_uri
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a URI", 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_recent_chooser_set_current_uri" gtk_recent_chooser_set_current_uri ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CString -> -- uri : TBasicType TUTF8
Ptr (Ptr GError) -> -- error
IO CInt
{- |
Sets /@uri@/ as the current URI for /@chooser@/.
/Since: 2.10/
-}
recentChooserSetCurrentUri ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> T.Text
{- ^ /@uri@/: a URI -}
-> m ()
{- ^ /(Can throw 'Data.GI.Base.GError.GError')/ -}
recentChooserSetCurrentUri chooser uri = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
uri' <- textToCString uri
onException (do
_ <- propagateGError $ gtk_recent_chooser_set_current_uri chooser' uri'
touchManagedPtr chooser
freeMem uri'
return ()
) (do
freeMem uri'
)
#if ENABLE_OVERLOADING
data RecentChooserSetCurrentUriMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetCurrentUriMethodInfo a signature where
overloadedMethod _ = recentChooserSetCurrentUri
#endif
-- method RecentChooser::set_filter
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface (Name {namespace = "Gtk", name = "RecentFilter"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "a #GtkRecentFilter", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_filter" gtk_recent_chooser_set_filter ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
Ptr Gtk.RecentFilter.RecentFilter -> -- filter : TInterface (Name {namespace = "Gtk", name = "RecentFilter"})
IO ()
{- |
Sets /@filter@/ as the current 'GI.Gtk.Objects.RecentFilter.RecentFilter' object used by /@chooser@/
to affect the displayed recently used resources.
/Since: 2.10/
-}
recentChooserSetFilter ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Maybe (b)
{- ^ /@filter@/: a 'GI.Gtk.Objects.RecentFilter.RecentFilter' -}
-> m ()
recentChooserSetFilter chooser filter = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
maybeFilter <- case filter of
Nothing -> return nullPtr
Just jFilter -> do
jFilter' <- unsafeManagedPtrCastPtr jFilter
return jFilter'
gtk_recent_chooser_set_filter chooser' maybeFilter
touchManagedPtr chooser
whenJust filter touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetFilterMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsRecentChooser a, Gtk.RecentFilter.IsRecentFilter b) => O.MethodInfo RecentChooserSetFilterMethodInfo a signature where
overloadedMethod _ = recentChooserSetFilter
#endif
-- method RecentChooser::set_limit
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "limit", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a positive integer, or -1 for all items", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_limit" gtk_recent_chooser_set_limit ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
Int32 -> -- limit : TBasicType TInt
IO ()
{- |
Sets the number of items that should be returned by
'GI.Gtk.Interfaces.RecentChooser.recentChooserGetItems' and 'GI.Gtk.Interfaces.RecentChooser.recentChooserGetUris'.
/Since: 2.10/
-}
recentChooserSetLimit ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Int32
{- ^ /@limit@/: a positive integer, or -1 for all items -}
-> m ()
recentChooserSetLimit chooser limit = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
gtk_recent_chooser_set_limit chooser' limit
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetLimitMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetLimitMethodInfo a signature where
overloadedMethod _ = recentChooserSetLimit
#endif
-- method RecentChooser::set_local_only
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "local_only", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE if only local files can be shown", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_local_only" gtk_recent_chooser_set_local_only ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- local_only : TBasicType TBoolean
IO ()
{- |
Sets whether only local resources, that is resources using the file:\/\/ URI
scheme, should be shown in the recently used resources selector. If
/@localOnly@/ is 'True' (the default) then the shown resources are guaranteed
to be accessible through the operating system native file system.
/Since: 2.10/
-}
recentChooserSetLocalOnly ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@localOnly@/: 'True' if only local files can be shown -}
-> m ()
recentChooserSetLocalOnly chooser localOnly = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let localOnly' = (fromIntegral . fromEnum) localOnly
gtk_recent_chooser_set_local_only chooser' localOnly'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetLocalOnlyMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetLocalOnlyMethodInfo a signature where
overloadedMethod _ = recentChooserSetLocalOnly
#endif
-- method RecentChooser::set_select_multiple
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "select_multiple", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE if @chooser can select more than one item", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_select_multiple" gtk_recent_chooser_set_select_multiple ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- select_multiple : TBasicType TBoolean
IO ()
{- |
Sets whether /@chooser@/ can select multiple items.
/Since: 2.10/
-}
recentChooserSetSelectMultiple ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@selectMultiple@/: 'True' if /@chooser@/ can select more than one item -}
-> m ()
recentChooserSetSelectMultiple chooser selectMultiple = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let selectMultiple' = (fromIntegral . fromEnum) selectMultiple
gtk_recent_chooser_set_select_multiple chooser' selectMultiple'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetSelectMultipleMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetSelectMultipleMethodInfo a signature where
overloadedMethod _ = recentChooserSetSelectMultiple
#endif
-- method RecentChooser::set_show_icons
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show_icons", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "whether to show an icon near the resource", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_show_icons" gtk_recent_chooser_set_show_icons ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- show_icons : TBasicType TBoolean
IO ()
{- |
Sets whether /@chooser@/ should show an icon near the resource when
displaying it.
/Since: 2.10/
-}
recentChooserSetShowIcons ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@showIcons@/: whether to show an icon near the resource -}
-> m ()
recentChooserSetShowIcons chooser showIcons = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let showIcons' = (fromIntegral . fromEnum) showIcons
gtk_recent_chooser_set_show_icons chooser' showIcons'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetShowIconsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetShowIconsMethodInfo a signature where
overloadedMethod _ = recentChooserSetShowIcons
#endif
-- method RecentChooser::set_show_not_found
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show_not_found", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "whether to show the local items we didn\8217t find", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_show_not_found" gtk_recent_chooser_set_show_not_found ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- show_not_found : TBasicType TBoolean
IO ()
{- |
Sets whether /@chooser@/ should display the recently used resources that
it didn’t find. This only applies to local resources.
/Since: 2.10/
-}
recentChooserSetShowNotFound ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@showNotFound@/: whether to show the local items we didn’t find -}
-> m ()
recentChooserSetShowNotFound chooser showNotFound = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let showNotFound' = (fromIntegral . fromEnum) showNotFound
gtk_recent_chooser_set_show_not_found chooser' showNotFound'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetShowNotFoundMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetShowNotFoundMethodInfo a signature where
overloadedMethod _ = recentChooserSetShowNotFound
#endif
-- method RecentChooser::set_show_private
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show_private", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE to show private items, %FALSE otherwise", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_show_private" gtk_recent_chooser_set_show_private ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- show_private : TBasicType TBoolean
IO ()
{- |
Whether to show recently used resources marked registered as private.
/Since: 2.10/
-}
recentChooserSetShowPrivate ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@showPrivate@/: 'True' to show private items, 'False' otherwise -}
-> m ()
recentChooserSetShowPrivate chooser showPrivate = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let showPrivate' = (fromIntegral . fromEnum) showPrivate
gtk_recent_chooser_set_show_private chooser' showPrivate'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetShowPrivateMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetShowPrivateMethodInfo a signature where
overloadedMethod _ = recentChooserSetShowPrivate
#endif
-- method RecentChooser::set_show_tips
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show_tips", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "%TRUE if tooltips should be shown", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_show_tips" gtk_recent_chooser_set_show_tips ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CInt -> -- show_tips : TBasicType TBoolean
IO ()
{- |
Sets whether to show a tooltips containing the full path of each
recently used resource in a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' widget.
/Since: 2.10/
-}
recentChooserSetShowTips ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Bool
{- ^ /@showTips@/: 'True' if tooltips should be shown -}
-> m ()
recentChooserSetShowTips chooser showTips = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let showTips' = (fromIntegral . fromEnum) showTips
gtk_recent_chooser_set_show_tips chooser' showTips'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetShowTipsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetShowTipsMethodInfo a signature where
overloadedMethod _ = recentChooserSetShowTips
#endif
-- method RecentChooser::set_sort_func
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sort_func", argType = TInterface (Name {namespace = "Gtk", name = "RecentSortFunc"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "the comparison function", sinceVersion = Nothing}, argScope = ScopeTypeNotified, argClosure = 2, argDestroy = 3, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sort_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "user data to pass to @sort_func, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data_destroy", argType = TInterface (Name {namespace = "GLib", name = "DestroyNotify"}), direction = DirectionIn, mayBeNull = True, argDoc = Documentation {rawDocText = Just "destroy notifier for @sort_data, or %NULL", sinceVersion = Nothing}, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_sort_func" gtk_recent_chooser_set_sort_func ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
FunPtr Gtk.Callbacks.C_RecentSortFunc -> -- sort_func : TInterface (Name {namespace = "Gtk", name = "RecentSortFunc"})
Ptr () -> -- sort_data : TBasicType TPtr
FunPtr GLib.Callbacks.C_DestroyNotify -> -- data_destroy : TInterface (Name {namespace = "GLib", name = "DestroyNotify"})
IO ()
{- |
Sets the comparison function used when sorting to be /@sortFunc@/. If
the /@chooser@/ has the sort type set to @/GTK_RECENT_SORT_CUSTOM/@ then
the chooser will sort using this function.
To the comparison function will be passed two 'GI.Gtk.Structs.RecentInfo.RecentInfo' structs and
/@sortData@/; /@sortFunc@/ should return a positive integer if the first
item comes before the second, zero if the two items are equal and
a negative integer if the first item comes after the second.
/Since: 2.10/
-}
recentChooserSetSortFunc ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Gtk.Callbacks.RecentSortFunc
{- ^ /@sortFunc@/: the comparison function -}
-> m ()
recentChooserSetSortFunc chooser sortFunc = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
sortFunc' <- Gtk.Callbacks.mk_RecentSortFunc (Gtk.Callbacks.wrap_RecentSortFunc Nothing (Gtk.Callbacks.drop_closures_RecentSortFunc sortFunc))
let sortData = castFunPtrToPtr sortFunc'
let dataDestroy = safeFreeFunPtrPtr
gtk_recent_chooser_set_sort_func chooser' sortFunc' sortData dataDestroy
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetSortFuncMethodInfo
instance (signature ~ (Gtk.Callbacks.RecentSortFunc -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetSortFuncMethodInfo a signature where
overloadedMethod _ = recentChooserSetSortFunc
#endif
-- method RecentChooser::set_sort_type
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sort_type", argType = TInterface (Name {namespace = "Gtk", name = "RecentSortType"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "sort order that the chooser should use", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_set_sort_type" gtk_recent_chooser_set_sort_type ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CUInt -> -- sort_type : TInterface (Name {namespace = "Gtk", name = "RecentSortType"})
IO ()
{- |
Changes the sorting order of the recently used resources list displayed by
/@chooser@/.
/Since: 2.10/
-}
recentChooserSetSortType ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> Gtk.Enums.RecentSortType
{- ^ /@sortType@/: sort order that the chooser should use -}
-> m ()
recentChooserSetSortType chooser sortType = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
let sortType' = (fromIntegral . fromEnum) sortType
gtk_recent_chooser_set_sort_type chooser' sortType'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserSetSortTypeMethodInfo
instance (signature ~ (Gtk.Enums.RecentSortType -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserSetSortTypeMethodInfo a signature where
overloadedMethod _ = recentChooserSetSortType
#endif
-- method RecentChooser::unselect_all
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_unselect_all" gtk_recent_chooser_unselect_all ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
IO ()
{- |
Unselects all the items inside /@chooser@/.
/Since: 2.10/
-}
recentChooserUnselectAll ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> m ()
recentChooserUnselectAll chooser = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
gtk_recent_chooser_unselect_all chooser'
touchManagedPtr chooser
return ()
#if ENABLE_OVERLOADING
data RecentChooserUnselectAllMethodInfo
instance (signature ~ (m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserUnselectAllMethodInfo a signature where
overloadedMethod _ = recentChooserUnselectAll
#endif
-- method RecentChooser::unselect_uri
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "chooser", argType = TInterface (Name {namespace = "Gtk", name = "RecentChooser"}), direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a #GtkRecentChooser", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argDoc = Documentation {rawDocText = Just "a URI", sinceVersion = Nothing}, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : Nothing
-- throws : False
-- Skip return : False
foreign import ccall "gtk_recent_chooser_unselect_uri" gtk_recent_chooser_unselect_uri ::
Ptr RecentChooser -> -- chooser : TInterface (Name {namespace = "Gtk", name = "RecentChooser"})
CString -> -- uri : TBasicType TUTF8
IO ()
{- |
Unselects /@uri@/ inside /@chooser@/.
/Since: 2.10/
-}
recentChooserUnselectUri ::
(B.CallStack.HasCallStack, MonadIO m, IsRecentChooser a) =>
a
{- ^ /@chooser@/: a 'GI.Gtk.Interfaces.RecentChooser.RecentChooser' -}
-> T.Text
{- ^ /@uri@/: a URI -}
-> m ()
recentChooserUnselectUri chooser uri = liftIO $ do
chooser' <- unsafeManagedPtrCastPtr chooser
uri' <- textToCString uri
gtk_recent_chooser_unselect_uri chooser' uri'
touchManagedPtr chooser
freeMem uri'
return ()
#if ENABLE_OVERLOADING
data RecentChooserUnselectUriMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsRecentChooser a) => O.MethodInfo RecentChooserUnselectUriMethodInfo a signature where
overloadedMethod _ = recentChooserUnselectUri
#endif