fix snip test example setup

2015-12-27 08:26:03 -06:00 · 2015-12-27 08:26:03 -06:00 · fc61b26e04
commit fc61b26e04
parent 87e17a89da
1 changed files with 1 additions and 0 deletions
--- a/gui-doc/scribblings/gui/test-snip-example.rkt
+++ b/gui-doc/scribblings/gui/test-snip-example.rkt
@ -59,6 +59,7 @@
                    gui-loaded)))))
     
     (parameterize ([current-namespace (make-base-namespace)])
+       (namespace-attach-module orig-namespace 'mred/mred)
       (define loaded (format "~s" (dynamic-require save-filename 's)))
       (unless (regexp-match #rx"struct:object:circle-snip%" loaded)
         (error 'test-snip-example.rkt "didn't find circle snip.3, found ~s" loaded)))