From f763de76a5d3cb67d13fdf470eb793865e6d5897 Mon Sep 17 00:00:00 2001 From: Aleks-Daniel Jakimenko-Aleksejev Date: Sat, 16 Jul 2016 07:25:37 +0300 Subject: [PATCH] Fix encoding issue get_output should probably decode automatically, but for now this is enough. --- bisectable.pl | 2 +- committable.pl | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/bisectable.pl b/bisectable.pl index 276ef5e..6d51dd6 100755 --- a/bisectable.pl +++ b/bisectable.pl @@ -97,7 +97,7 @@ sub process_message { if ($exit_good == $exit_bad and $out_good eq $out_bad) { $self->tell($message, "On both starting points the exit code is $exit_bad and the output is identical as well"); - return "Output on both points: $out_good"; # will be gisted automatically if required + return 'Output on both points: ' . decode_utf8($out_good); # will be gisted automatically if required } my $output_file = ''; if ($exit_good == $exit_bad) { diff --git a/committable.pl b/committable.pl index 2fb2816..2315e95 100755 --- a/committable.pl +++ b/committable.pl @@ -82,6 +82,7 @@ sub process_message { $out = 'No build for this commit'; } else { # actually run the code ($out, my $exit, my $time) = $self->get_output($self->BUILDS . "/$full_commit/bin/perl6", $filename); + $out = decode_utf8($out); $out .= " exit code = $exit" if ($exit != 0); } my $short_commit = substr($commit, 0, 7);