X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F24yaml.t;h=1c4e9cb0c57dcf0202f5d7c3fdadb9cbea9f2324;hb=46bf5655a6ca0e64ddae0e920d6adc744d798f3c;hp=09762c97344904285ff66df21b059cbd62cb186d;hpb=6f1466406f1af99f65083dc14fe457bfd155f424;p=dbsrgits%2FSQL-Translator.git

diff --git a/t/24yaml.t b/t/24yaml.t
index 09762c9..1c4e9cb 100644
--- a/t/24yaml.t
+++ b/t/24yaml.t
@@ -14,13 +14,13 @@ BEGIN {
         'SQL::Translator::Producer::YAML');
 }
 
-my $yaml = <<'YAML';
+my $sqlt_version = $SQL::Translator::VERSION;
+my $yaml = <<YAML;
 ---
 schema:
   procedures: {}
   tables:
     person:
-      comments: ''
       constraints:
         - deferrable: 1
           expression: ''
@@ -119,11 +119,10 @@ schema:
       options: []
       order: 1
     pet:
-      comments: ''
       constraints:
         - deferrable: 1
           expression: ''
-          fields: ~
+          fields: []
           match_type: ''
           name: ''
           on_delete: ''
@@ -195,21 +194,21 @@ schema:
       options: []
       order: 2
   triggers:
-    after:
+    pet_trig:
       action:
         for_each: ~
         steps:
-          - update name=name
+          - update pet set name=name
         when: ~
       database_event: insert
       fields: ~
-      name: after
-      on_table: ~
+      name: pet_trig
+      on_table: pet
       order: 1
-      perform_action_when: ~
+      perform_action_when: after
   views:
     person_pet:
-      fields: ~
+      fields: ''
       name: person_pet
       order: 1
       sql: |
@@ -226,7 +225,7 @@ translator:
   producer_type: SQL::Translator::Producer::YAML
   show_warnings: 0
   trace: 0
-  version: 0.07
+  version: $sqlt_version
 YAML
 
 my $file = "$Bin/data/sqlite/create.sql";
@@ -237,6 +236,8 @@ my $tr   = SQL::Translator->new(
     parser   => 'SQLite',
     producer => 'YAML',
     data     => $data,
+#    debug    => 1,
+#    trace    => 1,
 );
 
 my $out;