Skip to content

Commit

Permalink
Print location info when debug is enabled
Browse files Browse the repository at this point in the history
  • Loading branch information
nigelhorne committed Oct 14, 2020
1 parent f41a79c commit 97f78f2
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion gedcom
Original file line number Diff line number Diff line change
Expand Up @@ -9235,7 +9235,7 @@ sub get_location {
return $location;
}
if(defined($location->{geometry}{location}{lat}) && defined($location->{geometry}{location}{lng})) {
# print Data::Dumper->new([$location])->Dump();
print Data::Dumper->new([$location])->Dump() if($opts{'v'});
my $rc = Class::Simple->new();
$rc->long($location->{geometry}{location}{lng});
$rc->lat($location->{geometry}{location}{lat});
Expand Down

0 comments on commit 97f78f2

Please sign in to comment.