[plt-dev] language dialog, some minor changes & bugfixes

It will download them, no?

Robby

On Fri, Jan 29, 2010 at 3:43 PM, Eli Barzilay <eli at barzilay.org> wrote:
> On Jan 29, Robby Findler wrote:
>> On Fri, Jan 29, 2010 at 2:24 PM, Eli Barzilay <eli at barzilay.org> wrote:
>> > Here's some rough code that is easy to translate to a port instead of
>> > a string:
>> >
>> >  (define (lang-line str)
>> >    (let* ([i (open-input-string str)]
>> >           [l (read-language i (lambda () '?))])
>> >      (if (eq? '? l)
>> >        (values "???" '???)
>> >        (values (regexp-replace #rx"^#(?:!|lang ) *"
>> >                                (substring str 0 (file-position i))
>> >                                "")
>> >                (l 'module-language '???)))))
>>
>> This doesn't work for planet packages, right?
>
> It should.  Do you see any errors?
>
> --
>          ((lambda (x) (x x)) (lambda (x) (x x)))          Eli Barzilay:
>                    http://barzilay.org/                   Maze is Life!
>