hi list,

i have a patch the fix the follow warning

>Use of uninitialized value in string eq
> at /home/tilesathome/tilesAtHome.client2/osmarender/orp/orp-drawing.pm line
> 237.
> Use of uninitialized value in string eq
> at /home/tilesathome/tilesAtHome.client2/osmarender/orp/orp-drawing.pm line
> 257.
>

its only a eq of a uninitialized value
i add an if defined on both lines

tileset 2152 1410 have many errors from this type for debuging


René

diff -urbBdpN a/osmarender/orp/orp-drawing.pm b/osmarender/orp/orp-drawing.pm
--- a/osmarender/orp/orp-drawing.pm	2008-11-05 10:22:32.984529418 +0100
+++ b/osmarender/orp/orp-drawing.pm	2008-11-16 16:37:26.000000000 +0100
@@ -234,7 +234,7 @@ OUTER:
         foreach my $relpair(@{$_->{"relations"}})
         {
             my ($role, $rel) = @$relpair;
-            if ($rel->{"tags"}->{"type"} eq "multipolygon" && $role eq "outer")
+            if (defined $rel->{"tags"}->{"type"} && $rel->{"tags"}->{"type"} eq "multipolygon" && defined $role && $role eq "outer")
             {
                 # right, we are "outer" - find all "inner" ways of this relation 
                 # and add them to our path
@@ -254,7 +254,7 @@ OUTER:
                     }
                 }
             }
-            if ($rel->{"tags"}->{"type"} eq "multipolygon" && $role eq "inner")
+            if (defined $rel->{"tags"}->{"type"} && $rel->{"tags"}->{"type"} eq "multipolygon" && defined $role && $role eq "inner")
             {
                 # we are "inner" - if the corresponding "outer" poly is tagged 
                 # the same as we are, then don't draw anything (legacy polygon
_______________________________________________
Tilesathome mailing list
[email protected]
http://lists.openstreetmap.org/listinfo/tilesathome

Reply via email to