diff options
-rw-r--r-- | perl-install/network/isdn.pm | 1 | ||||
-rw-r--r-- | perl-install/network/netconnect.pm | 5 |
2 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm index 2c03cef31..e4f0ac49a 100644 --- a/perl-install/network/isdn.pm +++ b/perl-install/network/isdn.pm @@ -43,6 +43,7 @@ I4L_IO0="$isdn->{io0}" I4L_IO1="$isdn->{io1}" I4L_ID="HiSax" I4L_FIRMWARE="$isdn->{firmware}" +I4L_PROTOCOL="$isdn->{protocol}" ); output "$::prefix/etc/ppp/ioptions", diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 76f7fbcc1..60651ae4c 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -424,7 +424,10 @@ If you have a PCMCIA card, you have to know the \"irq\" and \"io\" of your card. { label => N("Protocol"), type => "list", val => \$isdn_type, list => [ keys %isdn_protocols ], format => sub { $isdn_protocols{$_[0]} } } ], - next => "isdn_db", + post => sub { + $isdn->{protocol} = $isdn_type; + return "isdn_db", + } }, |