X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class-DeploymentHandler.git;a=blobdiff_plain;f=t%2F10-split-sql-chunk.t;fp=t%2F10-split-sql-chunk.t;h=025e9fcebedc9a8b28c373b3422196c63f5e8721;hp=0000000000000000000000000000000000000000;hb=115c68ce0fc0e56265d201a8f7bbcf912efa86db;hpb=6e2665d32fec2eb9c168202abaf45e26fa87470e

diff --git a/t/10-split-sql-chunk.t b/t/10-split-sql-chunk.t
new file mode 100644
index 0000000..025e9fc
--- /dev/null
+++ b/t/10-split-sql-chunk.t
@@ -0,0 +1,17 @@
+use strict;
+use warnings;
+
+use Test::More tests => 1;
+
+use DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator;
+
+*split_sql_chunk =
+*DBIx::Class::DeploymentHandler::DeployMethod::SQL::Translator::_split_sql_chunk;
+
+is_deeply [ split_sql_chunk( <<'END' ) ], [ 'SELECT * FROM YADAH END' ];
+BEGIN
+    -- stuff
+    SELECT * FROM YADAH
+END;
+END
+