From 412b3fb4a0228a9dba2a40b22b370268a6f67553 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sat, 19 Feb 2005 21:09:28 +0000 Subject: [PATCH] . original commit: 7072f42b8ee247fea6802236b34337174a386d16 --- collects/framework/private/menu.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/framework/private/menu.ss b/collects/framework/private/menu.ss index ce73b79e..c890e4fb 100644 --- a/collects/framework/private/menu.ss +++ b/collects/framework/private/menu.ss @@ -23,7 +23,7 @@ (unless (eq? saved-shortcut 'not-yet) (set-shortcut saved-shortcut))) - (super-instantiate ()) + (super-new) (set! saved-shortcut (get-shortcut)) (unless (preferences:get 'framework:menu-bindings) (set-shortcut #f)))) @@ -42,7 +42,7 @@ (unless (eq? saved-label 'not-yet-saved-label) (set-label saved-label))) (define saved-label 'not-yet-saved-label) - (super-instantiate ()) + (super-new) (set! saved-label (get-label)) (unless (preferences:get 'framework:menu-bindings) (erase-underscores))))