diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-12 23:17:44 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-12 23:17:44 +0000 |
commit | 87ebdac347bfe0a15c969a4ebe32463dfa79f3e1 (patch) | |
tree | c779ebfdc513cd5b6db8b7523290be90ed382867 /perl_checker_fake_packages/Glib.pm | |
parent | a1ce8c538fbfe3fb52aa53c99b09f7f696507cc1 (diff) | |
download | perl_checker-87ebdac347bfe0a15c969a4ebe32463dfa79f3e1.tar perl_checker-87ebdac347bfe0a15c969a4ebe32463dfa79f3e1.tar.gz perl_checker-87ebdac347bfe0a15c969a4ebe32463dfa79f3e1.tar.bz2 perl_checker-87ebdac347bfe0a15c969a4ebe32463dfa79f3e1.tar.xz perl_checker-87ebdac347bfe0a15c969a4ebe32463dfa79f3e1.zip |
update from current patched xs sources
Diffstat (limited to 'perl_checker_fake_packages/Glib.pm')
-rw-r--r-- | perl_checker_fake_packages/Glib.pm | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/perl_checker_fake_packages/Glib.pm b/perl_checker_fake_packages/Glib.pm index 9de0854..cf26786 100644 --- a/perl_checker_fake_packages/Glib.pm +++ b/perl_checker_fake_packages/Glib.pm @@ -3,8 +3,8 @@ package Glib; our @ISA = qw(); sub critical { my ($_class, $_domain, $_message) = @_ } sub error { my ($_class, $_domain, $_message) = @_ } -sub filename_from_unicode { my ($_class_or_filename, $_o_filename) = @_ } -sub filename_to_unicode { my ($_class_or_filename, $_o_filename) = @_ } +sub filename_from_unicode { my ($_filename) = @_ } +sub filename_to_unicode { my ($_filename) = @_ } sub install_exception_handler { my ($_class, $_func, $_o_data) = @_ } sub log { my ($_class, $_log_domain, $_log_level, $_message) = @_ } sub message { my ($_class, $_domain, $_message) = @_ } @@ -130,7 +130,4 @@ sub list_interfaces { my ($_class, $_package) = @_ } sub list_signals { my ($_class, $_package) = @_ } sub list_values { my ($_class, $_package) = @_ } sub package_from_cname { my ($_class, $_cname) = @_ } -sub register { my ($_class, $_parent_class, $_new_class, @_more_paras) = @_ } -sub register_enum { my ($_class, $_name, @_more_paras) = @_ } -sub register_flags { my ($_class, $_name, @_more_paras) = @_ } -sub register_object { my ($_class, $_parent_package, $_new_package, @_more_paras) = @_ } +sub register { my ($_class, $_parent_package, $_new_package, @_more_paras) = @_ } |