repair hack for beginner-proc names

(cherry picked from commit 4e47c669ca)
This commit is contained in:
John Clements 2012-07-24 06:42:00 -04:00 committed by Ryan Culpepper
parent 6e7afe454b
commit 2e8cc1510d

View File

@ -655,7 +655,7 @@
(if m (if m
(datum->syntax s (string->symbol (cadr m)) s s) (datum->syntax s (string->symbol (cadr m)) s s)
s))) s)))
(define re:beginner: (regexp "^beginner:(.*)$")) (define re:beginner: (regexp "^beginner-(.*)$"))
;; eval-quoted : take a syntax that is an application of quote, and evaluate it (for display) ;; eval-quoted : take a syntax that is an application of quote, and evaluate it (for display)