diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-13 10:36:59 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-02-13 10:36:59 +0000 |
| commit | 4400241314d963c03bdd072e407285ae4110be2a (patch) | |
| tree | 935a12c8fb1ea3335af72e36bcebdc59376a505d /perl-install | |
| parent | f378b1e1cb1ff19b5730850e3790ec6fbcda76a1 (diff) | |
| download | drakx-backup-do-not-use-4400241314d963c03bdd072e407285ae4110be2a.tar drakx-backup-do-not-use-4400241314d963c03bdd072e407285ae4110be2a.tar.gz drakx-backup-do-not-use-4400241314d963c03bdd072e407285ae4110be2a.tar.bz2 drakx-backup-do-not-use-4400241314d963c03bdd072e407285ae4110be2a.tar.xz drakx-backup-do-not-use-4400241314d963c03bdd072e407285ae4110be2a.zip | |
(start_service_on_boot) prevent copying this style
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/services.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/services.pm b/perl-install/services.pm index 86b3a35c9..de2a961ef 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -337,14 +337,12 @@ sub starts_on_boot { sub start_service_on_boot ($) { my ($service) = @_; - run_program::rooted($::prefix, "/sbin/chkconfig", "--add", $service) - or return 0; - return 1; + run_program::rooted($::prefix, "/sbin/chkconfig", "--add", $service) ? 1 : 0; } sub do_not_start_service_on_boot ($) { my ($service) = @_; - run_program::rooted($::prefix, "/sbin/chkconfig", "--del", $service) ? 0 : 1; + run_program::rooted($::prefix, "/sbin/chkconfig", "--del", $service) ? 1 : 0; } 1; |