diff --git a/collects/tests/mzscheme/basic.ss b/collects/tests/mzscheme/basic.ss
index e027a0b771..19529741e4 100644
--- a/collects/tests/mzscheme/basic.ss
+++ b/collects/tests/mzscheme/basic.ss
@@ -1433,13 +1433,14 @@
             (vector exn))
           (lambda ()
             (raise 'except))))))
-(test '(except) 'escape
+(test '#((except)) 'escape
       (with-handlers ([void (lambda (x) x)])
         (values
          (call-with-exception-handler
           (lambda (exn)
             (vector exn))
           (lambda ()
+            ;; (Used to replace enclosing, but not any more)
             (call-with-exception-handler
              (lambda (exn)
                (list exn))