[plt-scheme] Re: Style question

[Tomasz]

On May 31, 11:40 am, Tomasz <tomasz.skut... at gmail.com> wrote:

>
> Thanks - that helped. I'll probably take procedure-rename route.
>

Well... taking that route didn't work. procedure-rename drops keyword
arguments. Consider test case:

--8<--------------

#lang scheme

(define (kwtest #:p1 p1)
  (list p1))

(procedure-keywords kwtest)

(procedure-keywords (procedure-rename kwtest 'kwtest2))

--8<--------------

that produces:

(#:p1)
(#:p1)
()
()

Is this planned/desirable effect? Should I fill bug-report?

Tomasz