diff --git a/collects/drscheme/private/unit.ss b/collects/drscheme/private/unit.ss
index e404cbc7e6..40c3600758 100644
--- a/collects/drscheme/private/unit.ss
+++ b/collects/drscheme/private/unit.ss
@@ -1032,7 +1032,11 @@ module browser threading seems wrong.
           enable-evaluation
           disable-evaluation
           get-definitions/interactions-panel-parent
-          register-capability-menu-item))
+          register-capability-menu-item
+          
+          ensure-rep-shown
+          ensure-rep-hidden
+          ensure-defs-shown))
       
       (define frame-mixin
         (mixin (drscheme:frame:<%> frame:searchable-text<%> frame:delegate<%> frame:open-here<%>)
diff --git a/collects/drscheme/syncheck.ss b/collects/drscheme/syncheck.ss
index 4fe5b90ba1..b863a7a553 100644
--- a/collects/drscheme/syncheck.ss
+++ b/collects/drscheme/syncheck.ss
@@ -924,7 +924,7 @@ If the namespace does not, they are colored the unbound color.
               (set! rest-panel r-root)
               r-root))
 
-          (inherit open-status-line close-status-line update-status-line)
+          (inherit open-status-line close-status-line update-status-line ensure-rep-hidden)
           ;; syncheck:button-callback : (case-> (-> void) ((union #f syntax) -> void)
           ;; this is the only function that has any code running on the user's thread
           (define/public syncheck:button-callback
@@ -934,6 +934,7 @@ If the namespace does not, they are colored the unbound color.
                (when (send check-syntax-button is-enabled?)
                  (open-status-line 'drscheme:check-syntax)
                  (update-status-line 'drscheme:check-syntax status-init)
+                 (ensure-rep-hidden)
                  (let-values ([(expanded-expression expansion-completed) (make-traversal)])
                    (let* ([definitions-text (get-definitions-text)]
                           [drs-eventspace (current-eventspace)]
diff --git a/collects/tests/framework/keys.ss b/collects/tests/framework/keys.ss
index b6bc2dffe3..e53e5580a5 100644
--- a/collects/tests/framework/keys.ss
+++ b/collects/tests/framework/keys.ss
@@ -141,7 +141,8 @@
      (build-open-bracket-spec "(let loop " 10 #\()
      (build-open-bracket-spec "(let loop (" 11 #\[)
      (build-open-bracket-spec "(case x " 8 #\[)
-     (build-open-bracket-spec "(case x [" 9 #\()))
+     (build-open-bracket-spec "(case x [" 9 #\()
+     (build-open-bracket-spec "(let ([])(" 10 #\()))
   
   
   (send-sexp-to-mred `(send (make-object frame:basic% "dummy to trick frame group") show #t))