bram/kagi.el
1
0
Fork 0
Code Issues Activity

Minor formatting

Browse source
This commit is contained in:
Bram Schoenmakers 2023-12-29 23:16:23 +01:00
parent bf74326b6d
commit 49106bf695
Signed by: bram
GPG key ID: 0CCD19DFDC63258F
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
kagi.el
View file

@ -163,7 +163,9 @@ FastGPT with the following prompt:
(dolist (entry kagi--markup-to-face) (dolist (entry kagi--markup-to-face)
(cl-destructuring-bind (start end face) entry (cl-destructuring-bind (start end face) entry
(goto-char (point-min)) (goto-char (point-min))
(let ((regexp (rx (seq (literal start) (group (*? any)) (literal end))))) (let ((regexp (rx (seq (literal start)
(group (*? any))
(literal end)))))
(while (re-search-forward regexp nil t) (while (re-search-forward regexp nil t)
(let ((escaped-replacement (string-replace "\\" "\\\\" (match-string 1)))) (let ((escaped-replacement (string-replace "\\" "\\\\" (match-string 1))))
(replace-match (propertize escaped-replacement 'font-lock-face face) t nil) (replace-match (propertize escaped-replacement 'font-lock-face face) t nil)