wrong super interface
This commit is contained in:
parent
8a30ed73b7
commit
67d17645c4
|
@ -133,7 +133,7 @@
|
||||||
get-filename
|
get-filename
|
||||||
make-visible))
|
make-visible))
|
||||||
|
|
||||||
(define focus-table<%> (interface ((class->interface frame%))))
|
(define focus-table<%> (interface (top-level-window<%>)))
|
||||||
(define focus-table-mixin
|
(define focus-table-mixin
|
||||||
(mixin (top-level-window<%>) (focus-table<%>)
|
(mixin (top-level-window<%>) (focus-table<%>)
|
||||||
(inherit get-eventspace)
|
(inherit get-eventspace)
|
||||||
|
|
|
@ -163,7 +163,7 @@
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@definterface[frame:focus-table<%> (frame%)]{}
|
@definterface[frame:focus-table<%> (top-level-window<%>)]{}
|
||||||
|
|
||||||
@defmixin[frame:focus-table-mixin (frame%) (frame:focus-table<%>)]{
|
@defmixin[frame:focus-table-mixin (frame%) (frame:focus-table<%>)]{
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user