[Catalyst-commits] r9329 - in trunk/Catalyst-Example-InstantCRUD: lib/Catalyst/Example t

[zby at dev.catalyst.perl.org]

Author: zby
Date: 2009-02-18 11:19:36 +0000 (Wed, 18 Feb 2009)
New Revision: 9329

Modified:
   trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm
   trunk/Catalyst-Example-InstantCRUD/t/00.createapp.t
Log:
stringification of paths so that File::Copy will work correctly

Modified: trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm	2009-02-18 09:40:14 UTC (rev 9328)
+++ trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm	2009-02-18 11:19:36 UTC (rev 9329)
@@ -1,6 +1,6 @@
 package Catalyst::Example::InstantCRUD;
 
-use version; $VERSION = qv('0.0.23');
+use version; $VERSION = qv('0.0.24');
 
 use warnings;
 use strict;

Modified: trunk/Catalyst-Example-InstantCRUD/t/00.createapp.t
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/t/00.createapp.t	2009-02-18 09:40:14 UTC (rev 9328)
+++ trunk/Catalyst-Example-InstantCRUD/t/00.createapp.t	2009-02-18 11:19:36 UTC (rev 9329)
@@ -9,8 +9,8 @@
 my $dbfile = file('t', 'tmp', 'test.db');
 rmtree( [$apptree, $dbfile] );
 
-my $testfile = file('t', 'tmp', 'test.db')->absolute;
-my $origtestfile = file('t', 'var', 'test.db')->absolute;
+my $testfile = file('t', 'tmp', 'test.db')->absolute->stringify;
+my $origtestfile = file('t', 'var', 'test.db')->absolute->stringify;
 
 copy $origtestfile, $testfile;