From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Thu, 11 Jun 2009 20:02:11 +0000 (+0000)
Subject: Escape filename so that t\9... won't look like octal
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=51a05c99730fcdd85269a8e675358059ed2442da;p=dbsrgits%2FDBIx-Class-Historic.git

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
--- 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');