original commit: 5b862c32b245c151fe69d1b10dae614dd58aacc9
This commit is contained in:
Matthew Flatt 2005-04-30 15:55:21 +00:00
parent 1f2b12c7d2
commit 06a3d84e18

View File

@ -300,7 +300,7 @@
[(special . is-a? . wx:snip%)
(force-text)
(send text insert special pos)
(set! pos (send special get-count))]
(set! pos (+ pos (send special get-count)))]
[else
(display special port)]))
#t)