[Catalyst-commits] r9445 - in trunk/examples/SmokeServer: . lib/SmokeServer/Model t tmp

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-03-07 00:12:39 +0000 (Sat, 07 Mar 2009)
New Revision: 9445

Added:
   trunk/examples/SmokeServer/t/00make_db.t
Removed:
   trunk/examples/SmokeServer/cat_test_smoke.db
Modified:
   trunk/examples/SmokeServer/
   trunk/examples/SmokeServer/Makefile.PL
   trunk/examples/SmokeServer/lib/SmokeServer/Model/SmokeDB.pm
   trunk/examples/SmokeServer/tmp/
Log:
Fix up bits and bobs


Property changes on: trunk/examples/SmokeServer
___________________________________________________________________
Name: svn:ignore
   + META.yml
pm_to_blib
blib
inc
Makefile


Modified: trunk/examples/SmokeServer/Makefile.PL
===================================================================
--- trunk/examples/SmokeServer/Makefile.PL	2009-03-06 22:51:54 UTC (rev 9444)
+++ trunk/examples/SmokeServer/Makefile.PL	2009-03-07 00:12:39 UTC (rev 9445)
@@ -24,7 +24,9 @@
 requires 'Catalyst::View::JSON' => '0';
 requires 'Catalyst::Controller::BindLex' => '0';
 
+test_requires 'Test::WWW::Mechanize::Catalyst';
 
+build_requires 'DBICx::Deploy';
 
 catalyst;
 

Deleted: trunk/examples/SmokeServer/cat_test_smoke.db
===================================================================
(Binary files differ)

Modified: trunk/examples/SmokeServer/lib/SmokeServer/Model/SmokeDB.pm
===================================================================
--- trunk/examples/SmokeServer/lib/SmokeServer/Model/SmokeDB.pm	2009-03-06 22:51:54 UTC (rev 9444)
+++ trunk/examples/SmokeServer/lib/SmokeServer/Model/SmokeDB.pm	2009-03-07 00:12:39 UTC (rev 9445)
@@ -1,5 +1,5 @@
 package SmokeServer::Model::SmokeDB;
-
+use SmokeServer;
 use strict;
 use base 'Catalyst::Model::DBIC::Schema';
 
@@ -11,7 +11,7 @@
 __PACKAGE__->config(
     schema_class => 'SmokeDB',
     connect_info => [
-        'dbi:SQLite:dbname=/www/smoke.woobling.org/SmokeServer/cat_test_smoke.db',
+        'dbi:SQLite:dbname=' . SmokeServer->path_to('cat_test_smoke.db'),
         '', '',
         { AutoCommit => 0 },
         { on_connect_do => [ 'PRAGMA synchronous = OFF' ] },

Added: trunk/examples/SmokeServer/t/00make_db.t
===================================================================
--- trunk/examples/SmokeServer/t/00make_db.t	                        (rev 0)
+++ trunk/examples/SmokeServer/t/00make_db.t	2009-03-07 00:12:39 UTC (rev 9445)
@@ -0,0 +1,19 @@
+use strict;
+use warnings;
+use FindBin qw/$Bin/;
+use DBICx::Deploy;
+use Test::More tests => 1;
+use Test::Exception;
+
+my $fn =  $Bin . '/../cat_test_smoke.db';
+if (! -r $fn) {
+    lives_ok {
+        DBICx::Deploy->deploy(
+            'SmokeDB' => 'DBI:SQLite:' . $fn
+        );
+    }
+}
+else {
+    ok 1;
+}
+


Property changes on: trunk/examples/SmokeServer/tmp
___________________________________________________________________
Name: svn:ignore
   + session
matrix_cache
template_cache