12 lines
201 B
Scheme
12 lines
201 B
Scheme
|
|
(module editor mzscheme
|
|
(require mzlib/class
|
|
"private/class-help.ss")
|
|
|
|
(provide editor%)
|
|
|
|
(define editor%
|
|
(class object%
|
|
(init-accessible content-port)
|
|
(super-new))))
|