.

original commit: dc880f033c2e20d506643918fd2f73e629d203b3
2004-07-05 15:26:05 +00:00 · 2004-07-05 15:26:05 +00:00 · 9672a78b02
commit 9672a78b02
parent 8a2f834c74
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/mred.ss
+++ b/collects/mred/mred.ss
@ -1545,7 +1545,7 @@
       [is-mdi-parent? #f])
     (public
       [get-the-menu-bar (lambda () menu-bar)]
-       [get-mdi-parent (lambda (x) x)]
+       [get-mdi-parent (lambda () is-mdi-parent?)]
       [set-mdi-parent (lambda (x) (and (set! is-mdi-parent? x) #t))])
     (override
       [set-menu-bar