Fix double spacing

nigelhorne · Jun 15, 2024 · 676915b · 676915b
1 parent ebf642e
commit 676915b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/ged2site b/ged2site
@@ -7373,12 +7373,13 @@ sub print_person
 				$phrase->append(" aussi o\N{U+00F9} " . lcfirst($pronoun));
 			} else {
 				if($end_of_sentence) {
+					$bio =~ s/\s$//;
 					$bio .= ' That';
 				} else {
 					$bio .= ', which';
 				}
 				if(scalar(@phrases) == 0) {
-					$phrase->set(' That');
+					$phrase->set('That');
 				} else {
 					$phrase->append(', which');
 				}