refinement to recent commit suggested by Ryan

2012-08-24 12:43:04 -05:00 · 2012-08-24 12:43:04 -05:00 · c42fbb68cb
commit c42fbb68cb
parent 605e1b8c89
1 changed files with 3 additions and 1 deletions
--- a/collects/racket/syntax.rkt
+++ b/collects/racket/syntax.rkt
@ -83,7 +83,9 @@
    (when uses
      (current-recorded-disappeared-uses 
       (append
-        (map syntax-local-introduce ids)
+        (if (syntax-transforming?)
+            (map syntax-local-introduce ids)
+            ids)
        uses)))))