- urpmi:

  o display "%s of packages will be retrieved."
    (need perl-URPM 3.10 and synthesis built with @filesize@)

2 files changed, 5 insertions, 2 deletions

diff --git a/NEWS b/NEWS
index 0e91d1ef..0475f59f 100644
--- a/NEWS
+++ b/NEWS
@@ -11,6 +11,8 @@
     download dir to cachedir)
   o handle variables $ARCH/$RELEASE in mirrorlist
 - urpmi:
+  o display "%s of packages will be retrieved."
+    (need perl-URPM 3.10 and synthesis built with @filesize@)
   o do not say "files are missing" when the downloaded rpm is corrupted
   o --test: only display "Installation is possible" when it is the case (#29837)
   o fix "using one big transaction" that occurs when using --keep 
diff --git a/urpmi b/urpmi
index 7a7cb24d..c77d1cc4 100755
--- a/urpmi
+++ b/urpmi
@@ -595,16 +595,17 @@ if (!$urpm->{options}{auto} && $ask_user && $urpm->{nb_install} || $env && !$opt
     if ($test) {
 	$msg = "$msg\n" . N("(test only, installation will not be actually done)");
     }
-    my $size = $urpm->selected_size($state);
+    my ($size, $filesize) = $urpm->selected_size_filesize($state);
 
     my @to_install_formatted = urpm::msg::format_line_selected_packages($urpm, $state, \@to_install);
     my $msg2 = $size >= 0 ? 
       N("%s of additional disk space will be used.", formatXiB($size)) :
       N("%s of disk space will be freed.", formatXiB(-$size));
+    my $msg2_ = $filesize ? N("%s of packages will be retrieved.", formatXiB($filesize)) . "\n" : '';
     my $msg3 = P("Proceed with the installation of one package?",
     		"Proceed with the installation of the %d packages?",
 		$urpm->{nb_install}, $urpm->{nb_install});
-    my $p = join("\n", $msg, @to_install_formatted, $msg2, $msg3);
+    my $p = join("\n", $msg, @to_install_formatted, $msg2, $msg2_ . $msg3);
     if ($env && !$options{debug__do_not_install}) {
 	print "$p\n";
 	exit 0; #- exit now for specific environment.