From 6c1c14b33347ddcfde8068c4830c6d673d3a740b Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 22 Jun 2023 13:11:03 -0400 Subject: [PATCH] latin-ltx.el: Add \Phi; fix bug#64212 * lisp/leim/quail/latin-ltx.el (greek letters): Fix regexp which was meant to avoid lowercase phi only. --- lisp/leim/quail/latin-ltx.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/leim/quail/latin-ltx.el b/lisp/leim/quail/latin-ltx.el index 21a01c85737..9be3d722504 100644 --- a/lisp/leim/quail/latin-ltx.el +++ b/lisp/leim/quail/latin-ltx.el @@ -244,7 +244,8 @@ system, including many technical ones. Examples: ;; (which is \varphi) are reversed in `ucs-names', so we define ;; them manually. Also ignore "GREEK SMALL LETTER EPSILON" and ;; add the correct value for \epsilon manually. - (unless (string-match-p "\\<\\(?:PHI\\|GREEK SMALL LETTER EPSILON\\)\\>" name) + (unless (string-match-p "\\" + name) (concat "\\" (funcall (if (match-end 1) #' capitalize #'downcase) (match-string 2 name))))) "\\`GREEK \\(?:SMALL\\|CAPITA\\(L\\)\\) LETTER \\([^- ]+\\)\\'") -- 2.39.2