added ping store and refactored common code
[APKPM.git] / t / Store.t
index 7d1382e..465e7de 100755 (executable)
--- a/t/Store.t
+++ b/t/Store.t
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 3;
+use Test::More tests => 4;
 use Data::Dump qw(dump);
 
 use lib 'lib';
@@ -27,5 +27,11 @@ ADSL => {
        TX     => 798,
 }
 }), 'ADSL';
+diag dump($r);
 
+ok my $r = $o->ping('job',{
+ip => '127.0.0.1',
+username => 'nobody',
+rtt => 0.042,
+}), 'ping';
 diag dump($r);