Fixed a typo (syntax-quote => quote-syntax).
(cherry picked from commit bb828c312f
)
This commit is contained in:
parent
b2e1bd0645
commit
0eb11080c2
|
@ -86,7 +86,7 @@
|
||||||
(syntax-parser #:literals [unsyntax]
|
(syntax-parser #:literals [unsyntax]
|
||||||
[(~and orig (_ (unsyntax e:expr)))
|
[(~and orig (_ (unsyntax e:expr)))
|
||||||
#'(racketmodname
|
#'(racketmodname
|
||||||
(unsyntax `(planet ,(make-planet-symbol (syntax-quote orig) e))))]
|
(unsyntax `(planet ,(make-planet-symbol (quote-syntax orig) e))))]
|
||||||
[(_ suffix:id/this-package)
|
[(_ suffix:id/this-package)
|
||||||
#'(racketmodname (planet suffix.planet-id))]))
|
#'(racketmodname (planet suffix.planet-id))]))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user