diff options
| author | Olivier Blin <oblin@mandriva.org> | 2005-02-25 16:34:04 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.org> | 2005-02-25 16:34:04 +0000 |
| commit | 7f48b119baa54b4bfd3dc1fe82538ced79fc797c (patch) | |
| tree | d0ba3579f0e93e6de25fa47bca450c9f9b9e4a9b /perl-install | |
| parent | 9f14eac49d35751642ad0cd49fe6d3c2ab9d9d6f (diff) | |
| download | drakx-7f48b119baa54b4bfd3dc1fe82538ced79fc797c.tar drakx-7f48b119baa54b4bfd3dc1fe82538ced79fc797c.tar.gz drakx-7f48b119baa54b4bfd3dc1fe82538ced79fc797c.tar.bz2 drakx-7f48b119baa54b4bfd3dc1fe82538ced79fc797c.tar.xz drakx-7f48b119baa54b4bfd3dc1fe82538ced79fc797c.zip | |
allow to enable USERCTL
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/netconnect.pm | 17 |
1 files changed, 16 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 98cf34770..1b313c827 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -215,7 +215,7 @@ sub real_main { require Data::Dumper; output("$::prefix/etc/sysconfig/drakconnect", Data::Dumper->Dump([ $config ], [ '$p' ])); } - return $goto_start_on_boot_ifneeded->(); + return "allow_user_ctl"; }; my $handle_multiple_cnx = sub { @@ -1294,6 +1294,21 @@ It is not necessary on most networks."), }, + allow_user_ctl => + { + name => N("Do you want to allow users to start the connection?"), + type => "yesorno", + default => sub { bool2yesno(text2bool($intf->{$netc->{NET_INTERFACE}}{USERCTL})) }, + post => sub { + my ($res) = @_; + use Data::Dumper; + print Dumper($intf, $netc); + $intf->{$netc->{NET_INTERFACE}}{USERCTL} = bool2yesno($res); + return $goto_start_on_boot_ifneeded->(); + }, + }, + + network_on_boot => { pre => sub { |