From 78394cace62c96002ef26594b09811d24ad968d1 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 6 Mar 2009 09:34:46 +0000 Subject: (packageCallbackChoices) explicitely log which package got selected --- perl-install/install/pkgs.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index d2ad5f7cc..a1fb298d6 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -155,7 +155,7 @@ sub packageCallbackChoices { } elsif (my @l = _packageCallbackChoices_($urpm, $choices, $virtual_pkg_name)) { @l; } else { - log::l("packageCallbackChoices: default choice from " . join(",", map { $_->name } @$choices) . " for $virtual_pkg_name"); + log::l("packageCallbackChoices: default choice ('" . $choices->[0]->name . "') from " . join(",", map { $_->name } @$choices) . " for $virtual_pkg_name"); $choices->[0]; } } -- cgit v1.2.1