www

commit 42450329833848370e8ffa74fb9c37c26f02ac16
parent e7dda368369a81c92591703262b5951320562637
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Mon,  9 Oct 2006 15:38:20 +0000

Fixed linking bug

svn: r4532

original commit: a9301386437e4bb09067a3f8528012ad2a83f745

Diffstat:
M
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
@@ -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))))
   )