r38938 - in /branches/upstream/libfile-temp-perl/current: META.yml README Temp.pm t/fork.t
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Mon Jun 29 18:04:41 UTC 2009
Author: jawnsy-guest
Date: Mon Jun 29 18:04:29 2009
New Revision: 38938
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=38938
Log:
[svn-upgrade] Integrating new upstream version, libfile-temp-perl (0.22)
Modified:
branches/upstream/libfile-temp-perl/current/META.yml
branches/upstream/libfile-temp-perl/current/README
branches/upstream/libfile-temp-perl/current/Temp.pm
branches/upstream/libfile-temp-perl/current/t/fork.t
Modified: branches/upstream/libfile-temp-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-temp-perl/current/META.yml?rev=38938&op=diff
==============================================================================
--- branches/upstream/libfile-temp-perl/current/META.yml (original)
+++ branches/upstream/libfile-temp-perl/current/META.yml Mon Jun 29 18:04:29 2009
@@ -1,23 +1,14 @@
---- #YAML:1.0
-name: File-Temp
-version: 0.21
-abstract: return name and handle of a temporary file safely
-author:
- - Tim Jenness <tjenness at cpan.org>
-license: perl
-distribution_type: module
-configure_requires:
- ExtUtils::MakeMaker: 0
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
+name: File-Temp
+version: 0.22
+version_from: Temp.pm
+installdirs: perl
requires:
- Fcntl: 1.03
- File::Path: 0
- File::Spec: 0.8
- Test::More: 0
-no_index:
- directory:
- - t
- - inc
-generated_by: ExtUtils::MakeMaker version 6.48
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.4.html
- version: 1.4
+ Fcntl: 1.03
+ File::Path: 0
+ File::Spec: 0.8
+ Test::More: 0
+
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.30
Modified: branches/upstream/libfile-temp-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-temp-perl/current/README?rev=38938&op=diff
==============================================================================
--- branches/upstream/libfile-temp-perl/current/README (original)
+++ branches/upstream/libfile-temp-perl/current/README Mon Jun 29 18:04:29 2009
@@ -1,6 +1,6 @@
File::Temp - provides functions for generating temporary files
-This is release V0.21 of File::Temp. This module can be used to
+This is release V0.22 of File::Temp. This module can be used to
generate temporary files (providing a filename and filehandle) or directories.
Possible race conditions are avoided and some security checks are performed
(eg making sure the sticky bit is set on world writeable temp directories).
@@ -123,12 +123,15 @@
Tim Jenness <tjenness at cpan.org>
-Copyright (C) 1999 - 2008 Tim Jenness and the UK Particle Physics and
+Copyright (C) 1999 - 2009 Tim Jenness and the UK Particle Physics and
Astronomy Research Council. All Rights Reserved. This program is free
software; you can redistribute it and/or modify it under the same
terms as Perl itself.
CHANGES IN THIS RELEASE
+
+V0.22
+ + Portability fixes in t/fork.t provided by perl5-porters.
V0.21
+ Clean out $FILES_CREATED_BY_OBJECT when the destructor runs. Otherwise
Modified: branches/upstream/libfile-temp-perl/current/Temp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-temp-perl/current/Temp.pm?rev=38938&op=diff
==============================================================================
--- branches/upstream/libfile-temp-perl/current/Temp.pm (original)
+++ branches/upstream/libfile-temp-perl/current/Temp.pm Mon Jun 29 18:04:29 2009
@@ -203,7 +203,7 @@
# Version number
-$VERSION = '0.21';
+$VERSION = '0.22';
# This is a list of characters that can be used in random filenames
@@ -2387,7 +2387,7 @@
Tim Jenness E<lt>tjenness at cpan.orgE<gt>
-Copyright (C) 2007-2008 Tim Jenness.
+Copyright (C) 2007-2009 Tim Jenness.
Copyright (C) 1999-2007 Tim Jenness and the UK Particle Physics and
Astronomy Research Council. All Rights Reserved. This program is free
software; you can redistribute it and/or modify it under the same
Modified: branches/upstream/libfile-temp-perl/current/t/fork.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libfile-temp-perl/current/t/fork.t?rev=38938&op=diff
==============================================================================
--- branches/upstream/libfile-temp-perl/current/t/fork.t (original)
+++ branches/upstream/libfile-temp-perl/current/t/fork.t Mon Jun 29 18:04:29 2009
@@ -5,13 +5,26 @@
use strict;
-BEGIN { print "1..8\n"; }
+BEGIN {
+ require Config;
+ my $can_fork = $Config::Config{d_fork} ||
+ (($^O eq 'MSWin32' || $^O eq 'NetWare') and
+ $Config::Config{useithreads} and
+ $Config::Config{ccflags} =~ /-DPERL_IMPLICIT_SYS/
+ );
+ if ( $can_fork ) {
+ print "1..8\n";
+ } else {
+ print "1..0 # Skip No fork available\n";
+ exit;
+ }
+}
use File::Temp;
# OO interface
-my $file = File::Temp->new(CLEANUP=>1);
+my $file = File::Temp->new();
myok( 1, -f $file->filename, "OO File exists" );
@@ -47,7 +60,7 @@
# non-OO interface
-my ($fh, $filename) = File::Temp::tempfile( CLEANUP => 1 );
+my ($fh, $filename) = File::Temp::tempfile( UNLINK => 1 );
myok( 5, -f $filename, "non-OO File exists" );
More information about the Pkg-perl-cvs-commits
mailing list