update URPM fake package

2 files changed, 9 insertions, 5 deletions

diff --git a/NEWS b/NEWS
index c0abcc2..b6f2371 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- update URPM fake package
+
 Version 1.2.15 - 08 March 2012, by Thierry Vignaud
 
 - blacklist some function names that perl_checker dislike (use, ...)
diff --git a/fake_packages/URPM.pm b/fake_packages/URPM.pm
index b8ecc47..4a88fbd 100644
--- a/fake_packages/URPM.pm
+++ b/fake_packages/URPM.pm
@@ -69,7 +69,7 @@ sub import_pubkey { my (@_more_paras) = @_ }
 sub import_pubkey_file { my ($_db, $_filename) = @_ }
 sub is_package_installed { my ($_db, $_o_pkg) = @_ }
 sub list_rpm_tag { my ($_o_urpm) = @_ }
-sub listlength() {}
+sub listlength { my ($_o_l) = @_ }
 sub loadmacrosfile { my ($_filename) = @_ }
 sub make_delta_rpm() {}
 sub min() {}
@@ -90,9 +90,9 @@ sub parse_synthesis { my ($_urpm, $_filename, @_more_paras) = @_ }
 sub parse_synthesis__XS { my ($_urpm, $_filename, @_more_paras) = @_ }
 sub pkg2media { my ($_mediums, $_o_p) = @_ }
 sub platformscore { my ($_platform) = @_ }
-sub property2name() {}
-sub property2name_op_version() {}
-sub property2name_range() {}
+sub property2name { my ($_o_property) = @_ }
+sub property2name_op_version { my ($_o_property) = @_ }
+sub property2name_range { my ($_o_property) = @_ }
 sub provided_version_that_overlaps { my ($_pkg, $_o_provide_name) = @_ }
 sub query_pkg { my ($_undef, $_pkg, $_o_query) = @_ }
 sub ranges_overlap { my ($_a, $_b, $_o_b_nopromote) = @_ }
@@ -127,7 +127,8 @@ sub strict_arch_check_installed { my ($_db, $_o_pkg) = @_ }
 sub tag2id { my ($_o_l) = @_ }
 sub traverse { my ($_urpm, $_o_callback) = @_ }
 sub traverse_tag { my ($_urpm, $_tag, $_names, $_o_callback) = @_ }
-sub uniq() {}
+sub traverse_tag_find { my ($_urpm, $_tag, $_name, $_o_callback) = @_ }
+sub uniq { my ($_o_l) = @_ }
 sub unresolved_provides_clean { my ($_o_urpm) = @_ }
 sub unsatisfied_requires { my ($_urpm, $_db, $_state, $_pkg, $_o_options) = @_ }
 sub verify_rpm { my ($_filename, @_more_paras) = @_ }
@@ -228,6 +229,7 @@ sub release { my ($_pkg) = @_ }
 sub requires { my ($_pkg) = @_ }
 sub requires_nosense { my ($_pkg) = @_ }
 sub rflags { my ($_pkg) = @_ }
+sub set_filesize { my ($_pkg, $_filesize) = @_ }
 sub set_flag { my ($_pkg, $_name, $_o_value) = @_ }
 sub set_flag_base { my ($_pkg, $_o_value) = @_ }
 sub set_flag_disable_obsolete { my ($_pkg, $_o_value) = @_ }