syntax/parse/experimental/template: fix bad initial environment

This commit is contained in:
Ryan Culpepper 2012-09-17 02:35:22 -04:00
parent 9d34f0f147
commit fcac1fdc50

View File

@ -70,7 +70,7 @@ A HeadTemplate (H) is one of:
#`(quote-syntax t)]
[else
(with-syntax ([props-guide props-guide])
#`(substitute (quote-syntax t) 'props-guide '_ #f))])]
#`(substitute (quote-syntax t) 'props-guide '_ '#()))])]
[else
(with-syntax ([guide guide]
[props-guide props-guide]