X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fgroupsecret;a=blobdiff_plain;f=t%2F02-file.t;h=ea85144ba574e02af171b0a992c864b88be8ac4c;hp=2976d924b24005e367b40779c7c0952a2a9e5899;hb=651eb10c00a0688013d597da9e9218f97b3a9bc4;hpb=ac76dab2d994d3de86fb59c1ffac0a01bcebbac8 diff --git a/t/02-file.t b/t/02-file.t index 2976d92..ea85144 100644 --- a/t/02-file.t +++ b/t/02-file.t @@ -28,16 +28,20 @@ is_deeply $empty->info, { is $empty->secret, undef, 'empty secret is undef'; is $empty->version, 1, 'empty version is one'; -my $key1 = $empty->add_key("$Bin/keys/foo_rsa.pub"); -is_deeply $key1, { - comment => 'foo', - filename => 'foo_rsa.pub', - secret_passphrase => undef, - type => 'rsa', -}, 'add_key in scalar context works'; - -$empty->delete_key('89b3fb766cf9568ea81adfba1cba7d05'); -is_deeply $empty->keys, {}, 'file is empty again after delete_key'; +SKIP: { + skip 'requires ssh-keygen', 2; + + my $key1 = $empty->add_key("$Bin/keys/foo_rsa.pub"); + is_deeply $key1, { + comment => 'foo', + filename => 'foo_rsa.pub', + secret_passphrase => undef, + type => 'rsa', + }, 'add_key in scalar context works'; + + $empty->delete_key('89b3fb766cf9568ea81adfba1cba7d05'); + is_deeply $empty->keys, {}, 'file is empty again after delete_key'; +}; my $basic = App::GroupSecret::File->new("$Bin/keyfiles/basic.yml");