From f2385d6d75ac85bb841dc91e5f7357b6c2df8731 Mon Sep 17 00:00:00 2001
From: Nigel Horne <njh@bandsman.co.uk>
Date: Thu, 31 Oct 2024 14:19:57 -0400
Subject: [PATCH] Combine regex

---
 gedcom | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/gedcom b/gedcom
index c0a7307..2c1a778 100755
--- a/gedcom
+++ b/gedcom
@@ -13429,11 +13429,12 @@ sub wide_to_html
 	# $string =~ s/&id=/&amp;id=/g;
 
 	unless($params->{'keep_apos'}) {
-		$string =~ s/'/&apos;/g;
-		$string =~ s/‘/&apos;/g;
-		$string =~ s/’/&apos;/g;
-		$string =~ s/‘/&apos;/g;
-		$string =~ s/\x98/&apos;/g;
+		# $string =~ s/'/&apos;/g;
+		# $string =~ s/‘/&apos;/g;
+		# $string =~ s/’/&apos;/g;
+		# $string =~ s/‘/&apos;/g;
+		# $string =~ s/\x98/&apos;/g;
+		$string =~ s/['‘’‘\x98]/&apos;/g;
 	}
 
 	if($string !~ /[^[:ascii:]]/) {