define => define/private (in a class)

2012-05-14 21:43:11 -05:00 · 2012-05-14 21:43:11 -05:00 · 9e7eb963d7
commit 9e7eb963d7
parent fbbf8579e0
1 changed files with 1 additions and 1 deletions
--- a/collects/drracket/private/module-language.rkt
+++ b/collects/drracket/private/module-language.rkt
@ -102,7 +102,7 @@
                (parameterize ([current-security-guard drracket:init:system-security-guard])
                  (((dynamic-require mp name) val) key default)))))]
          [else default]))
-      (define (init-sandbox)
+      (define/private (init-sandbox)
        (unless sandbox
          (when language-info
            ;; creating a sanbox can fail in strange ways so we just