From 4968b8530b57f24f629be4112c870db93ff23ad8 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 17 Sep 2008 18:26:39 +0000 Subject: add Gtk2::Sexy --- NEWS | 1 + fake_packages/Gtk2/Sexy.pm | 40 ++++++++++++++++++++++++++++++++++++++++ 2 files changed, 41 insertions(+) create mode 100644 fake_packages/Gtk2/Sexy.pm diff --git a/NEWS b/NEWS index cda431e..af88acc 100644 --- a/NEWS +++ b/NEWS @@ -1,5 +1,6 @@ - fake_packages: o add Gtk2::Notify (which replaces Gtk2::NotificationBubble) + o add Gtk2::Sexy Version 1.2.8 - 17 September 2008, by Thierry Vignaud diff --git a/fake_packages/Gtk2/Sexy.pm b/fake_packages/Gtk2/Sexy.pm new file mode 100644 index 0000000..daa40fd --- /dev/null +++ b/fake_packages/Gtk2/Sexy.pm @@ -0,0 +1,40 @@ + +package Gtk2::Sexy::IconEntry; +our @ISA = qw(); +sub add_clear_button { my ($_entry) = @_ } +sub get_icon { my ($_entry, $_position) = @_ } +sub get_icon_highlight { my ($_entry, $_position) = @_ } +sub new { my ($_class) = @_ } +sub set_icon { my ($_entry, $_position, $_icon) = @_ } +sub set_icon_highlight { my ($_entry, $_position, $_highlight) = @_ } + +package Gtk2::Sexy::SpellEntry; +our @ISA = qw(); +sub activate_default_languages { my ($_entry) = @_ } +sub activate_language { my ($_entry, $_lang) = @_ } +sub deactivate_language { my ($_entry, $_lang) = @_ } +sub get_active_languages { my ($_entry) = @_ } +sub get_language_name { my ($_entry, $_lang) = @_ } +sub get_languages { my ($_entry) = @_ } +sub is_checked { my ($_entry) = @_ } +sub language_is_active { my ($_entry, $_lang) = @_ } +sub new { my ($_class) = @_ } +sub set_active_languages { my ($_entry, @_more_paras) = @_ } +sub set_checked { my ($_entry, $_checked) = @_ } + +package Gtk2::Sexy::Tooltip; +our @ISA = qw(); +sub new { my ($_class) = @_ } +sub new_with_label { my ($_class, $_text) = @_ } +sub position_to_rect { my ($_tooltip, $_rect, $_screen) = @_ } +sub position_to_widget { my ($_tooltip, $_widget) = @_ } + +package Gtk2::Sexy::TreeView; +our @ISA = qw(); +sub new { my ($_class) = @_ } +sub set_tooltip_label_column { my ($_treeview, $_column) = @_ } + +package Gtk2::Sexy::UrlLabel; +our @ISA = qw(); +sub new { my ($_class) = @_ } +sub set_markup { my ($_url_label, $_markup) = @_ } -- cgit v1.2.1