Escape filename so that t\9... won't look like octal

diff --git a/t/95sql_maker.t b/t/95sql_maker.t
index d99d201..c4a65a2 100644 (file)
--- a/t/95sql_maker.t
+++ b/t/95sql_maker.t
@@ -51,6 +51,7 @@ my $sql_maker = $schema->storage->sql_maker;
 
 # Make sure the carp/croak override in SQLA works (via SQLAHacks)
 my $file = __FILE__;
+$file = "\Q$file\E";
 throws_ok (sub {
   $schema->resultset ('Artist')->search ({}, { order_by => { -asc => 'stuff', -desc => 'staff' } } )->as_query;
 }, qr/$file/, 'Exception correctly croak()ed');