fix ::RS::Errors test on Windows

frioux · Feb 28, 2015 · ecca009 · ecca009
1 parent 3b535f9
commit ecca009
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -1,6 +1,7 @@
 Revision history for {{$dist->name}}
 
 {{$NEXT}}
+ - fix ::RS::Errors test on Windows
 
 2.025000  2015-02-20 22:50:47-06:00 America/Chicago
  - Add ::Helper::ResultSet::Errors to help when calling Result methods on an RS

diff --git a/t/ResultSet/Errors.t b/t/ResultSet/Errors.t
@@ -10,9 +10,10 @@ use Test::Fatal;
 use TestSchema;
 my $schema = TestSchema->deploy_or_connect();
 
+my $f = __FILE__;
 like exception {
    $schema->resultset('Gnarly')->literature
-}, qr{^\QYou're trying to call a Result ("TestSchema::Result::Gnarly") method ("literature") on a ResultSet ("TestSchema::ResultSet::Gnarly") at t/ResultSet/Errors.t line 14.\E}, 'exceptional';
+}, qr{^\QYou're trying to call a Result ("TestSchema::Result::Gnarly") method ("literature") on a ResultSet ("TestSchema::ResultSet::Gnarly") at $f line 15.\E}, 'exceptional';
 
 done_testing;