Fixed a typo (syntax-quote => quote-syntax).

(cherry picked from commit bb828c312f)
This commit is contained in:
Carl Eastlund 2011-10-18 16:17:54 -04:00 committed by Eli Barzilay
parent b2e1bd0645
commit 0eb11080c2

View File

@ -86,7 +86,7 @@
(syntax-parser #:literals [unsyntax]
[(~and orig (_ (unsyntax e:expr)))
#'(racketmodname
(unsyntax `(planet ,(make-planet-symbol (syntax-quote orig) e))))]
(unsyntax `(planet ,(make-planet-symbol (quote-syntax orig) e))))]
[(_ suffix:id/this-package)
#'(racketmodname (planet suffix.planet-id))]))