From 689f4212520bfe96cc8b060c4514abe7f97d0d64 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Fri, 4 Sep 2020 06:43:13 +0200 Subject: [PATCH] Allow "lambda" spelling for ucs-insert * lisp/international/mule-cmds.el (ucs-names): Add a "LAMBDA" completion variant for every "LAMDA" name (bug#30513). --- lisp/international/mule-cmds.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 02dacaf0a28..e49d1fa91e0 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -3010,6 +3010,15 @@ on encoding." ;; higher code, so it gets pushed later! (if new-name (puthash new-name c names)) (if old-name (puthash old-name c names)) + ;; Unicode uses the spelling "lamda" in character + ;; names, instead of "lambda", due to "preferences + ;; expressed by the Greek National Body" (Bug#30513). + ;; Some characters have an old-name with the "lambda" + ;; spelling, but others don't. Add the traditional + ;; spelling for more convenient completion. + (when (and (not old-name) new-name + (string-match "LAMDA" new-name)) + (puthash (replace-match "LAMBDA" t t new-name) c names)) (setq c (1+ c)))))) ;; Special case for "BELL" which is apparently the only char which ;; doesn't have a new name and whose old-name is shadowed by a newer -- 2.39.2