Try suggestion for pjcj/Gedcom.pm#28

nigelhorne · Jul 30, 2024 · 4b80425 · 4b80425
1 parent 6d5e62a
commit 4b80425
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/ged2site b/ged2site
@@ -9527,6 +9527,10 @@ sub Gedcom::Individual::as_string
 		if($nsfx) {
 			die $nsfx;
 		}
+		$nsfx = $self->tag_record('NAME NSFX');	# Try suggestion for https://github.com/pjcj/Gedcom.pm/issues/28
+		if($nsfx) {
+			die $nsfx;
+		}
 		$nsfx = get_value({ person => $self, value => 'nsfx' });
 		if($nsfx) {
 			die $nsfx;