martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

; * lisp/leim/quail/latin-ltx.el: Fix regexp in last commit.

Browse Source
This commit is contained in:
Stefan Kangas
2020-08-11 08:47:40 +02:00
parent 9c702b5ad6
commit 0d0aad213f
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/leim/quail/latin-ltx.el
View File

@@ -244,7 +244,7 @@ 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 "\\<\\(?:PHI\\|GREEK SMALL LETTER EPSILON\\)\\>" name)
(concat "\\" (funcall (if (match-end 1) #' capitalize #'downcase)
(match-string 2 name)))))
"\\`GREEK \\(?:SMALL\\|CAPITA\\(L\\)\\) LETTER \\([^- ]+\\)\\'")