macro-stepper: extra guard in on-demand id-only popup submenu
This commit is contained in:
parent
c50ab191d6
commit
eb1c164aca
|
@ -118,7 +118,7 @@
|
||||||
(demand-callback
|
(demand-callback
|
||||||
(lambda (i)
|
(lambda (i)
|
||||||
(let ([stx (selected-syntax)])
|
(let ([stx (selected-syntax)])
|
||||||
(when stx
|
(when (identifier? stx)
|
||||||
(send i set-label
|
(send i set-label
|
||||||
(format "Format ~s ~a" (syntax-e stx) (cadr sym+desc)))))))
|
(format "Format ~s ~a" (syntax-e stx) (cadr sym+desc)))))))
|
||||||
(callback
|
(callback
|
||||||
|
|
Loading…
Reference in New Issue
Block a user