summaryrefslogtreecommitdiff
path: root/gui.rkt
diff options
context:
space:
mode:
Diffstat (limited to 'gui.rkt')
-rw-r--r--gui.rkt4
1 files changed, 2 insertions, 2 deletions
diff --git a/gui.rkt b/gui.rkt
index d379082..661f138 100644
--- a/gui.rkt
+++ b/gui.rkt
@@ -9,7 +9,7 @@
(require "full-parse.rkt")
-(define ns (current-namespace))
+(define ns (make-base-namespace))
(namespace-set-variable-value! '^ expt #t ns)
(define (show-window)
@@ -86,6 +86,6 @@
(lambda (button event)
(define ^ expt)
(send msg set-label (~a
- (eval (full-parse (send msg get-label))))))])
+ (eval (full-parse (send msg get-label)) ns))))])
(send frame show #t))