Ticket #5024: envcan.diff

File envcan.diff, 712 bytes (added by knightr@…, 16 years ago)

Diff file that adds support for drizzle....

  • ca_envcan/ENVCANParser.pm

     
    1111use POSIX;
    1212use XML::Simple;
    1313
    14 our $VERSION = 0.2;
     14our $VERSION = 0.3;
    1515
    1616my %results;
    1717my %directions = (  N  => "North",      NNE => "North Northeast",
     
    3535    elsif ($condition =~ /fog/i) {
    3636        $icon = 'fog.png';
    3737    }
     38    elsif ($condition =~ /drizzle/i) {
     39        $icon = 'lshowers.png';
     40        $icon = 'rainsnow.png'  if ($condition =~ /freezing/i);
     41    }
    3842    elsif ( ($condition =~ /rain/i) || ($condition =~ /showers/i) ) {
    3943        $icon = 'showers.png';
    4044        $icon = 'lshowers.png'  if ( ($condition =~ /chance/i) ||