Fix uninitialised variable

nigelhorne · Jan 30, 2025 · 2b2eb98 · 2b2eb98
1 parent 7c3e547
commit 2b2eb98
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/ged2site b/ged2site
@@ -12402,7 +12402,7 @@ sub notes
 				}
 			} elsif(ref($hr) eq 'ARRAY') {
 				warn 'TODO: ', Data::Dumper->new([$hr])->Dump();
-			} elsif($hr->can('lat') && defined($region) && ($hr->country() eq $region)) {
+			} elsif($hr->can('lat') && defined($region) && $hr->country() && ($hr->country() eq $region)) {
 				# Geo::Location::Point
 				warn 'TODO: ', Data::Dumper->new([$hr])->Dump(), "\n\t", ref($hr), "\n\t", $hr->as_string();
 				push @{$note_locations}, {