fixed a bug in the way snip->value handlers supplied by tools were handled.
svn: r2643
This commit is contained in:
parent
760a22de57
commit
096b38ed33
|
@ -403,7 +403,8 @@
|
|||
|
||||
;; leave-snips-alone-hook : any? (any? -> printable) any? -> printable
|
||||
(define ((leave-snips-alone-hook sh) expr basic-convert sub-convert)
|
||||
(if (is-a? expr snip%)
|
||||
(if (or (is-a? expr snip%)
|
||||
(to-snip-value? expr))
|
||||
expr
|
||||
(sh expr basic-convert sub-convert)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user