Subversion Repositories geo-modmetar

Compare Revisions

Ignore whitespace Rev 12 → Rev 13

/trunk/ModMETAR.pm
825,9 → 825,10
while ( $tok =~ /($_weather_types_pat)/gi )
{
$engl .= " " . $_weather_types{$1}; ## figure out weather
$rusl .= " " . $_weather_types_ru{$1};
$rusl .= " " . $_weather_types_ru{$1} . ", ";
$rawl .= " " . $1;
}
$rusl = substr($rusl, 0, length($rusl)-2);
 
## addl qualifier