diff options
author | Lorry Tar Creator <lorry-tar-importer@lorry> | 2012-10-19 21:35:48 +0000 |
---|---|---|
committer | Lorry Tar Creator <lorry-tar-importer@lorry> | 2012-10-19 21:35:48 +0000 |
commit | d08b8685307cd5e8980f3c9409d4b3c1d06b2c24 (patch) | |
tree | 30c354e50c1fd36e567bce95d686ab786cd83fff /t/01_compile.t | |
download | File-HomeDir-tarball-d08b8685307cd5e8980f3c9409d4b3c1d06b2c24.tar.gz |
File-HomeDir-1.00HEADFile-HomeDir-1.00master
Diffstat (limited to 't/01_compile.t')
-rw-r--r-- | t/01_compile.t | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/t/01_compile.t b/t/01_compile.t new file mode 100644 index 0000000..44b7335 --- /dev/null +++ b/t/01_compile.t @@ -0,0 +1,37 @@ +#!/usr/bin/perl + +# Compile-testing for File::HomeDir + +use strict; +BEGIN { + $| = 1; + $^W = 1; +} +use File::Spec::Functions ':ALL'; + +use Test::More tests => 11; + +# This module is destined for the core. +# Please do NOT use convenience modules +# use English; <-- don't do this + +ok( $] > 5.00503, 'Perl version is 5.005 or newer' ); + +use_ok( 'File::HomeDir::Driver' ); +use_ok( 'File::HomeDir::Unix' ); +use_ok( 'File::HomeDir::FreeDesktop' ); +use_ok( 'File::HomeDir::Darwin' ); +use_ok( 'File::HomeDir::Darwin::Carbon' ); +use_ok( 'File::HomeDir::Darwin::Cocoa' ); +use_ok( 'File::HomeDir::Windows' ); +use_ok( 'File::HomeDir::MacOS9' ); +use_ok( 'File::HomeDir' ); + +ok( defined &home, 'Using File::HomeDir exports home()' ); + +# Note the driver we are using for the purposes of +# understanding CPAN Testers failure reports. +diag( "Implemented by: $File::HomeDir::IMPLEMENTED_BY" ); + +# Prevent a warning +$File::HomeDir::IMPLEMENTED_BY = $File::HomeDir::IMPLEMENTED_BY; |