1 package DBIx::Class::Storage::PrettyPrinter;
3 use base 'DBIx::Class::Storage::Statistics';
5 use SQL::Abstract::Tree;
7 __PACKAGE__->mk_group_accessors( simple => '_sqlat' );
12 my $sqlat = SQL::Abstract::Tree->new(shift @_);
13 my $self = $class->next::method(@_);
15 $self->_sqlat($sqlat);
24 my $formatted = $self->_sqlat->format($string);
26 $self->next::method($formatted, @_);