1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 17:25:41 -04:00

fixing output

This commit is contained in:
Ryan Voots 2010-12-07 13:09:33 -05:00
parent c3a79defce
commit 57ed5ce046

View file

@ -21,10 +21,12 @@ sub {
my $weathertext = $weather->as_text;
$weathertext =~ s/\n/ /g; #filter them so when it goes ITS FUCKING NICE\nAND THUNDERING it'll display properly
my $remarktext = $remark->as_text;
$remarktext =~ s/\n/ /g;
print $location->as_text;
print " ";
print $weather->as_text;
print $weathertext;
print " ";
print '(', $remark->as_text, ')';
print '(', $remarktext, ')';
}