Re-enable debugging of unknown records

nigelhorne · Aug 9, 2024 · 4f99f6f · 4f99f6f
1 parent 229a174
commit 4f99f6f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ged2site b/ged2site
@@ -6706,7 +6706,7 @@ sub print_person
 				($type ne 'Register UK 1939')) {
 
 				complain({ person => $person, warning => "Unhandled event type: $type" });
-				# die 'TODO: ', $person->as_string({ nee => 1, include_years => 1, middle_names => 1 }), " event type $type";
+				die 'TODO: ', $person->as_string({ nee => 1, include_years => 1, middle_names => 1 }), " event type $type";
 				if(my $notes = notes(record => $event, note_locations => \@note_locations)) {
 					$notes = ucfirst($notes);
 					$bio .= " ($notes)";
@@ -7213,7 +7213,7 @@ sub print_person
 					($type ne 'Race') &&
 					($type ne 'Hospitalisation')) {
 					complain({ person => $person, warning => "Unhandled event type: $type" });
-					# die 'TODO: ', $person->as_string({ nee => 1, include_years => 1, middle_names => 1 }), " event type $type";
+					die 'TODO: ', $person->as_string({ nee => 1, include_years => 1, middle_names => 1 }), " event type $type";
 					if(my $notes = notes(record => $event, note_locations => \@note_locations)) {
 						$notes =~ s/[\s\.]+$//;
 						my $date = year(record => $event);