- drop parse_rpms (unused, parse_rpms_build_headers or parse_rpm are used instead)

- add a comment

2 files changed, 2 insertions, 24 deletions

diff --git a/URPM.pm b/URPM.pm
index 194ecfa..afec11a 100644
--- a/URPM.pm
+++ b/URPM.pm
@@ -174,6 +174,8 @@ sub traverse_tag {
     $count;
 }
 
+# wrapper around XS functions
+# it handles error cases
 sub _parse_hdlist_or_synthesis {
     my ($parse_func, $urpm, $file, %options) = @_;
 
@@ -341,12 +343,6 @@ file and adds them to the URPM object. Allowed options are
 The return value is a two-element array containing the first and the last id
 parsed.
 
-=item $urpm->parse_rpms($files, %options)
-
-This method loads rpm informations from rpm headers and adds them to the URPM
-object. The return value is a two-element array containing the first and the
-last id parsed.
-
 =item $urpm->parse_rpm($file, %options)
 
 This method gets the B<depslist> and the B<provides> from an RPM file
diff --git a/URPM/Build.pm b/URPM/Build.pm
index f7e639b..bd569de 100644
--- a/URPM/Build.pm
+++ b/URPM/Build.pm
@@ -141,24 +141,6 @@ sub parse_headers {
     defined $id ? ($start, $id) : @{[]};
 }
 
-# parse_rpms, same behaviour than parse_{hdlist, synthesis}
-# ie: ($start, $end) = parse_*(filestoparse, %options);
-
-sub parse_rpms {
-    my ($urpm, $rpms, %options) = @_;
-    my ($start, $end);
-    $urpm->parse_rpms_build_headers(
-        rpms => $rpms, 
-        %options, 
-        callback => sub {
-            my (undef, $id) = @_;
-	    $start = $id if $start > $id || ! defined($start);
-	    $end = $id   if $end < $id   || ! defined($end);
-        }
-    ) ? ($start, $end) : ();
-}
-
-
 # DEPRECATED. ONLY USED BY MKCD
 #- compute dependencies, result in stored in info values of urpm.
 #- operations are incremental, it is possible to read just one hdlist, compute