From 8cefa3749e16a274f6a277a57001e6f09ac1c0a4 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 1 Oct 2007 14:08:11 +0000 Subject: - don't keep noarch pkgs symlinked (to ../../../i586/media/main/xxx.rpm) when copying packages on disk --- perl-install/install/NEWS | 3 +++ perl-install/install/media.pm | 2 +- 2 files changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index fe3f98ade..b1fcb6b2a 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,3 +1,6 @@ +- don't keep noarch pkgs symlinked (to ../../../i586/media/main/xxx.rpm) + when copying packages on disk + Version 10.4.223 - 1 October 2007, by Pascal "Pixel" Rigaux - diskdrake: diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm index d889f9141..3a3da5601 100644 --- a/perl-install/install/media.pm +++ b/perl-install/install/media.pm @@ -872,7 +872,7 @@ sub copy_rpms_on_disk { my $total = install::any::count_files($rpmsdir); log::l("copying $rpmsdir to $::prefix$dest_dir ($total files)"); eval { - install::any::cp_with_progress($wait_message, 0, $total, $rpmsdir, "$::prefix$dest_dir"); + install::any::cp_with_progress_({}, $wait_message, $total, [$rpmsdir], "$::prefix$dest_dir"); }; log::l($@) if $@; -- cgit v1.2.1