diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-20 11:58:32 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-20 11:58:32 +0000 |
commit | 2522aa67345a7f37d0050d70f341ab3a0b6165b0 (patch) | |
tree | 694d9d3a7409acf017a728cb653e2efcff785074 | |
parent | da279afeb837e7a711e0ba9bd4b5d1fee73608ef (diff) | |
download | perl-2522aa67345a7f37d0050d70f341ab3a0b6165b0.tar.gz |
Remove signature test, which is always skipped
p4raw-id: //depot/perl@24910
-rw-r--r-- | MANIFEST | 1 | ||||
-rw-r--r-- | lib/Test/Simple/t/00signature.t | 33 |
2 files changed, 0 insertions, 34 deletions
@@ -1940,7 +1940,6 @@ lib/Test.pm A simple framework for writing test scripts lib/Test/Simple/Changes Test::Simple changes lib/Test/Simple.pm Basic utility for writing tests lib/Test/Simple/README Test::Simple README -lib/Test/Simple/t/00signature.t Test::Simple test lib/Test/Simple/t/00test_harness_check.t Test::Simple test lib/Test/Simple/t/bad_plan.t Test::Builder plan() test lib/Test/Simple/t/buffer.t Test::Builder buffering test diff --git a/lib/Test/Simple/t/00signature.t b/lib/Test/Simple/t/00signature.t deleted file mode 100644 index 778faa3523..0000000000 --- a/lib/Test/Simple/t/00signature.t +++ /dev/null @@ -1,33 +0,0 @@ -#!/usr/bin/perl - -use strict; -use Test::More; - -if (!eval { require Module::Signature; 1 }) { - plan skip_all => - "Next time around, consider installing Module::Signature, ". - "so you can verify the integrity of this distribution."; -} -elsif ( !-e 'SIGNATURE' ) { - plan skip_all => "SIGNATURE not found"; -} -elsif ( -s 'SIGNATURE' == 0 ) { - plan skip_all => "SIGNATURE file empty"; -} -elsif (!eval { require Socket; Socket::inet_aton('pgp.mit.edu') }) { - plan skip_all => "Cannot connect to the keyserver to check module ". - "signature"; -} -else { - plan tests => 1; -} - -my $ret = Module::Signature::verify(); -SKIP: { - skip "Module::Signature cannot verify", 1 - if $ret eq Module::Signature::CANNOT_VERIFY() or - $ret eq Module::Signature::CIPHER_UNKNOWN(); - - cmp_ok $ret, '==', Module::Signature::SIGNATURE_OK(), "Valid signature"; -} - |