From 7822bdb7a9d1ad7380ba281fecf79b20bc90dd6f Mon Sep 17 00:00:00 2001
From: nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>
Date: Wed, 14 Dec 2005 15:44:53 +0000
Subject: - fix hrpmreb with RPM4 (remove Hdlist code)

git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@49 971eb68f-4bfb-0310-8326-d2484c010a4c
---
 RPM4/bin/hrpmreb | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

(limited to 'RPM4/bin/hrpmreb')

diff --git a/RPM4/bin/hrpmreb b/RPM4/bin/hrpmreb
index 7febdf5..c2e3edd 100755
--- a/RPM4/bin/hrpmreb
+++ b/RPM4/bin/hrpmreb
@@ -598,20 +598,23 @@ sub build_spec {
     
     nice(RPM4::expand("%{?nice}")) if (RPM4::expandnumeric("%{?nice:1}"));
     set_ipc_status(currentstep => "checking dep");
-    my @pb;
+    my $pbs;
     {
     my $db = RPM4::newdb();
     my $sh = $spec->srcheader();
 
     $db->transadd($sh, "", 0);
     $db->transcheck;
-    @pb = $db->transpb();
+    $pbs = $db->transpbs();
     }
     $chkdeptime = time;
     
-    if (@pb) {
+    if ($pbs) {
+        $pbs->init;
         loging("\nMissing dependancies:\n");
-        loging("$_\n") foreach(RPM4::format_rpmpb(@pb));
+        while($pbs->hasnext) {
+            loging($pbs->problem() . "\n");
+        }
         $rc = 1;
     } elsif(! $nobuild) {
         set_ipc_status(currentstep => "compiling");
-- 
cgit v1.2.1