First_name:
data_type: foovar
default_value: ~
- extra: {}
is_nullable: 1
is_primary_key: 0
is_unique: 0
data => $in_yaml,
filters => [
# Filter from SQL::Translator::Filter::*
- [ 'Names', {
+ [ 'Names', {
tables => 'lc',
fields => 'ucfirst',
} ],
lives_ok { $out = $obj->translate; } "Translate ran";
is $obj->error, '' ,"No errors";
ok $out ne "" ,"Produced something!";
-# Somewhat hackishly modify the yaml with a regex to avoid
+# Somewhat hackishly modify the yaml with a regex to avoid
# failing randomly on every change of version.
$out =~ s/version: .*/version: SUPPRESSED/;
eq_or_diff $out, $ans_yaml ,"Output looks right";