mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 17:25:41 -04:00
fixing output
This commit is contained in:
parent
c3a79defce
commit
57ed5ce046
1 changed files with 4 additions and 2 deletions
|
@ -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, ')';
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue