From a8de2e20e093bb45231327e824ceb8421993634e Mon Sep 17 00:00:00 2001
From: Brendan O'Dea <bod@debian.org>
Date: Sat, 5 Feb 2022 07:51:03 +0100
Subject: [PATCH] Remove kerning escapes in woman mode

* lisp/woman.el (woman-decode-region): Remove kerning escapes
(bug#53770).

Copyright-paperwork-exempt: yes
---
 lisp/woman.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/woman.el b/lisp/woman.el
index 2e0d9a9090d..e16785329a4 100644
--- a/lisp/woman.el
+++ b/lisp/woman.el
@@ -2280,9 +2280,9 @@ Currently set only from \\='\\\" t in the first line of the source file.")
       (replace-match woman-unpadded-space-string t t))
 
     ;; Discard optional hyphen \%; concealed newlines \<newline>;
-    ;; point-size change function \sN,\s+N, \s-N:
+    ;; kerning \/, \,; point-size change function \sN,\s+N, \s-N:
     (goto-char from)
-    (while (re-search-forward "\\\\\\([%\n]\\|s[-+]?[0-9]+\\)" nil t)
+    (while (re-search-forward "\\\\\\([%\n/,]\\|s[-+]?[0-9]+\\)" nil t)
       (woman-delete-match 0))
 
     ;; BEWARE: THIS SHOULD PROBABLY ALL BE DONE MUCH LATER!!!!!
-- 
2.39.5