fix concatenation

This commit is contained in:
Pavol Rusnak 2011-06-22 18:07:02 +02:00
parent 5398773e1b
commit fdac0b1044

View file

@ -554,9 +554,9 @@ sub irc_public {
if (!$pod->error) {
foreach my $subpod (@{$pod->subpods}) {
if ($subpod->plaintext) {
$answer += ($pod->title . ': ') if $pod->title;
$answer += ($subpod->title . ': ') if $subpod->title;
$answer += ($subpod->plaintext . "\n");
$answer .= ($pod->title . ': ') if $pod->title;
$answer .= ($subpod->title . ': ') if $subpod->title;
$answer .= ($subpod->plaintext . "\n");
}
}
}