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.
This commit is contained in:
Eli Zaretskii 2021-08-30 15:42:32 +03:00
parent 670b423ebc
commit b654420b1b

View file

@ -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")