From: erickson Date: Mon, 15 Sep 2008 19:33:48 +0000 (+0000) Subject: removed extra parens and unnecessary if test X-Git-Tag: osrf_rel_2_0_1~565 X-Git-Url: https://git.evergreen-ils.org/?p=OpenSRF.git;a=commitdiff_plain;h=579acc601aca295ee7b58ef399cf91a5af06d5b2 removed extra parens and unnecessary if test git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1429 9efc2488-bf62-4759-914b-345cdb29e865 --- diff --git a/bin/opensrf-perl.pl b/bin/opensrf-perl.pl index 40b37dd..66c5d1b 100755 --- a/bin/opensrf-perl.pl +++ b/bin/opensrf-perl.pl @@ -87,10 +87,8 @@ sub do_init { if($apps) { $apps = [$apps] unless ref $apps; for my $app (@$apps) { - if($app eq $service) { - push(@hosted_services, $app) - if $sclient->config_value('apps', $app, 'language') =~ /perl/i); - } + push(@hosted_services, $app) + if $sclient->config_value('apps', $app, 'language') =~ /perl/i; } } } @@ -118,7 +116,7 @@ sub do_start { } sub do_start_all { - do_start('opensrf.settings') if grep {$_ eq 'opensrf.settings'} @hosted_services); + do_start('opensrf.settings') if grep {$_ eq 'opensrf.settings'} @hosted_services; for my $service (@hosted_services) { do_start($service) unless $service eq 'opensrf.settings'; }