suzanne.soy/racket-pkg-website
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Sort package names case-insensitively

Browse Source
This commit is contained in:
Tony Garnock-Jones 2016-08-18 05:45:40 -04:00
parent 43b70a6a91
commit 8bc1be2862
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/packages.rkt
View File

@ -259,7 +259,7 @@
(define (next-fetch-deadline) (manager-rpc 'next-fetch-deadline))
(define (sort-package-names names)
(sort names (lambda (a b) (string<? (symbol->string a) (symbol->string b)))))
(sort names (lambda (a b) (string-ci<? (symbol->string a) (symbol->string b)))))
(define (sorted-package-names)
(sort-package-names (all-package-names)))