original commit: bb93a1ee9a90f9979a1b74dd913d1314e9fd465f
This commit is contained in:
Matthew Flatt 2005-02-18 03:02:04 +00:00
parent ac137dea94
commit 8b9f07f119

View File

@ -226,8 +226,7 @@
(public
[defaulting (lambda (on?)
(set! border-on? on?)
(when border?
(set-border border-on?)))]
(set-border border-on?))]
[has-border? (lambda () border-on?)])
(override
[char-to (lambda ()