[Bast-commits] r3140 - trunk/DBIx-Class-TimeStamp/t/lib
jshirley at dev.catalyst.perl.org
jshirley at dev.catalyst.perl.org
Fri Mar 23 23:21:53 GMT 2007
Author: jshirley
Date: 2007-03-23 23:21:53 +0000 (Fri, 23 Mar 2007)
New Revision: 3140
Removed:
trunk/DBIx-Class-TimeStamp/t/lib/TimeStampTest.pm
Log:
Removing unused file
Deleted: trunk/DBIx-Class-TimeStamp/t/lib/TimeStampTest.pm
===================================================================
--- trunk/DBIx-Class-TimeStamp/t/lib/TimeStampTest.pm 2007-03-23 23:20:35 UTC (rev 3139)
+++ trunk/DBIx-Class-TimeStamp/t/lib/TimeStampTest.pm 2007-03-23 23:21:53 UTC (rev 3140)
@@ -1,41 +0,0 @@
-package # hide from PAUSE
- TimeStampTest;
-
-use strict;
-use warnings;
-use TimeStampTest::Schema;
-
-sub initialise {
- my $db_file = "t/var/TimeStampTest.db";
-
- unlink $db_file if -e $db_file;
- unlink "${db_file}-journal" if -e "${db_file}-journal";
-
- mkdir("t/var") unless -d "t/var";
-
- my $dsn = "dbi:SQLite:${db_file}";
-
- return TimeStampTest::Schema->compose_connection('TimeStampTest' => $dsn);
-}
-
-sub init_schema {
- my $self = shift;
-
- my $db_file = "t/var/TimeStampTest.db";
- unlink $db_file if -e $db_file;
- unlink "${db_file}-journal" if -e "${db_file}-journal";
-
- mkdir("t/var") unless -d "t/var";
-
- my $dsn = "dbi:SQLite:${db_file}";
-
- my $schema =
- TimeStampTest::Schema->compose_connection('TimeStampTest' => $dsn);
-
- $schema->deploy();
-
- return $schema;
-
-}
-
-1;
More information about the Bast-commits
mailing list