Sat Aug 11 2007 Chris Weyl <cweyl@alumni.drew.edu> 0.24-1 - update to 0.24 - license tag: GPL -> GPL+ - patch t/202_...t to write to a tmpdir rather than .epel9
parent
38b4d61f8f
commit
cfd93623e7
@ -1 +1 @@
|
|||||||
Moose-0.22.tar.gz
|
Moose-0.26.tar.gz
|
||||||
|
@ -1 +1 @@
|
|||||||
cc0b951659e9669a81a0e675b5618cb1 Moose-0.22.tar.gz
|
3356b452daf2ea887b13c0899bbb6fd7 Moose-0.26.tar.gz
|
||||||
|
@ -0,0 +1,38 @@
|
|||||||
|
--- t/200_examples/002_example_Moose_POOP.t.orig 2007-08-11 09:35:55.683687891 -0700
|
||||||
|
+++ t/200_examples/002_example_Moose_POOP.t 2007-08-11 09:36:25.010424972 -0700
|
||||||
|
@@ -37,14 +37,18 @@
|
||||||
|
use Moose;
|
||||||
|
|
||||||
|
use DBM::Deep;
|
||||||
|
+ use File::Temp qw{ tempfile };
|
||||||
|
+ use File::Spec::Functions qw{ tmpdir };
|
||||||
|
|
||||||
|
extends 'Moose::Meta::Instance';
|
||||||
|
|
||||||
|
{
|
||||||
|
my %INSTANCE_COUNTERS;
|
||||||
|
+
|
||||||
|
+ my (undef, $filename) = tempfile 't_202_XXXXXXX', DIR => tmpdir;
|
||||||
|
|
||||||
|
my $db = DBM::Deep->new({
|
||||||
|
- file => "newswriter.db",
|
||||||
|
+ file => $filename,
|
||||||
|
autobless => 1,
|
||||||
|
locking => 1,
|
||||||
|
});
|
||||||
|
@@ -54,7 +58,7 @@
|
||||||
|
#warn Dumper $db;
|
||||||
|
$db = undef;
|
||||||
|
$db = DBM::Deep->new({
|
||||||
|
- file => "newswriter.db",
|
||||||
|
+ file => $filename,
|
||||||
|
autobless => 1,
|
||||||
|
locking => 1,
|
||||||
|
});
|
||||||
|
@@ -431,4 +435,4 @@
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
-unlink('newswriter.db') if -e 'newswriter.db';
|
||||||
|
\ No newline at end of file
|
||||||
|
+
|
Loading…
Reference in new issue