Remove kerning escapes in woman mode
* lisp/woman.el (woman-decode-region): Remove kerning escapes (bug#53770). Copyright-paperwork-exempt: yes
This commit is contained in:
parent
72a3bbf27e
commit
a8de2e20e0
1 changed files with 2 additions and 2 deletions
|
@ -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!!!!!
|
||||
|
|
Loading…
Add table
Reference in a new issue