fix classes so we can see the constructor in the blueboxes now
This commit is contained in:
parent
9b026739ed
commit
f7672c6186
|
@ -24,7 +24,7 @@
|
||||||
(pair? tag)
|
(pair? tag)
|
||||||
(eq? (car tag) 'def))
|
(eq? (car tag) 'def))
|
||||||
(define constructor-strs
|
(define constructor-strs
|
||||||
(fetch-strs-for-single-tag (cons 'construtor (cdr tag)) cache))
|
(fetch-strs-for-single-tag (cons 'constructor (cdr tag)) cache))
|
||||||
(if constructor-strs
|
(if constructor-strs
|
||||||
(append plain-strs
|
(append plain-strs
|
||||||
'("")
|
'("")
|
||||||
|
|
Loading…
Reference in New Issue
Block a user