Unverified Commit 423facc9 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

efa-m --json: print canonical output for easier debugging

parent c74959a0

bin/efa-m

+3 −3
Original line number Diff line number Diff line
@@ -593,14 +593,14 @@ if ( my $err = $efa->errstr ) { 


if ($json_output) {

	if ($stopseq) {

		say JSON->new->convert_blessed->encode( $efa->result );

		say JSON->new->canonical->convert_blessed->encode( $efa->result );

	}

	else {

		say JSON->new->convert_blessed->encode( [ $efa->results ] );

		say JSON->new->canonical->convert_blessed->encode( [ $efa->results ] );

	}

}

elsif ($raw_json_output) {

	say JSON->new->convert_blessed->encode( $efa->{response} );

	say JSON->new->canonical->convert_blessed->encode( $efa->{response} );

}

elsif ($coord) {

	show_coord();