add Gtk2::Sexy

2 files changed, 41 insertions, 0 deletions

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) = @_ }