gtk2hs-commit Mailing List for Gtk2Hs - A GUI Library for Haskell (Page 12)

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 422-6466

diffing dir...
Fri Sep 10 07:10:39 EDT 2010  Andy Stewart <laz...@gm...>
  * Add new module Recent.RecentFilter
  Ignore-this: fe95de3c28b866dfd8ac65505a3c9ed5
    {
    hunk ./TODO 14
    -gtk/Graphics/UI/Gtk/Recent/RecentFilter.chs
    hunk ./gtk/Graphics/UI/Gtk.chs 209
    +  module Graphics.UI.Gtk.Recent.RecentFilter,
    hunk ./gtk/Graphics/UI/Gtk.chs 429
    +import Graphics.UI.Gtk.Recent.RecentFilter
    addfile ./gtk/Graphics/UI/Gtk/Recent/RecentFilter.chs
    hunk ./gtk/Graphics/UI/Gtk/Recent/RecentFilter.chs 1
    +{-# LANGUAGE CPP #-}
    +-- -*-haskell-*-
    +--  GIMP Toolkit (GTK) Widget RecentFilter
    +--
    +--  Author : Andy Stewart
    +--
    +--  Created: 27 Mar 2010
    +--
    +--  Copyright (C) 2010 Andy Stewart
    +--
    +--  This library is free software; you can redistribute it and/or
    +--  modify it under the terms of the GNU Lesser General Public
    +--  License as published by the Free Software Foundation; either
    +--  version 2.1 of the License, or (at your option) any later version.
    +--
    +--  This library is distributed in the hope that it will be useful,
    +--  but WITHOUT ANY WARRANTY; without even the implied warranty of
    +--  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    +--  Lesser General Public License for more details.
    +--
    +-- |
    +-- Maintainer  : gtk...@li...
    +-- Stability   : provisional
    +-- Portability : portable (depends on GHC)
    +--
    +-- A filter for selecting a subset of recently used files
    +--
    +-- * Module available since Gtk+ version 2.10
    +--
    +module Graphics.UI.Gtk.Recent.RecentFilter (
    +
    +-- * Detail
    +--
    +-- | A 'RecentFilter' can be used to restrict the files being shown in a
    +-- 'RecentChooser'. Files can be filtered based on their name (with
    +-- 'recentFilterAddPattern'), on their mime type (with
    +-- 'fileFilterAddMimeType'), on the application that has registered them (with
    +-- 'recentFilterAddApplication'), or by a custom filter function (with
    +-- 'recentFilterAddCustom').
    +--
    +-- Filtering by mime type handles aliasing and subclassing of mime types;
    +-- e.g. a filter for text\/plain also matches a file with mime type
    +-- application\/rtf, since application\/rtf is a subclass of text\/plain. Note
    +-- that 'RecentFilter' allows wildcards for the subtype of a mime type, so you
    +-- can e.g. filter for image\/.
    +--
    +-- Normally, filters are used by adding them to a 'RecentChooser', see
    +-- 'recentChooserAddFilter', but it is also possible to manually use a filter
    +-- on a file with 'recentFilterFilter'.
    +--
    +-- Recently used files are supported since Gtk+ 2.10.
    +
    +-- * Class Hierarchy
    +--
    +-- |
    +-- @
    +-- |  'GObject'
    +-- |   +----'Object'
    +-- |         +----RecentFilter
    +-- @
    +
    +#if GTK_CHECK_VERSION(2,10,0)
    +-- * Types
    +  RecentFilter,
    +  RecentFilterClass,
    +  castToRecentFilter,
    +  toRecentFilter,
    +
    +-- * Enums
    +  RecentFilterFlags(..),
    +
    +-- * Constructors
    +  recentFilterNew,
    +
    +-- * Methods
    +  recentFilterGetName,
    +  recentFilterSetName,
    +  recentFilterAddMimeType,
    +  recentFilterAddPattern,
    +  recentFilterAddPixbufFormats,
    +  recentFilterAddApplication,
    +  recentFilterAddGroup,
    +  recentFilterAddAge,
    +#endif
    +  ) where
    +
    +import Control.Monad	(liftM)
    +
    +import System.Glib.FFI
    +import System.Glib.UTFString
    +import System.Glib.Flags (Flags, toFlags, fromFlags)
    +import Graphics.UI.Gtk.Abstract.Object	(makeNewObject)
    +{#import Graphics.UI.Gtk.Types#}
    +
    +{# context lib="gtk" prefix="gtk" #}
    +
    +#if GTK_CHECK_VERSION(2,10,0)
    +---------------------
    +-- Enums
    +-- | These flags indicate what parts of a 'RecentFilterInfo' struct are filled or need to be filled.
    +{#enum RecentFilterFlags {underscoreToCase} deriving (Bounded,Eq,Show)#}
    +
    +--------------------
    +-- Constructors
    +
    +-- | Creates a new 'RecentFilter' with no rules added to it. Such filter does
    +-- not accept any recently used resources, so is not particularly useful until
    +-- you add rules with 'recentFilterAddPattern', 'recentFilterAddMimeType',
    +-- 'recentFilterAddApplication', 'recentFilterAddAge'. To create a filter that
    +-- accepts any recently used resource, use:
    +--
    +-- > filter <- recentFilterNew
    +-- > recentFilterAddPattern filter "*"
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterNew :: IO RecentFilter
    +recentFilterNew =
    +  makeNewObject mkRecentFilter $
    +  {# call gtk_recent_filter_new #}
    +
    +--------------------
    +-- Methods
    +-- | Gets the human-readable name for the filter. See 'recentFilterSetName'.
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterGetName :: RecentFilterClass self => self
    + -> IO String -- ^ returns the name of the filter
    +recentFilterGetName self =
    +  {# call gtk_recent_filter_get_name #}
    +    (toRecentFilter self)
    +  >>= peekUTFString
    +
    +-- | Sets the human-readable name of the filter; this is the string that will be displayed in the
    +-- recently used resources selector user interface if there is a selectable list of filters.
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterSetName :: RecentFilterClass self => self
    + -> String -- ^ @name@ - then human readable name of @filter@
    + -> IO ()
    +recentFilterSetName self name =
    +  withUTFString name $ \namePtr ->
    +  {# call gtk_recent_filter_set_name #}
    +    (toRecentFilter self)
    +    namePtr
    +
    +-- | Adds a rule that allows resources based on their registered MIME type.
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterAddMimeType :: RecentFilterClass self => self
    + -> String -- ^ @mimeType@ - a MIME type
    + -> IO ()
    +recentFilterAddMimeType self mimeType =
    +  withUTFString mimeType $ \mimeTypePtr ->
    +  {# call gtk_recent_filter_add_mime_type #}
    +    (toRecentFilter self)
    +    mimeTypePtr
    +
    +-- | Adds a rule that allows resources based on a pattern matching their
    +-- display name.
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterAddPattern :: RecentFilterClass self => self
    + -> String -- ^ @pattern@ - a file pattern
    + -> IO ()
    +recentFilterAddPattern self pattern =
    +  withUTFString pattern $ \patternPtr ->
    +  {# call gtk_recent_filter_add_pattern #}
    +    (toRecentFilter self)
    +    patternPtr
    +
    +-- | Adds a rule allowing image files in the formats supported by 'Pixbuf'.
    +--
    +recentFilterAddPixbufFormats :: RecentFilterClass self => self -> IO ()
    +recentFilterAddPixbufFormats self =
    +  {# call gtk_recent_filter_add_pixbuf_formats #}
    +    (toRecentFilter self)
    +
    +-- | Adds a rule that allows resources based on the name of the application
    +-- that has registered them.
    +--
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterAddApplication :: RecentFilterClass self => self
    + -> String -- ^ @application@ - an application name
    + -> IO ()
    +recentFilterAddApplication self application =
    +  withUTFString application $ \applicationPtr ->
    +  {# call gtk_recent_filter_add_application #}
    +    (toRecentFilter self)
    +    applicationPtr
    +
    +-- | Adds a rule that allows resources based on the name of the group to which
    +-- they belong
    +--
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterAddGroup :: RecentFilterClass self => self
    + -> String -- ^ @group@ - a group name
    + -> IO ()
    +recentFilterAddGroup self group =
    +  withUTFString group $ \groupPtr ->
    +  {# call gtk_recent_filter_add_group #}
    +    (toRecentFilter self)
    +    groupPtr
    +
    +-- | Adds a rule that allows resources based on their age - that is, the
    +-- number of days elapsed since they were last modified.
    +--
    +-- * Available since Gtk+ version 2.10
    +--
    +recentFilterAddAge :: RecentFilterClass self => self
    + -> Int -- ^ @days@ - number of days
    + -> IO ()
    +recentFilterAddAge self days =
    +  {# call gtk_recent_filter_add_age #}
    +    (toRecentFilter self)
    +    (fromIntegral days)
    +#endif
    hunk ./gtk/gtk.cabal 291
    +          Graphics.UI.Gtk.Recent.RecentFilter
    hunk ./gtk/hierarchy.list 58
    +		    GtkRecentFilter		if gtk-2.10
    }

2003	Jan	Feb	Mar	Apr	May (4)	Jun	Jul (68)	Aug (4)	Sep	Oct (23)	Nov (95)	Dec (9)
2004	Jan (3)	Feb	Mar	Apr (51)	May (81)	Jun (2)	Jul (86)	Aug (143)	Sep (3)	Oct (31)	Nov (63)	Dec (90)
2005	Jan (277)	Feb (157)	Mar (99)	Apr (195)	May (151)	Jun (148)	Jul (98)	Aug (123)	Sep (20)	Oct (174)	Nov (155)	Dec (26)
2006	Jan (51)	Feb (19)	Mar (16)	Apr (12)	May (5)	Jun	Jul (11)	Aug (7)	Sep (10)	Oct (31)	Nov (174)	Dec (56)
2007	Jan (45)	Feb (52)	Mar (10)	Apr (5)	May (47)	Jun (16)	Jul (80)	Aug (29)	Sep (14)	Oct (59)	Nov (46)	Dec (16)
2008	Jan (10)	Feb (1)	Mar	Apr	May (49)	Jun (26)	Jul (8)	Aug (4)	Sep (25)	Oct (53)	Nov (9)	Dec (1)
2009	Jan (66)	Feb (11)	Mar (1)	Apr (14)	May (8)	Jun (1)	Jul (2)	Aug (2)	Sep (9)	Oct (23)	Nov (35)	Dec
2010	Jan (7)	Feb (2)	Mar (39)	Apr (19)	May (161)	Jun (19)	Jul (32)	Aug (65)	Sep (113)	Oct (120)	Nov (2)	Dec
2012	Jan	Feb (5)	Mar (4)	Apr (7)	May (9)	Jun (14)	Jul (1)	Aug	Sep (1)	Oct (1)	Nov (12)	Dec (2)
2013	Jan (1)	Feb (17)	Mar (4)	Apr (4)	May (9)	Jun	Jul (8)	Aug	Sep (2)	Oct	Nov	Dec

gtk2hs-commit Mailing List for Gtk2Hs - A GUI Library for Haskell (Page 12)

gtk2hs-commit — Mailing list for Darcs commit messages.