From 1d3c22cc3ff980ab913237cb9025b3db3ca81a76 Mon Sep 17 00:00:00 2001
From: Nigel Horne <njh@bandsman.co.uk>
Date: Tue, 1 Oct 2024 17:32:09 -0400
Subject: [PATCH] Reorder for readability

---
 gedcom | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gedcom b/gedcom
index 306f6f5..ef7a8d2 100755
--- a/gedcom
+++ b/gedcom
@@ -13363,7 +13363,7 @@ sub wide_to_html
 	$string =~ s/\xe2\x97\x8f/&#x25CF;/g;	# ●
 
 	$string =~ s/\N{U+00A0}/ /g;
-	$string =~ s/\N{U+00A3}/&pound;/g,
+	$string =~ s/\N{U+00A3}/&pound;/g;
 	$string =~ s/\N{U+00A9}/&copy;/g;
 	$string =~ s/\N{U+00AA}/&ordf;/g;	# ª
 	$string =~ s/\N{U+00AB}/&quot;/g;	# «
@@ -13396,6 +13396,7 @@ sub wide_to_html
 	$string =~ s/\N{U+00FC}/&uuml;/g;	# ü
 	$string =~ s/\N{U+00FE}/&thorn;/g;	# þ
 	$string =~ s/\N{U+00C1}/&Aacute;/g;	# Á
+	$string =~ s/\N{U+00C9}/&Eacute;/g;
 	$string =~ s/\N{U+00CA}/&ecirc;/g;
 	$string =~ s/\N{U+00EB}/&euml;/g;
 	$string =~ s/\N{U+00F3}/&oacute;/g;