From 676915b5e407eff12b4d4bd9abd476fe957a7a81 Mon Sep 17 00:00:00 2001 From: Nigel Horne Date: Sat, 15 Jun 2024 17:22:54 -0400 Subject: [PATCH] Fix double spacing --- ged2site | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ged2site b/ged2site index e9d132d4..dc511dd8 100755 --- 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'); }