1
Index: libgeo-metar-perl/METAR.pm
2
===================================================================
3
--- libgeo-metar-perl.orig/METAR.pm
4
+++ libgeo-metar-perl/METAR.pm
5
@@ -1282,7 +1282,7 @@ sub _process
10
+ if($self->{visibility}) {
11
my $vis = $self->{visibility};
12
# test for statute miles
14
@@ -1290,7 +1290,7 @@ sub _process
15
if ($vis =~ /M(\d\/\d)/o) {
16
$self->{VISIBILITY} = "Less than $1 statute miles";
18
- $self->{VISIBILITY} = $vis . " Statute Miles";
19
+ $self->{VISIBILITY} = $vis . " statute miles";
21
# auto metars can have non-directional visibility reports
22
} elsif (($self->{MOD} eq 'AUTO') and ($vis =~ /(\d+)NDV$/)){