From 908ea151ed74dea06fee071fbc4da89314e279d8 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 29 Apr 2003 21:47:03 +0000 Subject: override some more functions --- perl_checker_fake_packages/gen.pl | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'perl_checker_fake_packages/gen.pl') diff --git a/perl_checker_fake_packages/gen.pl b/perl_checker_fake_packages/gen.pl index 580972d..b512ac5 100755 --- a/perl_checker_fake_packages/gen.pl +++ b/perl_checker_fake_packages/gen.pl @@ -18,9 +18,15 @@ sub gtk2 { [ 'signal_disconnect', ' { my ($_target, $_closure) = @_ }' ], [ 'signal_is_connected', ' { my ($_target, $_closure) = @_ }' ], [ 'signal_stop_emission_by_name', ' { my ($_target, $_detailed_signal) = @_ }' ], + [ 'timeout_add', ' { my ($_class, $_interval, $_func, $o_data) = @_ }' ], + [ 'timeout_remove', ' { my ($_class, $_id) = @_ }' ], + [ 'idle_add', ' { my ($_class, $_func, $o_data) = @_ }' ], + [ 'idle_remove', ' { my ($_class, $_id) = @_ }' ], [ 'create_items', ' { my ($_factory, $_entries, $o_callback_data) = @_ }' ], [ 'style', ' { my ($_widget, $o_style) = @_ }' ], [ 'visible', ' { my ($_widget, $o_bool) = @_ }' ], + [ 'white_gc', ' { my ($_style, $o_gc) = @_ }' ], + [ 'black_gc', ' { my ($_style, $o_gc) = @_ }' ], ); my @added_subroutines; my $add = sub { -- cgit v1.2.1