From 88144056446c41756b2b73f0eb04128f68d5c5aa Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 20 Jan 2004 14:46:20 +0000 Subject: rename ppp_choose as ppp_account --- perl-install/network/netconnect.pm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index cc702070a..6d87e3edc 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -321,7 +321,7 @@ If you don't want to use the auto detection, deselect the checkbox. $netcnx->{isdn_external}{special_command} = 'AT&F&O2B40'; require network::modem; $modem = $netcnx->{isdn_external}; - return "ppp_choose"; + return "ppp_account"; }; }, @@ -376,7 +376,7 @@ Take a look at http://www.linmodems.org"), $ntf_name = $netc->{autodetect}{modem}{$modem_name}{device} || $netc->{autodetect}{modem}{$modem_name}{description}; print "Interface is $ntf_name\n"; - return "ppp_choose" if $ntf_name =~ m!^/dev/!; + return "ppp_account" if $ntf_name =~ m!^/dev/!; return "choose_serial_port" if !$ntf_name; my %relocations = (ltmodem => $in->do_pkgs->check_kernel_module_packages('ltmodem')); @@ -398,7 +398,7 @@ Take a look at http://www.linmodems.org"), #$type eq 'ltmodem' and $netc->{autodetect}{modem} = '/dev/ttyS14'; #- fallback to modem configuration (beware to never allow test it). - return "ppp_choose"; + return "ppp_account"; }, }, @@ -414,10 +414,10 @@ Take a look at http://www.linmodems.org"), [ { var => \$modem->{device}, format => \&mouse::serial_port2text, type => "list", list => [ grep { $_ ne $o_mouse->{device} } (if_(-e '/dev/modem', '/dev/modem'), mouse::serial_ports()) ] } ], }, - next => "ppp_choose", + next => "ppp_account", }, - ppp_choose => + ppp_account => { pre => sub { $mouse ||= {}; -- cgit v1.2.1