From 42450329833848370e8ffa74fb9c37c26f02ac16 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Mon, 9 Oct 2006 15:38:20 +0000 Subject: [PATCH] Fixed linking bug svn: r4532 original commit: a9301386437e4bb09067a3f8528012ad2a83f745 --- collects/macro-debugger/view/view.ss | 11 +++-------- 1 file changed, 3 insertions(+), 8 deletions(-) diff --git a/collects/macro-debugger/view/view.ss b/collects/macro-debugger/view/view.ss index 502a2bc..8842013 100644 --- a/collects/macro-debugger/view/view.ss +++ b/collects/macro-debugger/view/view.ss @@ -1,12 +1,9 @@ (module view mzscheme (require (lib "unitsig.ss") - (lib "class.ss") (lib "mred.ss" "mred") (lib "framework.ss" "framework") - (prefix sb: "../syntax-browser/embed.ss") "interfaces.ss" - "prefs.ss" "gui.ss") (provide (all-defined)) @@ -19,9 +16,7 @@ (define-values/invoke-unit/sig view^ (compound-unit/sig (import) - (link (PREFS : prefs^ (prefs@)) - (SB : sb:implementation^ (sb:implementation@)) - (BASE : view-base^ (view-base@)) - (VIEW : view^ (view@ BASE SB))) - (export (open VIEW)))) + (link [BASE : view-base^ (view-base@)] + [STEPPER : view^ (pre-stepper@ BASE)]) + (export (open STEPPER)))) )