From 4051f5379cea70610814c61cfa581d9b235ecc46 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 30 Aug 2014 12:22:53 +0300 Subject: [PATCH] admin/authors.el (authors): Fix last change so it works for MS-Windows as well. --- admin/ChangeLog | 5 +++++ admin/authors.el | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/admin/ChangeLog b/admin/ChangeLog index 6ae82aac327..f4bfa73911c 100644 --- a/admin/ChangeLog +++ b/admin/ChangeLog @@ -1,3 +1,8 @@ +2014-08-30 Eli Zaretskii + + * authors.el (authors): Fix last change so it works for MS-Windows + as well. + 2014-08-29 Michael Albinus * authors.el (authors): Use LOCALE argument of `string-collate-lessp'. diff --git a/admin/authors.el b/admin/authors.el index 248d0bf576a..cf989e11d95 100644 --- a/admin/authors.el +++ b/admin/authors.el @@ -1315,7 +1315,10 @@ list of their contributions.\n") (setq authors-author-list (sort authors-author-list (lambda (a b) - (string-collate-lessp (car a) (car b) "en_US.UTF-8")))) + (string-collate-lessp (car a) (car b) + (if (eq system-type 'windows-nt) + "enu_USA" + "en_US.UTF-8"))))) (dolist (a authors-author-list) (let ((author (car a)) (wrote (nth 1 a)) -- 2.39.5