r74135 - in /trunk/libcompress-raw-bzip2-perl: Changes META.yml README debian/changelog lib/Compress/Raw/Bzip2.pm t/000prereq.t t/compress/CompTestUtils.pm
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sun May 8 13:57:53 UTC 2011
Author: gregoa
Date: Sun May 8 13:57:42 2011
New Revision: 74135
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=74135
Log:
New upstream release.
Modified:
trunk/libcompress-raw-bzip2-perl/Changes
trunk/libcompress-raw-bzip2-perl/META.yml
trunk/libcompress-raw-bzip2-perl/README
trunk/libcompress-raw-bzip2-perl/debian/changelog
trunk/libcompress-raw-bzip2-perl/lib/Compress/Raw/Bzip2.pm
trunk/libcompress-raw-bzip2-perl/t/000prereq.t
trunk/libcompress-raw-bzip2-perl/t/compress/CompTestUtils.pm
Modified: trunk/libcompress-raw-bzip2-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/Changes?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/Changes (original)
+++ trunk/libcompress-raw-bzip2-perl/Changes Sun May 8 13:57:42 2011
@@ -1,5 +1,9 @@
CHANGES
-------
+
+ 2.035 6 May 2011
+
+ * No Changes
2.033 11 Jan 2011
* Fixed typos & spelling errors.
Modified: trunk/libcompress-raw-bzip2-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/META.yml?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/META.yml (original)
+++ trunk/libcompress-raw-bzip2-perl/META.yml Sun May 8 13:57:42 2011
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Compress-Raw-Bzip2
-version: 2.033
+version: 2.035
abstract: Low-Level Interface to bzip2 compression library
author:
- Paul Marquess <pmqs at cpan.org>
Modified: trunk/libcompress-raw-bzip2-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/README?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/README (original)
+++ trunk/libcompress-raw-bzip2-perl/README Sun May 8 13:57:42 2011
@@ -1,9 +1,9 @@
Compress-Raw-Bzip2
- Version 2.033
+ Version 2.035
- 11th January 2011
+ 6th May 2011
Copyright (c) 2005-2011 Paul Marquess. All rights reserved.
This program is free software; you can redistribute it
@@ -164,7 +164,7 @@
If you haven't installed Compress-Raw-Bzip2 then search Compress::Raw::Bzip2.pm
for a line like this:
- $VERSION = "2.033" ;
+ $VERSION = "2.035" ;
c. The version of bzip2 you have used.
If you have successfully installed Compress-Raw-Bzip2, this one-liner
Modified: trunk/libcompress-raw-bzip2-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/debian/changelog?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/debian/changelog (original)
+++ trunk/libcompress-raw-bzip2-perl/debian/changelog Sun May 8 13:57:42 2011
@@ -1,8 +1,9 @@
-libcompress-raw-bzip2-perl (2.033-2) UNRELEASED; urgency=low
+libcompress-raw-bzip2-perl (2.035-1) UNRELEASED; urgency=low
+ * New upstream release.
* Install FAQ as manpage (closes: #578983).
- -- gregor herrmann <gregoa at debian.org> Fri, 18 Mar 2011 22:10:46 +0100
+ -- gregor herrmann <gregoa at debian.org> Sun, 08 May 2011 15:56:57 +0200
libcompress-raw-bzip2-perl (2.033-1) unstable; urgency=low
Modified: trunk/libcompress-raw-bzip2-perl/lib/Compress/Raw/Bzip2.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/lib/Compress/Raw/Bzip2.pm?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/lib/Compress/Raw/Bzip2.pm (original)
+++ trunk/libcompress-raw-bzip2-perl/lib/Compress/Raw/Bzip2.pm Sun May 8 13:57:42 2011
@@ -12,7 +12,7 @@
use bytes ;
our ($VERSION, $XS_VERSION, @ISA, @EXPORT, $AUTOLOAD);
-$VERSION = '2.033';
+$VERSION = '2.035';
$XS_VERSION = $VERSION;
$VERSION = eval $VERSION;
Modified: trunk/libcompress-raw-bzip2-perl/t/000prereq.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/t/000prereq.t?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/t/000prereq.t (original)
+++ trunk/libcompress-raw-bzip2-perl/t/000prereq.t Sun May 8 13:57:42 2011
@@ -19,7 +19,7 @@
if eval { require Test::NoWarnings ; import Test::NoWarnings; 1 };
- my $VERSION = '2.033';
+ my $VERSION = '2.035';
my @NAMES = qw(
);
Modified: trunk/libcompress-raw-bzip2-perl/t/compress/CompTestUtils.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcompress-raw-bzip2-perl/t/compress/CompTestUtils.pm?rev=74135&op=diff
==============================================================================
--- trunk/libcompress-raw-bzip2-perl/t/compress/CompTestUtils.pm (original)
+++ trunk/libcompress-raw-bzip2-perl/t/compress/CompTestUtils.pm Sun May 8 13:57:42 2011
@@ -24,6 +24,14 @@
{
like $@, @_ ;
}
+
+BEGIN {
+ eval {
+ require File::Temp;
+ } ;
+
+}
+
{
package LexFile ;
@@ -36,8 +44,9 @@
my $self = shift ;
foreach (@_)
{
- # autogenerate the name unless if none supplied
- $_ = "tst" . $index ++ . ".tmp"
+ Carp::croak "NO!!!!" if defined $_;
+ # autogenerate the name if none supplied
+ $_ = "tst" . $$ . "X" . $index ++ . ".tmp"
unless defined $_;
}
chmod 0777, @_;
@@ -58,19 +67,58 @@
package LexDir ;
use File::Path;
+
+ our ($index);
+ $index = '00000';
+ our ($useTempFile) = defined &File::Temp::tempdir;
+ our ($useTempDir) = defined &File::Temp::newdir;
+
sub new
{
my $self = shift ;
- foreach (@_) { rmtree $_ }
- bless [ @_ ], $self ;
+
+ if ( $useTempDir)
+ {
+ foreach (@_)
+ {
+ Carp::croak "NO!!!!" if defined $_;
+ $_ = File::Temp->newdir(DIR => '.');
+ }
+ bless [ @_ ], $self ;
+ }
+ elsif ( $useTempFile)
+ {
+ foreach (@_)
+ {
+ Carp::croak "NO!!!!" if defined $_;
+ $_ = File::Temp::tempdir(DIR => '.', CLEANUP => 1);
+ }
+ bless [ @_ ], $self ;
+ }
+ else
+ {
+ foreach (@_)
+ {
+ Carp::croak "NO!!!!" if defined $_;
+ # autogenerate the name if none supplied
+ $_ = "tmpdir" . $$ . "X" . $index ++ . ".tmp" ;
+ }
+ foreach (@_) { rmtree $_; mkdir $_, 0777 }
+ bless [ @_ ], $self ;
+ }
+
}
sub DESTROY
{
- my $self = shift ;
- foreach (@$self) { rmtree $_ }
- }
-}
+ if (! $useTempFile)
+ {
+ my $self = shift ;
+ foreach (@$self) { rmtree $_ }
+ }
+ }
+}
+
sub readFile
{
my $f = shift ;
More information about the Pkg-perl-cvs-commits
mailing list