Changeset 8514 for lang/perl/Punc

Timestamp:

03/30/08 21:38:34 (8 months ago)

Author:

mizzy

Message:

lang/perl/Punc: fix mistake

Files:

• lang/perl/Punc/trunk/lib/Punc/Server/Module/Service/RedHat.pm (modified) (1 diff)

lang/perl/Punc/trunk/lib/Punc/Server/Module/Service/RedHat.pm

@@ -18 +18 @@
     my ( $self, $service, $command ) = @_;
     if ( -f "/etc/init.d/$service" ) {
-        `/sbin/service $service status`;
+        `/sbin/service $service $command`;
         return $?;
     }