Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Make 07-thread.t fail correctly where perl isn't compiled with thread…

… support.

git-svn-id: svn://localhost/Crypt-GCrypt/trunk@63 c2f821fb-fd85-dc11-8383-000bcdcb7a8f
  • Loading branch information...
commit 73541df8b4dc7fccbc1cddeb15a79bebd8ab4677 1 parent b696829
al authored
Showing with 5 additions and 4 deletions.
  1. +3 −0  Changelog
  2. +1 −1  META.yml
  3. +1 −3 t/07-thread.t
View
3  Changelog
@@ -1,3 +1,6 @@
+ - fixes to make 07-thread.t pass (or skip) regardless of thread support
+ or libgcrypt version
+
version 1.23_02 (2009/11/24):
- 07-thread.t now passes on MacOS X (dkg)
View
2  META.yml
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Crypt-GCrypt
-version: 1.23_01
+version: 1.23_02
version_from: lib/Crypt/GCrypt.pm
installdirs: site
requires:
View
4 t/07-thread.t
@@ -15,9 +15,7 @@ use Crypt::GCrypt;
my @algos = qw(aes twofish blowfish arcfour cast5 des serpent seed);
my @available_algos;
-if ($Config{useithreads}) {
- use threads;
- use Thread::Queue;
+if ($Config{useithreads} && eval "use threads; use Thread::Queue; 1") {
# test as many algorithms as we have.
@available_algos = grep Crypt::GCrypt::cipher_algo_available($_), @algos;
plan tests => 3 * @available_algos;
Please sign in to comment.
Something went wrong with that request. Please try again.