Gtk2-Recent

 view release on metacpan or  search on metacpan

Recent.pm  view on Meta::CPAN

=item *

Migration module URL: https://metacpan.org/pod/Gtk3

=back

B<NOTICE NOTICE NOTICE NOTICE NOTICE NOTICE NOTICE NOTICE NOTICE NOTICE>


This model allows you to access, modify and show the recent files list,
using the recent files specification provided by freedesktop.org and
implemented using the Gtk libraries.

The recent files list are accessed using the Gtk2::Recent::Model object;
single entries in the recent files list are represented using the
Gtk2::Recent::Item object.

To discuss gtk2-perl, ask questions and flame/praise the authors, join
gtk-perl-list@gnome.org at lists.gnome.org.

Find out more about Gnome at http://www.gnome.org.

=head1 CAVEAT

This binding uses the EggRecent objects provided by libegg.  As such,
it is not api stable, nor it is installed as a shared object

=head1 SEE ALSO

L<perl>(1), L<Gtk2>(3pm), L<Gnome2>(3pm) and the recent files spec on
http://freedesktop.org

=head1 AUTHOR

Emmanuele Bassi E<lt>ebassi (at) gmail.comE<gt>

gtk2-perl created by the gtk2-perl team: http://gtk2-perl.sf.net

=head1 COPYRIGHT AND LICENSE

Copyright 2005 by Emmanuele Bassi

recent-files/egg-recent-model.c  view on Meta::CPAN

#define EGG_RECENT_MODEL_MAX_ITEMS 500
#define EGG_RECENT_MODEL_DEFAULT_LIMIT 10
#define EGG_RECENT_MODEL_TIMEOUT_LENGTH 200
#define EGG_RECENT_MODEL_POLL_TIME 3

/* needed for Darwin */
#if !HAVE_DECL_LOCKF
int lockf (int filedes, int function, off_t size);
#endif

#define EGG_RECENT_MODEL_KEY_DIR "/desktop/gnome/recent_files"
#define EGG_RECENT_MODEL_DEFAULT_LIMIT_KEY EGG_RECENT_MODEL_KEY_DIR "/default_limit"
#define EGG_RECENT_MODEL_EXPIRE_KEY EGG_RECENT_MODEL_KEY_DIR "/expire"

struct _EggRecentModelPrivate {
	GSList *mime_filter_values;	/* list of mime types we allow */
	GSList *group_filter_values;	/* list of groups we allow */
	GSList *scheme_filter_values;	/* list of URI schemes we allow */

	EggRecentModelSort sort_type; /* type of sorting to be done */

recent-files/egg-recent-view-gtk.c  view on Meta::CPAN

		egg_recent_model_changed (view->model);
}

static void
egg_recent_view_gtk_init (EggRecentViewGtk * view)
{
	view->client = gconf_client_get_default ();

	view->show_icons =
		gconf_client_get_bool (view->client,
			"/desktop/gnome/interface/menus_have_icons",
			NULL);

	gconf_client_add_dir (view->client, "/desktop/gnome/interface",
			      GCONF_CLIENT_PRELOAD_NONE,
			      NULL);
	gconf_client_notify_add (view->client,
			"/desktop/gnome/interface/menus_have_icons",
			(GConfClientNotifyFunc)show_menus_changed_cb,
			view, NULL, NULL);


	view->leading_sep = FALSE;
	view->trailing_sep = FALSE;

	view->uid = egg_recent_util_get_unique_id ();
	view->theme = gtk_icon_theme_get_default ();
	g_signal_connect_object (view->theme, "changed",

recent-files/egg-recent-view-uimanager.c  view on Meta::CPAN

		egg_recent_model_changed (view->model);
}
#endif

static void
egg_recent_view_uimanager_init (EggRecentViewUIManager * view)
{
	view->client = gconf_client_get_default ();

	view->show_icons = gconf_client_get_bool (view->client,
						  "/desktop/gnome/interface/menus_have_icons",
						  NULL);
	
	gconf_client_add_dir (view->client, "/desktop/gnome/interface",
			      GCONF_CLIENT_PRELOAD_NONE,
			      NULL);
	gconf_client_notify_add (view->client,
				 "/desktop/gnome/interface/menus_have_icons",
				 (GConfClientNotifyFunc)show_menus_changed_cb,
				 view, NULL, NULL);


	view->leading_sep = FALSE;
	view->trailing_sep = FALSE;
	view->show_numbers = TRUE;

	view->uimanager = NULL;
	view->action_group = NULL;