Wrap "words separated by BLANK characters" groups in LaTeX commands
This commit is contained in:
parent
1011bba04e
commit
bb87c04a71
@ -2262,9 +2262,9 @@ configuration.
|
|||||||
#'engrave-faces-latex--protect-content-mathescape
|
#'engrave-faces-latex--protect-content-mathescape
|
||||||
#'engrave-faces-latex--protect-content)
|
#'engrave-faces-latex--protect-content)
|
||||||
content)))
|
content)))
|
||||||
;; Wrap "words separated by space characters" groups in LaTeX commands.
|
;; Wrap "words separated by blank characters" groups in LaTeX commands.
|
||||||
;; Do not wrap newlines and other whitespace separating those groups.
|
;; Do not wrap newlines and other whitespace separating those groups.
|
||||||
(let ((regexp (rx (or (group-n 1 (+ graph ) (* (*? print) (+ graph)))
|
(let ((regexp (rx (or (group-n 1 (+ graph ) (* (+ blank) (+ graph)))
|
||||||
(group-n 2 (+ (any "\n" space))))))
|
(group-n 2 (+ (any "\n" space))))))
|
||||||
(slug (when (and style
|
(slug (when (and style
|
||||||
(eq engrave-faces-latex-output-style 'preset))
|
(eq engrave-faces-latex-output-style 'preset))
|
||||||
|
Loading…
Reference in New Issue
Block a user