File Coverage

blib/lib/Code/TidyAll/Plugin/PgFormatter.pm

Criterion	Covered	Total	%
statement	6	15	40.0
branch	0	2	0.0
condition	0	3	0.0
subroutine	2	4	50.0
pod	1	1	100.0
total	9	25	36.0

package Code::TidyAll::Plugin::PgFormatter;

our $VERSION = '0.01';

use IPC::Run3 qw( run3 );
use Moo;

extends 'Code::TidyAll::Plugin';

sub _build_cmd { 'pg_format' }

sub transform_source {
    my ( $self, $source ) = @_;

    # want pg_format to run from stdin
    my @cmd = ( $self->cmd, split(/\s+/, $self->argv ), q{-} );

    my $output;
    my $err;
    run3( \@cmd, \$source, \$output, \$err);

    if ( $? > 0 ) {
	$err ||= "problem running " . $self->cmd;
        die $err;
    }

    return $output;
}

1;
__END__