Apply Gregory Cooper's suggestions

https://github.com/plt/racket/pull/138/files#r1447006
This commit is contained in:
Patrick Mahoney 2012-08-23 13:36:54 -04:00 committed by Gregory Cooper
parent 65c54a9dd9
commit 3d8fc4ad01

View File

@ -47,7 +47,7 @@
[(event-set? tmp) (format "#<event (last: ~a@~a)>"
(event-set-events tmp) (event-set-time tmp))]
[(undefined? tmp) "<undefined>"]
[else (number->string tmp)])))]
[else (format "~a" tmp)])))]
[(bhvr super-render-fun)
(get-rendering (value-now bhvr) super-render-fun)]))