From b654420b1b9bd6f1da489278a7e18de7d1bf71dd Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 30 Aug 2021 15:42:32 +0300 Subject: [PATCH] Minor improvement in 'get-locale-names' on MS-Windows * lisp/international/mule-cmds.el (get-locale-names): Delete duplicate locales from the list returned by the MS-Windows implementation. --- lisp/international/mule-cmds.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index dc09dad2cb4..8494d540916 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -2616,7 +2616,7 @@ is returned. Thus, for instance, if charset \"ISO8859-2\", ;; On Windows we have a built-in method to get the names. ((and (fboundp 'w32-get-locale-info) (fboundp 'w32-get-valid-locale-ids)) - (mapcar #'w32-get-locale-info (w32-get-valid-locale-ids))) + (delete-dups (mapcar #'w32-get-locale-info (w32-get-valid-locale-ids)))) ;; Unix-ey hosts should have a command to output locales currently ;; defined by the OS. ((executable-find "locale") -- 2.39.2