Noted a FIXME

nigelhorne · Dec 7, 2023 · 2687bfc · 2687bfc
1 parent 905358b
commit 2687bfc
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/gedcom b/gedcom
@@ -1904,6 +1904,7 @@ sub print_person
 				push @{$all_places{$p}}, $person;
 			}
 		}
+		# FIXME: if there is more than one marriage, only gets one
 		for my $event('birth', 'baptism', 'marriage', 'death', 'burial') {
 			my $p;
 			if(my $r = $person->get_record($event)) {