Planet and quotes

[Jens Axel Søgaard]

Hi all,

I have recently (re)startet Planet Scheme at

   <http://www.scheme.dk/planet/>.

In Scheme source single quotes are common. And it seems
the Planet software is keen on inserting newlines after
quotes.

Example:

At <http://www.scheme.dk/planet/> an entry is displayed as:

-----

(define distinct

   (lambda (x1 x2 x3 x4 x5)
     (let ([xs (list x1 x2 x3 x4 x5)])
       (all

        (membero '
omega xs)
        (membero '
blade xs)
        (membero '
gcross xs)
        (membero '
fleur xs)
        (membero '
cross xs)))))

-----


However on the original site

<http://www.scheme.dk/blog/2006/04/mini-kanren-and-da-vinci-quest-part-ii.html>

the same post reads:

-----

(define distinct
   (lambda (x1 x2 x3 x4 x5)
     (let ([xs (list x1 x2 x3 x4 x5)])
       (all
        (membero 'omega xs)
        (membero 'blade xs)
        (membero 'gcross xs)
        (membero 'fleur xs)
        (membero 'cross xs)))))

-----

Is this a known bug? Is an upgrade of Planet neccessary or are there a
quick fix?

-- 
Jens Axel Søgaard