r1959 - in packages/libfile-remove-perl/branches/upstream/current:
. lib/File t
Gunnar Wolf
gwolf at costa.debian.org
Tue Jan 17 00:30:34 UTC 2006
Author: gwolf
Date: 2006-01-17 00:30:29 +0000 (Tue, 17 Jan 2006)
New Revision: 1959
Added:
packages/libfile-remove-perl/branches/upstream/current/SIGNATURE
Modified:
packages/libfile-remove-perl/branches/upstream/current/CHANGES
packages/libfile-remove-perl/branches/upstream/current/MANIFEST
packages/libfile-remove-perl/branches/upstream/current/META.yml
packages/libfile-remove-perl/branches/upstream/current/Makefile.PL
packages/libfile-remove-perl/branches/upstream/current/lib/File/Remove.pm
packages/libfile-remove-perl/branches/upstream/current/t/1_directories.t
Log:
Load /tmp/tmp.YBqSEp/libfile-remove-perl-0.31 into
packages/libfile-remove-perl/branches/upstream/current.
Modified: packages/libfile-remove-perl/branches/upstream/current/CHANGES
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/CHANGES 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/CHANGES 2006-01-17 00:30:29 UTC (rev 1959)
@@ -1,5 +1,9 @@
Revision history for Perl extension File::Remove.
+0.31 Wed Dec 28 17:40:00 2005
+ - Applied Eric Hanchrow's patch to support filenames with spaces.
+ - Skip recycle tests unless recycle/trash support is available.
+
0.30 Wed Jul 14 19:12:00 2005
- Applied CNANDOR's patch to fix trash() support on OS X 10.4.
Modified: packages/libfile-remove-perl/branches/upstream/current/MANIFEST
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/MANIFEST 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/MANIFEST 2006-01-17 00:30:29 UTC (rev 1959)
@@ -1,8 +1,9 @@
-Changes
+CHANGES
MANIFEST
Makefile.PL
README
lib/File/Remove.pm
META.yml Module meta-data (added by MakeMaker)
+SIGNATURE
t/0_use.t
t/1_directories.t
Modified: packages/libfile-remove-perl/branches/upstream/current/META.yml
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/META.yml 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/META.yml 2006-01-17 00:30:29 UTC (rev 1959)
@@ -1,10 +1,11 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: File-Remove
-version: 0.30
+version: 0.31
version_from: lib/File/Remove.pm
installdirs: site
requires:
+ File::Glob: 0
File::Spec: 0.84
distribution_type: module
Modified: packages/libfile-remove-perl/branches/upstream/current/Makefile.PL
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/Makefile.PL 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/Makefile.PL 2006-01-17 00:30:29 UTC (rev 1959)
@@ -6,6 +6,7 @@
VERSION_FROM => 'lib/File/Remove.pm', # finds $VERSION
PREREQ_PM => {
'File::Spec' => 0.84,
+ 'File::Glob' => 0,
}, # e.g., Module::Name => 1.1
($] >= 5.005 ? ## Add these new keywords supported since 5.005
(ABSTRACT_FROM => 'lib/File/Remove.pm', # retrieve abstract from module
Added: packages/libfile-remove-perl/branches/upstream/current/SIGNATURE
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/SIGNATURE 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/SIGNATURE 2006-01-17 00:30:29 UTC (rev 1959)
@@ -0,0 +1,31 @@
+This file contains message digests of all files listed in MANIFEST,
+signed via the Module::Signature module, version 0.50.
+
+To verify the content in this distribution, first make sure you have
+Module::Signature installed, then type:
+
+ % cpansign -v
+
+It will check each file's integrity, as well as the signature's
+validity. If "==> Signature verified OK! <==" is not displayed,
+the distribution may already have been compromised, and you should
+not run its Makefile.PL or Build.PL.
+
+-----BEGIN PGP SIGNED MESSAGE-----
+Hash: SHA1
+
+SHA1 0ea142a9a9ad44fa215b792e8e650b2e236dd4b2 CHANGES
+SHA1 15a586b905e363b59c8b30dbe7de089f0b9a5564 MANIFEST
+SHA1 4aee3241005744e00d9df3009c87a4edba39e4c5 META.yml
+SHA1 41b4686728b88fcddc06571e8675451b4395716b Makefile.PL
+SHA1 0bf2c8fb1da44bbc551e1854a477f19f12f0fcc6 README
+SHA1 f380d4019777bfc64553e8d76fb147211b0122b1 lib/File/Remove.pm
+SHA1 4c46e1f7842b90c40055518850752e7924381cad t/0_use.t
+SHA1 b8b1ea47a3070a321788340cef3266742f7e0aa0 t/1_directories.t
+-----BEGIN PGP SIGNATURE-----
+Version: GnuPG v1.4.1 (Darwin)
+
+iD8DBQFDs0MfCV/r5CcpuVoRAjzEAJ0SoGFmcslV8JPM8L8ZqjeY4fXRtgCfVKiY
+o0g/IYr+Fref6DzEj3rWV/8=
+=KABd
+-----END PGP SIGNATURE-----
Modified: packages/libfile-remove-perl/branches/upstream/current/lib/File/Remove.pm
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/lib/File/Remove.pm 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/lib/File/Remove.pm 2006-01-17 00:30:29 UTC (rev 1959)
@@ -103,19 +103,15 @@
use File::Spec;
use File::Path qw(rmtree);
+use File::Glob qw(bsd_glob);
-$VERSION = '0.30';
+$VERSION = '0.31';
our $glue;
sub expand (@)
{
- my @args;
-
- for (@_) {
- push @args, glob;
- }
- @args;
+ map { bsd_glob $_ } @_;
}
# acts like unlink would until given a directory as an argument, then
Modified: packages/libfile-remove-perl/branches/upstream/current/t/1_directories.t
===================================================================
--- packages/libfile-remove-perl/branches/upstream/current/t/1_directories.t 2006-01-17 00:30:18 UTC (rev 1958)
+++ packages/libfile-remove-perl/branches/upstream/current/t/1_directories.t 2006-01-17 00:30:29 UTC (rev 1959)
@@ -92,18 +92,17 @@
}
}
-TODO: {
- local $TODO;
+SKIP: {
if ($^O eq 'darwin') {
eval 'use Mac::Glue ();';
- $TODO = "Undelete support requires Mac::Glue" if length $@;
+ skip "Undelete support requires Mac::Glue", 0 if length $@;
eval 'use Mac::Glue::Finder ();';
- $TODO = "Undelete support requires Mac::Glue::Finder" if length $@;
+ skip "Undelete support requires Mac::Glue::Finder", 0 if length $@;
} elsif ($^O eq 'cygwin' || $^O =~ /^MSWin/) {
eval 'use Win32::FileOp::Recycle;';
- $TODO = "Undelete support requires Win32::FileOp::Recycle" if length $@;
+ skip "Undelete support requires Win32::FileOp::Recycle", 0 if length $@;
} else {
- $TODO = "Undelete support not available by default";
+ skip "Undelete support not available by default", 0;
}
for my $path (@dirs) {
More information about the Pkg-perl-cvs-commits
mailing list