diff options
Diffstat (limited to 'perl-install/services.pm')
| -rw-r--r-- | perl-install/services.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm index 7acb5cdbf..73949c6f0 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -346,9 +346,9 @@ sub xinetd_services() { local $ENV{LANGUAGE} = 'C'; my @xinetd_services; foreach (run_program::rooted_get_stdout($::prefix, '/sbin/chkconfig', '--list', '--type', 'xinetd')) { - if (my ($xinetd_name, $on_off) = m!^\t(\S+):\s*(on|off)!) { - push @xinetd_services, [ $xinetd_name, $on_off eq 'on' ]; - } + if (my ($xinetd_name, $on_off) = m!^\t(\S+):\s*(on|off)!) { + push @xinetd_services, [ $xinetd_name, $on_off eq 'on' ]; + } } @xinetd_services; } |