X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F74mssql.t;h=b56c7e00284783fc5fcbde8ce53df4e05541e73a;hb=41d90e353cfaa8bd9a87df53550b487d9f366c8d;hp=f8b3849e6d865890dd796d2cf1331bb09dd90bc1;hpb=233c3a461db751984354047c67a0511eb13c233f;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/74mssql.t b/t/74mssql.t
index f8b3849..b56c7e0 100644
--- a/t/74mssql.t
+++ b/t/74mssql.t
@@ -204,6 +204,15 @@ SQL
     ok (($have_rno == $rno_detected),
       'row_number() over support detected correctly');
   }
+
+  {
+    my $schema = DBICTest::Schema->clone;
+    $schema->connection($dsn, $user, $pass);
+
+    like $schema->storage->sql_maker->{limit_dialect},
+      qr/^(?:Top|RowNumberOver)\z/,
+      'sql_maker is correct on unconnected schema';
+  }
 }
 
 # test op-induced autoconnect