quote SQLite identifiers

[dbsrgits/SQL-Translator.git] / t / 57-class-dbi.t

diff --git a/t/57-class-dbi.t b/t/57-class-dbi.t
index 4d19dbc..b2a5ecc 100644 (file)
--- a/t/57-class-dbi.t
+++ b/t/57-class-dbi.t
@@ -21,11 +21,11 @@ use SQL::Translator::Producer::SQLite;
     );
     my $create_opts = { no_comments => 1 };
     my $view1_sql1 =
-      SQL::Translator::Producer::SQLite::create_view( $view1, $create_opts );
+      [ SQL::Translator::Producer::SQLite::create_view( $view1, $create_opts ) ];
 
-    my $view_sql_replace = "CREATE TEMPORARY VIEW IF NOT EXISTS view_foo AS
-    SELECT id, name FROM thing";
-    is( $view1_sql1, $view_sql_replace, 'correct "CREATE TEMPORARY VIEW" SQL' );
+    my $view_sql_replace = [ "CREATE TEMPORARY VIEW IF NOT EXISTS 'view_foo' AS
+    SELECT id, name FROM thing" ];
+    is_deeply( $view1_sql1, $view_sql_replace, 'correct "CREATE TEMPORARY VIEW" SQL' );
 
     my $view2 = SQL::Translator::Schema::View->new(
         name   => 'view_foo',
@@ -34,8 +34,8 @@ use SQL::Translator::Producer::SQLite;
     );
 
     my $view1_sql2 =
-      SQL::Translator::Producer::SQLite::create_view( $view2, $create_opts );
-    my $view_sql_noreplace = "CREATE VIEW view_foo AS
-    SELECT id, name FROM thing";
-    is( $view1_sql2, $view_sql_noreplace, 'correct "CREATE VIEW" SQL' );
+      [ SQL::Translator::Producer::SQLite::create_view( $view2, $create_opts ) ];
+    my $view_sql_noreplace = [ "CREATE VIEW 'view_foo' AS
+    SELECT id, name FROM thing" ];
+    is_deeply( $view1_sql2, $view_sql_noreplace, 'correct "CREATE VIEW" SQL' );
 }