From 6fbc3cbea8cb4180d0f14f7988c969b0c20cfc8a Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Thu, 2 Jun 2005 07:24:30 +0000
Subject: Add support for deltarpms

---
 urpm/sys.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'urpm')

diff --git a/urpm/sys.pm b/urpm/sys.pm
index c8d65313..3c53f62b 100644
--- a/urpm/sys.pm
+++ b/urpm/sys.pm
@@ -130,10 +130,11 @@ sub check_fs_writable () {
 #- returns the new rpm filename in case of success
 #- params :
 #-	$deltarpm : full pathname of the deltarpm
+#-	$dir : directory where to put the produced rpm (optional)
 #-	$pkg : URPM::Package object corresponding to the deltarpm (optional)
 our $APPLYDELTARPM = '/usr/bin/applydeltarpm';
 sub apply_delta_rpm {
-    my ($deltarpm, $pkg) = @_;
+    my ($deltarpm, $dir, $pkg) = @_;
     -x $APPLYDELTARPM or return 0;
     -e $deltarpm or return 0;
     my $rpm;
@@ -143,6 +144,7 @@ sub apply_delta_rpm {
 	$rpm = qx(rpm -qp --qf '%{name}-%{version}-%{release}.%{arch}.rpm' '$deltarpm');
     }
     $rpm or return 0;
+    $rpm = $dir . '/' . $rpm;
     unlink $rpm;
     system($APPLYDELTARPM, '-vp', $deltarpm, $rpm);
     -e $rpm ? $rpm : '';
-- 
cgit v1.2.1