});
for ( keys %{$sqlat->indentmap}) {
- my ($l, $r) = @{$sqlat->whitespace_keyword($_, 1)};
- is($r, ' ', "right is a space for $_");
+ my ($l, $r) = @{$sqlat->pad_keyword($_, 1)};
+ is($r, '', "right is empty for $_");
is($l, "\n " . ' ' x $sqlat->indentmap->{$_}, "left calculated correctly for $_" );
}
-is($sqlat->whitespace_keyword('select', 0)->[0], '', 'Select gets no newline or indent for depth 0');
+is($sqlat->pad_keyword('select', 0)->[0], '', 'Select gets no newline or indent for depth 0');
done_testing;