From 97648283b90bebf6dabff8408451165ed79a076d Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Tue, 29 Apr 2003 21:35:33 +0000
Subject: add some missing functions

---
 perl_checker_fake_packages/Gtk2.pm | 2 ++
 perl_checker_fake_packages/gen.pl  | 2 ++
 2 files changed, 4 insertions(+)

(limited to 'perl_checker_fake_packages')

diff --git a/perl_checker_fake_packages/Gtk2.pm b/perl_checker_fake_packages/Gtk2.pm
index 7806479..3ed5e4c 100644
--- a/perl_checker_fake_packages/Gtk2.pm
+++ b/perl_checker_fake_packages/Gtk2.pm
@@ -2660,6 +2660,7 @@ sub Gtk2::stop_emission_by_name { my ($_class, $_objref, $_detailed_signal) = @_
 sub Gtk2::stretch_new { my ($_class, $_stretch) = @_ }
 sub Gtk2::strikethrough_new { my ($_class, $_strikethrough) = @_ }
 sub Gtk2::string { my ($_event) = @_ }
+sub Gtk2::style { my ($_widget, $o_style) = @_ }
 sub Gtk2::style_get_property { my ($_widget, $_property_name) = @_ }
 sub Gtk2::style_new { my ($_class, $_style) = @_ }
 sub Gtk2::subwindow { my ($_event) = @_ }
@@ -2718,6 +2719,7 @@ sub Gtk2::value_changed { my ($_adjustment) = @_ }
 sub Gtk2::values { my ($_DUMMY0) = @_ }
 sub Gtk2::variant_new { my ($_class, $_variant) = @_ }
 sub Gtk2::vbox { my ($_dialog) = @_ }
+sub Gtk2::visible { my ($_widget, $o_bool) = @_ }
 sub Gtk2::vscrollbar { my ($_scrolled_window) = @_ }
 sub Gtk2::vscrollbar_visible { my ($_scrolled_window) = @_ }
 sub Gtk2::weak_ref { my ($_object, $_notify, $_data) = @_ }
diff --git a/perl_checker_fake_packages/gen.pl b/perl_checker_fake_packages/gen.pl
index d7ae24f..12362a0 100755
--- a/perl_checker_fake_packages/gen.pl
+++ b/perl_checker_fake_packages/gen.pl
@@ -19,6 +19,8 @@ sub gtk2 {
       [ 'signal_is_connected',          ' { my ($_target, $_closure) = @_ }' ],
       [ 'signal_stop_emission_by_name', ' { my ($_target, $_detailed_signal) = @_ }' ],
       [ 'create_items',                 ' { my ($_factory, $_entries, $o_callback_data) = @_ }' ],
+      [ 'style',                        ' { my ($_widget, $o_style) = @_ }' ],
+      [ 'visible',                      ' { my ($_widget, $o_bool) = @_ }' ],
                       );
     my @added_subroutines;
     my $add = sub {
-- 
cgit v1.2.1