mirror of
https://github.com/pragma-/pbot.git
synced 2025-01-10 20:12:35 +01:00
Plugin/Plang: do not use output_value() on exceptions
This commit is contained in:
parent
4e0dece5b7
commit
553fdb884c
@ -105,7 +105,7 @@ sub cmd_plang {
|
|||||||
$self->{output} = ""; # collect output of the embedded Plang program
|
$self->{output} = ""; # collect output of the embedded Plang program
|
||||||
|
|
||||||
eval {
|
eval {
|
||||||
my $result = $self->{plang}->interpret_string($context->{arguments});
|
my $result = $self->{plang}->interpret_string($context->{arguments});
|
||||||
|
|
||||||
# check to see if we need to append final result to output
|
# check to see if we need to append final result to output
|
||||||
if (defined $result->[1]) {
|
if (defined $result->[1]) {
|
||||||
@ -114,7 +114,6 @@ sub cmd_plang {
|
|||||||
};
|
};
|
||||||
|
|
||||||
if (my $exception = $@) {
|
if (my $exception = $@) {
|
||||||
$exception = $self->{plang}->{interpreter}->output_value($exception);
|
|
||||||
$self->{output} .= $exception;
|
$self->{output} .= $exception;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user