generate more descriptive internal module name

9 years ago · 30823c839a
parent 81f9b51bbc
commit 30823c839a
1 changed files with 1 additions and 1 deletions
--- a/pollen/private/main-base.rkt
+++ b/pollen/private/main-base.rkt
@ -22,7 +22,7 @@
                         [MODE-MARKDOWN (datum->syntax #'(EXPR (... ...)) world:mode-markdown)]
                         [SPLICING_TAG (datum->syntax #'(EXPR (... ...)) (world:current-splicing-tag))]
                         [DOC (format-id #'(EXPR (... ...)) "~a" (world:current-main-export))]
-                         [DOC-RAW (generate-temporary)]); prevents conflicts with other imported Pollen sources
+                         [DOC-RAW (generate-temporary 'pollen-)]); prevents conflicts with other imported Pollen sources
             (replace-context #'(EXPR (... ...))
                              #'(#%module-begin
                                 (module META-MOD racket/base