From e0ac85418b44a743681d297f1b03e64bc7c13c0f Mon Sep 17 00:00:00 2001 From: damien Date: Thu, 13 Sep 2001 14:22:17 +0000 Subject: isdn timeout works now. --- perl-install/network/isdn.pm | 5 +++-- perl-install/standalone/draknet | 2 +- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index 006cbca23..dc2d11b50 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -89,8 +89,9 @@ sub isdn_write_config_backend { substInFile { s/EAZ =.*/EAZ = $isdn->{phone_in}/; s/PHONE_OUT =.*/PHONE_OUT = $isdn->{phone_out}/; -# s/HUPTIMEOUT =.*/HUPTIMEOUT = $isdn->{huptimeout}/; -# $a or s/HUPTIMEOUT =.*/HUPTIMEOUT = $isdn->{huptimeout}/, $a=1; + if (/NAME = ippp0/ .. /PPPBIND = 0/) { + s/HUPTIMEOUT =.*/HUPTIMEOUT = $isdn->{huptimeout}/; + } } "$prefix/etc/isdn/$f"; chmod 0600, $f; } diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet index 1ddca557b..7177f6e5f 100755 --- a/perl-install/standalone/draknet +++ b/perl-install/standalone/draknet @@ -601,7 +601,7 @@ Create one first by clicking on 'Configure'")),1,1,0); [_("Ethernet Card"), \$netc->{NET_DEVICE}, [ 'eth0', 'eth1', 'eth2', 'eth3', 'eth4', 'eth5','eth6', 'eth7', 'eth8', 'eth9' ]], [_("DHCP Client"), \$netcnx->{dhcp_client}, ["dhcpcd", "dhcpxd", "dhcp-client"] ], [_("Connection speed"), \$cnx->{speed}, ["64 Kb/s", "128 Kb/s"]], - [_("Connection timeout (in sec) [ beta, not yet implemented ]"), \$cnx->{huptimeout} ] + [_("Connection timeout (in sec)"), \$cnx->{huptimeout} ] ); foreach (@conf_data) { $infos[2*$i]=new Gtk::HBox(0,0); -- cgit v1.2.1