Message ID | 20240203075645.20365-1-julien@lepiller.eu |
---|---|
State | New |
Headers | show |
Series | [bug#68907] website: Fix language order. | expand |
Julien Lepiller <julien@lepiller.eu> writes: > - (lambda (a b) string<?))) > + (lambda (a b) (string<? (car a) (car b))))) Whoops. LGTM. Now as a consequence of the patch, the English website will be listed as one among many. I do agree this is better. Regards, Florian
Le Sat, 03 Feb 2024 17:27:16 +0100, "pelzflorian (Florian Pelz)" <pelzflorian@pelzflorian.de> a écrit : > Julien Lepiller <julien@lepiller.eu> writes: > > - (lambda (a b) string<?))) > > + (lambda (a b) (string<? (car a) (car b))))) > > Whoops. LGTM. Now as a consequence of the patch, the English website > will be listed as one among many. I do agree this is better. > > Regards, > Florian Thanks, pushed to master as 8dfafa0a91f1e3ca84f7fe7fb8e5e31bf1bb1e8f.
diff --git a/website/apps/base/templates/components.scm b/website/apps/base/templates/components.scm index 241c27e..2a6881e 100644 --- a/website/apps/base/templates/components.scm +++ b/website/apps/base/templates/components.scm @@ -516,7 +516,7 @@ manual. (sort (delete %current-lingua ietf-tags-file-contents (lambda (a b) (string=? a (car b)))) - (lambda (a b) string<?))) + (lambda (a b) (string<? (car a) (car b))))) (list (menu-item #:label (G_ "Translate") #:active-item active-item