From 58d3711e3eeab1d8e79385f39e3f35d8cb770538 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 12 Mar 2004 11:39:22 +0000 Subject: provide a nice way to go back to summary when interface is already configured (#8002) --- perl-install/network/netconnect.pm | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index ec90bc116..10d3e1a3a 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -813,11 +813,20 @@ Modifying the fields below will override this configuration."), type => "yesorno", post => sub { my ($res) = @_; - die 'wizcancel' if !$res; - return "lan_protocol"; + return $res ? "lan_protocol" : "alrd_end"; } }, + + alrd_end => + { + name => N("Congratulations, the network and Internet configuration is finished. + +"), + end => 1, + }, + + lan_protocol => { pre => sub { -- cgit v1.2.1