suzanne.soy/distro-build
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

distro-build/download-page: strip "{...}" anywhere, not just at start

Browse Source 
original commit: dec1a83e0d98c1a0ef5804db6dec7ca3855bb303
This commit is contained in:
Matthew Flatt 2013-09-12 06:50:34 -06:00
parent edd59cbc94
commit d714cd3742
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/distro-build/download-page.rkt
View File

@ -64,7 +64,7 @@
(define sorted-and-split (define sorted-and-split
(map (lambda (s) (map (lambda (s)
(map (lambda (e) (map (lambda (e)
(regexp-replace* #rx"^ *{[^}]*} *" (regexp-replace* #rx" *{[^}]*} *"
e e
"")) ""))
(regexp-split #rx" *[|] *" s))) (regexp-split #rx" *[|] *" s)))