fixed a bug revealed by drdr (but stil cant make this bad case happen on my machine, frustratingly

svn: r17942
This commit is contained in:
Robby Findler 2010-02-02 18:01:55 +00:00
parent 8dc290d077
commit 319a4a7ef0

View File

@ -122,7 +122,7 @@
(fprintf (current-error-port)
"\nExists/Meets window with no button: Bug? seed ~s\n"
the-seed)
(apply show-log (cons action actions))
(apply show-log actions)
(error 'randomly-click.ss "giving up")]))]))]))))))
(define (show-log . actions)