diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-01 00:38:01 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-24 23:28:13 +0100 |
commit | 7452efe684fbb35d5d3095c9c2b384fbaca9944f (patch) | |
tree | db6593739ac86dfbe05ab1a554065c731a946ac5 /perl-install | |
parent | bfeb73548c5dbbc05bc2f0cc0621104921b6b094 (diff) | |
download | drakx-7452efe684fbb35d5d3095c9c2b384fbaca9944f.tar drakx-7452efe684fbb35d5d3095c9c2b384fbaca9944f.tar.gz drakx-7452efe684fbb35d5d3095c9c2b384fbaca9944f.tar.bz2 drakx-7452efe684fbb35d5d3095c9c2b384fbaca9944f.tar.xz drakx-7452efe684fbb35d5d3095c9c2b384fbaca9944f.zip |
drop Jazz option (dead for years)
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/harddrake2 | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 6bb33dc25..03c86c759 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -184,7 +184,6 @@ my %menus = ( my %menu_options = ( 'MODEMS_DETECTION' => [ $menus{options}, N("/Autodetect _modems") ], - 'JAZZ_DETECTION' => [ $menus{options}, N("/Autodetect _jaz drives") ], 'PARALLEL_ZIP_DETECTION' => [ $menus{options}, N("/Autodetect parallel _zip drives") ], ); @@ -199,8 +198,6 @@ my @menu_items = [ N("/_File") . N("/_Quit"), N("<control>Q"), \&quit_global, undef, '<Item>' ], [ join('', @{$menu_options{MODEMS_DETECTION}}), undef, sub { $options{MODEMS_DETECTION} = $check_boxes{MODEMS_DETECTION}->get_active }, undef, '<CheckItem>' ], - [ join('', @{$menu_options{JAZZ_DETECTION}}), undef, - sub { $options{JAZZ_DETECTION} = $check_boxes{JAZZ_DETECTION}->get_active }, undef, '<CheckItem>' ], [ join('', @{$menu_options{PARALLEL_ZIP_DETECTION}}), undef, sub { $options{PARALLEL_ZIP_DETECTION} = $check_boxes{PARALLEL_ZIP_DETECTION}->get_active }, undef, '<CheckItem>' ], [ $menus{help}, undef, undef, undef, '<Branch>' ], @@ -387,7 +384,6 @@ foreach my $hw_class (@harddrake::data::tree) { my ($Ident, $title, $icon, $configurator, $detector) = @$hw_class{qw(class string icon configurator detector)}; next if ref($detector) ne "CODE"; #skip class witouth detector next if $Ident =~ /MODEM/ && $::testing; - next if $Ident =~ /JAZZ/ && !$options{JAZZ_DETECTION}; $detect_devices::detect_serial_modem = 0 if $Ident =~ /MODEM/ && !$options{MODEMS_DETECTION}; my @devices = $detector->(\%options); |