Fix preserve whitespace setting

This commit is contained in:
Pragmatic Software 2018-05-21 18:02:16 -07:00
parent 6912e53c0a
commit 89f38026d3
1 changed files with 1 additions and 1 deletions

View File

@ -444,7 +444,7 @@ sub handle_result {
my $preserve_newlines = $self->{pbot}->{registry}->get_value($stuff->{from}, 'preserve_newlines');
$result =~ s/[\n\r]/ /g unless $preserve_newlines;
$result =~ s/[ \t]+/ /g unless $self->{preserve_whitespace};
$result =~ s/[ \t]+/ /g unless $stuff->{preserve_whitespace};
my $max_lines = $self->{pbot}->{registry}->get_value($stuff->{from}, 'max_newlines');
$max_lines = 4 if not defined $max_lines;