another typo

svn: r3018
2006-05-23 18:36:50 +00:00 · 2006-05-23 18:36:50 +00:00 · ca058b277c
commit ca058b277c
parent 4f7e2015fe
1 changed files with 1 additions and 1 deletions
--- a/collects/setup/configtab.ss
+++ b/collects/setup/configtab.ss
@ -68,7 +68,7 @@
                     [else (loop (cdr names) (cdr syms))]))
 	     (with-syntax ([(expr ...)
                            (map (lambda (name val)
-                                   (if (memq name path-exports)
+                                   (if (memq (syntax-e name) path-exports)
                                     #`(delay #,val) val))
                                 (syntax->list #'(name ...))
                                 (syntax->list #'(val  ...)))])