And I should heed my own advice about testing.

On Wed, Jun 21, 2017 at 8:40 PM, Jon Zeppieri <[email protected]> wrote:
>
> #lang at-exp racket
>
> (define (normalize-keywords in)
>   (regexp-replace*
>    @pregexp|{Keywords ?= ?\{\s*([^}]*)\}}|
>    in
>    (λ (_ s)

You may have noticed that I left out part of the replacement string. :)

>      (string-join
>       (map capitalize-first (regexp-split #px", *" s))
>       ", "))))

Ahem...

   (λ (_ s)
     (string-append
      "Keywords = {"
      (string-join
       (map capitalize-first (regexp-split #px", *" s))
       ", ")
      "}"))

-- 
You received this message because you are subscribed to the Google Groups 
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to