diff --git a/59_Weather.pm b/59_Weather.pm index 1de02f9..8602204 100755 --- a/59_Weather.pm +++ b/59_Weather.pm @@ -806,6 +806,11 @@ sub WeatherAsHtmlH($;$$) { if($op1 =~ /[0-9]/g){ $items = $op1; } if($op2 =~ /[dh]/g){ $f = $op2; } + $f =~ tr/dh/./cd; + $f = "h" if ( !$f || length($f) > 1); + $items =~ tr/0-9/./cd; + $items = 6 if ( !$items ); + return "$d is not a Weather instance
" if ( !$defs{$d} || $defs{$d}->{TYPE} ne "Weather" );