diff options
| author | damien <damien@mandriva.com> | 2001-08-06 21:54:27 +0000 |
|---|---|---|
| committer | damien <damien@mandriva.com> | 2001-08-06 21:54:27 +0000 |
| commit | 717035c00560891bbb41c9364ea6be10a64fbe12 (patch) | |
| tree | 649d4662eb85967bd19434d0d8300ef807db60c9 /perl-install/network/isdn.pm | |
| parent | b684ed467490ecc1eda1fdc3048e9dc6ab4a390f (diff) | |
| download | drakx-717035c00560891bbb41c9364ea6be10a64fbe12.tar drakx-717035c00560891bbb41c9364ea6be10a64fbe12.tar.gz drakx-717035c00560891bbb41c9364ea6be10a64fbe12.tar.bz2 drakx-717035c00560891bbb41c9364ea6be10a64fbe12.tar.xz drakx-717035c00560891bbb41c9364ea6be10a64fbe12.zip | |
debugging, profile coding, isdn 128 debugging
Diffstat (limited to 'perl-install/network/isdn.pm')
| -rw-r--r-- | perl-install/network/isdn.pm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index fd96f10c2..af5f90630 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -60,7 +60,8 @@ We recommand the light configuration. } run_program::rooted($prefix, "rpm", "-e", "$rmpackage"); $install->($instpackage, if_($isdn->{speed} =~ /128/, 'ibod'), 'isdn4k-utils'); - isdn_write_config_backend($isdn, $e =~ /light/, $netc); + my $light = $e =~ /light/ ? 1 : 0; + isdn_write_config_backend($isdn, $light, $netc); 1; } @@ -94,14 +95,15 @@ sub isdn_write_config_backend { symlinkf("ioptions" . $bundle, "$prefix/etc/ppp/ioptions"); } else { my $f = "$prefix/etc/isdn/profile/link/myisp"; - output $f, + output ($f, qq( I4L_USERNAME="$isdn->{login}" I4L_SYSNAME="" I4L_LOCALMSN="$isdn->{phone_in}" I4L_REMOTE_OUT="$isdn->{phone_out}" I4L_DIALMODE="$isdn->{dialing_mode}" -); +) . if_($isdn->{speed} =~ /128/, 'SLAVE="ippp1" +')); chmod 0600, $f; output "$prefix/etc/isdn/profile/card/mycard", @@ -134,11 +136,13 @@ defaultroute /sbin/route del default /sbin/ifup ippp0 /sbin/isdnctrl dial ippp0 -", +" . if_($isdn->{speed} =~ /128/, "service ibod restart +"), "#!/bin/bash /sbin/isdnctrl hangup ippp0 /sbin/ifdown ippp0 -"); +" . if_($isdn->{speed} =~ /128/, "service ibod stop +")); 1; } |