X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=perl%2FAmanda%2FTests.pm;h=1a4c68c830cf27ffd9706a16e1287964bae6cbcc;hb=fd48f3e498442f0cbff5f3606c7c403d0566150e;hp=cdd4abd7d944bb305f4df5210585a512a9f46947;hpb=96f35b20267e8b1a1c846d476f27fcd330e0b018;p=debian%2Famanda

diff --git a/perl/Amanda/Tests.pm b/perl/Amanda/Tests.pm
index cdd4abd..1a4c68c 100644
--- a/perl/Amanda/Tests.pm
+++ b/perl/Amanda/Tests.pm
@@ -7,7 +7,6 @@
 package Amanda::Tests;
 use base qw(Exporter);
 use base qw(DynaLoader);
-require Amanda::Types;
 package Amanda::Testsc;
 bootstrap Amanda::Tests;
 package Amanda::Tests;
@@ -69,6 +68,7 @@ package Amanda::Tests;
 *sizeof_size_t = *Amanda::Testsc::sizeof_size_t;
 *write_random_file = *Amanda::Testsc::write_random_file;
 *verify_random_file = *Amanda::Testsc::verify_random_file;
+*try_threads = *Amanda::Testsc::try_threads;
 
 # ------- VARIABLE STUBS --------
 
@@ -78,14 +78,18 @@ package Amanda::Tests;
 @EXPORT_OK = ();
 %EXPORT_TAGS = ();
 
+
 =head1 NAME
 
 Amanda::Tests -- test functions for installchecks
 
 =head1 SYNOPSIS
 
-This module exists only to provide functions for installcheck scripts to call,
-mostly to test that various C-Perl interface techniques are working.
+This module exists only to provide functions for installcheck scripts
+to call, mostly to test that various C-Perl interface techniques are
+working.
 
 =cut
+
+
 1;