Writing time-records turns off string quoting

This session demonstrates the problem:

Ypsilon 0.9.6-trunk/r503 Copyright (c) 2009 Y.Fujita, LittleWing Company
Limited.
> (import (srfi :19 time))
> (write (list "test" (condition) "test"))
("test" #<condition ()> "test")
> (write (list "test" (current-time) "test"))
("test" #<record time time-utc 981341000 1248439023> test)

This is a minor cosmetic bug, but in the last line the string looks as if
it was written with display instead of write.

Original issue reported on code.google.com by weinh...@gmail.com on 24 Jul 2009 at 12:42

paines / ypsilon

Writing time-records turns off string quoting #113