From 71164e5326401fb4152398479f3ca0c4db5e4956 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 27 Aug 2007 10:47:58 +0000
Subject: - fix summary in text mode (#32858)

(regression introduced by "User Management" which has no val)
---
 perl-install/install/NEWS                 | 1 +
 perl-install/install/steps_interactive.pm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 3c4795ea3..ed77d7d5a 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,4 @@
+- fix summary in text mode (#32858)
 - fix loading linux software raid (mdadm) kernel modules
   (after rename raid5&raid6 -> raid456)
 - diskdrake
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index e6bc8a1de..c7fcb8bf4 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -728,7 +728,7 @@ sub summary_prompt {
 
     foreach (@$l) {
 	my $val = $_->{val};
-	($_->{format}, $_->{val}) = (sub { $val->() || N("not configured") }, '');
+	($_->{format}, $_->{val}) = (sub { $val && $val->() || N("not configured") }, '');
     }
     
     $o->ask_from_({
-- 
cgit v1.2.1