diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-02-10 15:21:20 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-02-10 15:21:20 +0000 |
| commit | 9837fad1b71f1809b333c2adb49ee8f39adc55f4 (patch) | |
| tree | 7b2422be42f28eecf5508a1aae28452efbf9eb11 /perl-install/services.pm | |
| parent | 137e3dfba6e98d0b1b4319f2b908fe4ad1053586 (diff) | |
| download | drakx-9837fad1b71f1809b333c2adb49ee8f39adc55f4.tar drakx-9837fad1b71f1809b333c2adb49ee8f39adc55f4.tar.gz drakx-9837fad1b71f1809b333c2adb49ee8f39adc55f4.tar.bz2 drakx-9837fad1b71f1809b333c2adb49ee8f39adc55f4.tar.xz drakx-9837fad1b71f1809b333c2adb49ee8f39adc55f4.zip | |
for install, a service is on if there is at least one runlevel for which the
service is on (esp. for service "dm") (bugzilla #7146)
Diffstat (limited to 'perl-install/services.pm')
| -rw-r--r-- | perl-install/services.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm index 03374f22b..2c6fa1051 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -304,7 +304,7 @@ sub services() { my ($services, $xinetd_services) = services_raw(); my @l = @$xinetd_services; if ($::isInstall) { - push @l, map { [ $_->[0], @{$_->[1]} > 1 ] } @$services; + push @l, map { [ $_->[0], @{$_->[1]} > 0 ] } @$services; } else { my $runlevel = (split " ", `/sbin/runlevel`)[1]; push @l, map { [ $_->[0], member($runlevel, @{$_->[1]}) ] } @$services; |