diff options
author | damien <damien@mandriva.com> | 2000-08-18 00:51:26 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2000-08-18 00:51:26 +0000 |
commit | 774c58ace31a6fe39478f45d9efc8afe1df377cb (patch) | |
tree | 3cb6c60bfa794fb181d8d4f2407cb633bb52fff8 /perl-install | |
parent | 4b1a0158c98d0e35c0a4a75ba3e6dac636b22bc8 (diff) | |
download | drakx-774c58ace31a6fe39478f45d9efc8afe1df377cb.tar drakx-774c58ace31a6fe39478f45d9efc8afe1df377cb.tar.gz drakx-774c58ace31a6fe39478f45d9efc8afe1df377cb.tar.bz2 drakx-774c58ace31a6fe39478f45d9efc8afe1df377cb.tar.xz drakx-774c58ace31a6fe39478f45d9efc8afe1df377cb.zip |
see changelog.
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/ChangeLog | 6 | ||||
-rw-r--r-- | perl-install/install_steps_interactive.pm | 2 | ||||
-rw-r--r-- | perl-install/modules.pm | 5 |
3 files changed, 11 insertions, 2 deletions
diff --git a/perl-install/ChangeLog b/perl-install/ChangeLog index 68517d30a..03a79a4dc 100644 --- a/perl-install/ChangeLog +++ b/perl-install/ChangeLog @@ -1,3 +1,9 @@ +2000-08-18 dam's <damien@mandrakesoft.com> + + * modules.pm: added isdn type in @drivers_by_category. corrected + load_thiskind (thx pixel) : it's not unsafe anymore + * Netconnect.pm: just display PCI isdn card recognized. + 2000-08-17 Pixel <pixel@mandrakesoft.com> * install_any.pm: many cleanup. moved some functions to common, diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index 5664b4d0c..988945cd5 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -501,7 +501,7 @@ such as ``mybox.mylab.myco.com''."), #- (dam's) if (!$::beginner && $o->ask_yesorno([ _("Modem Configuration") ], _("Do you want to configure a ISDN connection for your system?"), 0)) { - Netconnect::isdn($o->{prefix}, $o->{netc}, $o, bool($o->{pcmcia})); + Netconnect::isdn($o->{prefix}, $o->{isdn}, $o, bool($o->{pcmcia})); } } diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 9fc52570e..56b04629a 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -96,6 +96,9 @@ arch() =~ /^sparc/ ? ( "parport_pc" => "parport_pc", "sunrpc" => "sunrpc", }], +[ 'isdn', { + "hisax" => "hisax", +}], [ 'scsi', { arch() =~ /^sparc/ ? ( "qlogicpti" => "Performance Technologies ISP", @@ -524,7 +527,7 @@ sub load_thiskind($;&$) { my ($type, $f, $pcic) = @_; my %loaded_text; - my @devs = detect_devices::matching_type($type, $pcic); + my @devs = grep { my $l = $drivers{$_->{driver}}; $l && $l->{type} eq $type } detect_devices::probeall('', $pcip); log::l("probe found " . scalar @devs . " $type devices"); my %devs; foreach (@devs) { |