diff options
Diffstat (limited to 'plugins-scripts/t')
-rw-r--r-- | plugins-scripts/t/check_rpc.t | 23 |
1 files changed, 13 insertions, 10 deletions
diff --git a/plugins-scripts/t/check_rpc.t b/plugins-scripts/t/check_rpc.t index afcb867c..9fff0ee9 100644 --- a/plugins-scripts/t/check_rpc.t +++ b/plugins-scripts/t/check_rpc.t @@ -1,19 +1,22 @@ +#! /usr/bin/perl -w -I .. +# +# Remote Procedure Call (RPC) Tests via check_rpc +# +# $Id$ +# + use strict; use Test; -use vars qw($tests); +use NPTest; +use vars qw($tests); BEGIN {$tests = 2; plan tests => $tests} -my $null = ''; -my $cmd; -my $str; -my $t=0; +my $successOutput = '/^check_rpc/'; + +my $t; -$cmd = "./check_rpc -V"; -$str = `$cmd`; -$t += ok $?>>8,0; -print "Test was: $cmd\n" if ($?); -$t += ok $str, '/^check_rpc/'; +$t += checkCmd( "./check_rpc -V", 0, $successOutput ); exit(0) if defined($Test::Harness::VERSION); exit($tests - $t); |