Author: petdance
Date: Sat Dec 20 22:26:45 2008
New Revision: 34187
Modified:
trunk/config/auto/pcre.pm
trunk/config/inter/libparrot.pm
trunk/lib/Parrot/IO/Directory.pm
trunk/lib/Parrot/IO/File.pm
trunk/lib/Parrot/IO/Path.pm
trunk/lib/Parrot/Pmc2c/Pmc2cMain.pm
trunk/lib/Parrot/Test/APL.pm
trunk/lib/Parrot/Test/PIR_PGE.pm
trunk/lib/Parrot/Test/Punie.pm
Log:
explicitly include File::Spec where it is used, rather than assuming another
module will pull it in
Modified: trunk/config/auto/pcre.pm
==============================================================================
--- trunk/config/auto/pcre.pm (original)
+++ trunk/config/auto/pcre.pm Sat Dec 20 22:26:45 2008
@@ -15,7 +15,6 @@
use strict;
use warnings;
-use File::Spec;
use base qw(Parrot::Configure::Step);
Modified: trunk/config/inter/libparrot.pm
==============================================================================
--- trunk/config/inter/libparrot.pm (original)
+++ trunk/config/inter/libparrot.pm Sat Dec 20 22:26:45 2008
@@ -19,6 +19,7 @@
use base qw(Parrot::Configure::Step);
+use File::Spec ();
use Parrot::Configure::Utils ':inter';
Modified: trunk/lib/Parrot/IO/Directory.pm
==============================================================================
--- trunk/lib/Parrot/IO/Directory.pm (original)
+++ trunk/lib/Parrot/IO/Directory.pm Sat Dec 20 22:26:45 2008
@@ -28,7 +28,7 @@
use DirHandle;
use File::Path;
-use File::Spec;
+use File::Spec ();
use Parrot::IO::File;
=item C<directory_class()>
Modified: trunk/lib/Parrot/IO/File.pm
==============================================================================
--- trunk/lib/Parrot/IO/File.pm (original)
+++ trunk/lib/Parrot/IO/File.pm Sat Dec 20 22:26:45 2008
@@ -27,6 +27,7 @@
use base qw( Parrot::IO::Path );
use FileHandle;
+use File::Spec ();
use Parrot::IO::Directory;
=item C<tmp_file($path)>
Modified: trunk/lib/Parrot/IO/Path.pm
==============================================================================
--- trunk/lib/Parrot/IO/Path.pm (original)
+++ trunk/lib/Parrot/IO/Path.pm Sat Dec 20 22:26:45 2008
@@ -25,7 +25,7 @@
use warnings;
use File::Path;
-use File::Spec;
+use File::Spec ();
# qw() to avoid the export because we have a stat() method.
use File::stat qw();
Modified: trunk/lib/Parrot/Pmc2c/Pmc2cMain.pm
==============================================================================
--- trunk/lib/Parrot/Pmc2c/Pmc2cMain.pm (original)
+++ trunk/lib/Parrot/Pmc2c/Pmc2cMain.pm Sat Dec 20 22:26:45 2008
@@ -19,6 +19,7 @@
use Parrot::Pmc2c::PMC::SharedRef ();
use Parrot::Pmc2c::PMC::STMRef ();
use Parrot::Pmc2c::PMC::Object ();
+use File::Spec ();
use Carp;
$SIG{'__WARN__'} = sub { use Carp; warn $_[0]; Carp::confess; };
Modified: trunk/lib/Parrot/Test/APL.pm
==============================================================================
--- trunk/lib/Parrot/Test/APL.pm (original)
+++ trunk/lib/Parrot/Test/APL.pm Sat Dec 20 22:26:45 2008
@@ -2,12 +2,13 @@
package Parrot::Test::APL;
-# Copyright (C) 2006-2007, The Perl Foundation.
+# Copyright (C) 2006-2008, The Perl Foundation.
use strict;
use warnings;
use File::Basename;
+use File::Spec ();
=head1 NAME
Modified: trunk/lib/Parrot/Test/PIR_PGE.pm
==============================================================================
--- trunk/lib/Parrot/Test/PIR_PGE.pm (original)
+++ trunk/lib/Parrot/Test/PIR_PGE.pm Sat Dec 20 22:26:45 2008
@@ -1,6 +1,6 @@
# $Id$
-# Copyright (C) 2007, The Perl Foundation.
+# Copyright (C) 2007-2008, The Perl Foundation.
package Parrot::Test::PIR_PGE;
@@ -8,6 +8,7 @@
use warnings;
use File::Basename;
+use File::Spec ();
=head1 NAME
Modified: trunk/lib/Parrot/Test/Punie.pm
==============================================================================
--- trunk/lib/Parrot/Test/Punie.pm (original)
+++ trunk/lib/Parrot/Test/Punie.pm Sat Dec 20 22:26:45 2008
@@ -8,6 +8,7 @@
use warnings;
use File::Basename;
+use File::Spec ();
=head1 NAME
