r22925 - in /trunk/libdbicx-testdatabase-perl: ./ debian/ inc/Module/ inc/Module/Install/ lib/DBICx/

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Tue Jul 8 16:57:01 UTC 2008


Author: gregoa
Date: Tue Jul  8 16:57:01 2008
New Revision: 22925

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22925
Log:
New upstream release.

Modified:
    trunk/libdbicx-testdatabase-perl/META.yml
    trunk/libdbicx-testdatabase-perl/debian/changelog
    trunk/libdbicx-testdatabase-perl/inc/Module/Install.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Base.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Can.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Fetch.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Makefile.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Metadata.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/Win32.pm
    trunk/libdbicx-testdatabase-perl/inc/Module/Install/WriteAll.pm
    trunk/libdbicx-testdatabase-perl/lib/DBICx/TestDatabase.pm

Modified: trunk/libdbicx-testdatabase-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/META.yml?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/META.yml (original)
+++ trunk/libdbicx-testdatabase-perl/META.yml Tue Jul  8 16:57:01 2008
@@ -1,12 +1,13 @@
 --- 
 abstract: create a temporary database from a DBIx::Class::Schema
-author: Jonathan Rockway C<< <jrockway at cpan.org> >>
+author: 
+  - Jonathan Rockway C<< <jrockway at cpan.org> >>
 build_requires: 
   DBIx::Class: 0
   Test::More: 0
   ok: 0
 distribution_type: module
-generated_by: Module::Install version 0.67
+generated_by: Module::Install version 0.68
 license: perl
 meta-spec: 
   url: http://module-build.sourceforge.net/META-spec-v1.3.html
@@ -20,4 +21,4 @@
   DBD::SQLite: 0
   File::Temp: 0
   SQL::Translator: 0
-version: 0.01
+version: 0.02

Modified: trunk/libdbicx-testdatabase-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/debian/changelog?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/debian/changelog (original)
+++ trunk/libdbicx-testdatabase-perl/debian/changelog Tue Jul  8 16:57:01 2008
@@ -1,3 +1,9 @@
+libdbicx-testdatabase-perl (0.02-1) UNRELEASED; urgency=low
+
+  * New upstream release.
+
+ -- gregor herrmann <gregoa at debian.org>  Tue, 08 Jul 2008 18:56:19 +0200
+
 libdbicx-testdatabase-perl (0.01-1) unstable; urgency=low
 
   * Initial Release. (Closes: #479198)

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install.pm Tue Jul  8 16:57:01 2008
@@ -28,7 +28,7 @@
     # This is not enforced yet, but will be some time in the next few
     # releases once we can make sure it won't clash with custom
     # Module::Install extensions.
-    $VERSION = '0.67';
+    $VERSION = '0.68';
 }
 
 # Whether or not inc::Module::Install is actually loaded, the

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Base.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Base.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Base.pm Tue Jul  8 16:57:01 2008
@@ -1,7 +1,7 @@
 #line 1
 package Module::Install::Base;
 
-$VERSION = '0.67';
+$VERSION = '0.68';
 
 # Suspend handler for "redefined" warnings
 BEGIN {

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Can.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Can.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Can.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Can.pm Tue Jul  8 16:57:01 2008
@@ -11,7 +11,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Fetch.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Fetch.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Fetch.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Fetch.pm Tue Jul  8 16:57:01 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Makefile.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Makefile.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Makefile.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Makefile.pm Tue Jul  8 16:57:01 2008
@@ -7,7 +7,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Metadata.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Metadata.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Metadata.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Metadata.pm Tue Jul  8 16:57:01 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/Win32.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/Win32.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/Win32.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/Win32.pm Tue Jul  8 16:57:01 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/inc/Module/Install/WriteAll.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/inc/Module/Install/WriteAll.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/inc/Module/Install/WriteAll.pm (original)
+++ trunk/libdbicx-testdatabase-perl/inc/Module/Install/WriteAll.pm Tue Jul  8 16:57:01 2008
@@ -6,7 +6,7 @@
 
 use vars qw{$VERSION $ISCORE @ISA};
 BEGIN {
-	$VERSION = '0.67';
+	$VERSION = '0.68';
 	$ISCORE  = 1;
 	@ISA     = qw{Module::Install::Base};
 }

Modified: trunk/libdbicx-testdatabase-perl/lib/DBICx/TestDatabase.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdbicx-testdatabase-perl/lib/DBICx/TestDatabase.pm?rev=22925&op=diff
==============================================================================
--- trunk/libdbicx-testdatabase-perl/lib/DBICx/TestDatabase.pm (original)
+++ trunk/libdbicx-testdatabase-perl/lib/DBICx/TestDatabase.pm Tue Jul  8 16:57:01 2008
@@ -4,14 +4,14 @@
 
 use File::Temp 'tempfile'; 
 
-our $VERSION = '0.01';
+our $VERSION = '0.02';
 
 # avoid contaminating the schema with the tempfile
 my @TMPFILES;
 
 sub new {
     my ($class, $schema_class) = @_;
-
+    
     eval "require $schema_class" 
       or die "failed to require $schema_class: $@";
     
@@ -29,7 +29,12 @@
     # for some reason unlink after write doesn't unlink the files on
     # my system
 
-    unlink @TMPFILES;
+    if($ENV{DBIC_KEEP_TEST}){
+        print {*STDERR} "Keeping DBICx::TestDatabase databases: @TMPFILES\n";
+    }
+    else {
+        unlink @TMPFILES;
+    }
 }
 
 *connect = *new;
@@ -74,6 +79,20 @@
 
 Alias for new.
 
+=head1 ENVIRONMENT
+
+You can control the behavior of this module at runtime by setting
+environment variables.
+
+=head2 DBIC_KEEP_TEST
+
+If this variable is true, then the test database will not be deleted
+at C<END> time.  Instead, a message containing the paths of the test
+databases will be printed.
+
+This is good if you want to look at the database your test generated,
+for debugging.
+
 =head1 AUTHOR
 
 Jonathan Rockway C<< <jrockway at cpan.org> >>




More information about the Pkg-perl-cvs-commits mailing list