diff --git a/beautiful-racket-lib/br/syntax.rkt b/beautiful-racket-lib/br/syntax.rkt
index baf64b5..3d4ad9e 100644
--- a/beautiful-racket-lib/br/syntax.rkt
+++ b/beautiful-racket-lib/br/syntax.rkt
@@ -145,4 +145,7 @@
 (define-syntax (with-scopes stx)
   (syntax-case stx (syntax)
     [(_ (scope-id) (syntax expr))
-     #'(scope-id expr)]))
+     (with-syntax ([add-scope-id (format-id #'scope-id "add-~a" #'scope-id)])
+       #'(add-scope-id expr))]))
+
+