Re: very obscure problem, help needed

[Dale P. Smith]

David Pirotte wrote:
> 
>         I call 'system-date' (code follows)
>         ==> I have a complete mess in my generated html pages
> 
>         system-date:
> 
>         (define (system-date . rest)
>           (let ((p (open-input-pipe (if (null? rest)
>                                         "date '+%d-%m-%Y'"
>                                         (format #f "date ~A" (car rest))))))
>             (let ((line (read-line p)))
>               (close-pipe p)
>               line)))

I'm just curious why you are not using strftime?  It seems a waste to
start a new process just to format a date!  Or are you changing the
date?

The response from Dirk about flushing buffers first before forking will
probably fix your problem.

-Dale

-- 
Dale P. Smith
Altus Technologies Corp.
address@hidden
400-746-9000 x309