syndicate-lang
/
racket-ssh-2012
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Start sandboxes with racket/base instead of full racket.

This commit is contained in:
Tony Garnock-Jones 2011-11-02 19:25:39 -04:00
parent 091d6796a9
commit 6b967002c5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
repl-server.rkt
View File

@ -84,7 +84,7 @@
(define (get-user-state username)
(when (not (hash-has-key? *user-states* username))
(let* ((sb (make-evaluator 'racket))
(let* ((sb (make-evaluator 'racket/base))
(ns (call-in-sandbox-context sb current-namespace)))
(parameterize ((current-namespace ns))
(namespace-set-variable-value! 'help help)