minor
svn: r11859
This commit is contained in:
parent
943b22ebeb
commit
6bb96f95b0
|
@ -183,7 +183,7 @@
|
||||||
(input-port->text-input-port (open-input-text-editor
|
(input-port->text-input-port (open-input-text-editor
|
||||||
defs 0 'end snip->text))
|
defs 0 'end snip->text))
|
||||||
(open-input-text-editor defs))]
|
(open-input-text-editor defs))]
|
||||||
[current-output-port (open-output-string)])
|
[current-output-port (open-output-bytes)])
|
||||||
(input->process->output maxwidth textualize? untabify? bad-re)
|
(input->process->output maxwidth textualize? untabify? bad-re)
|
||||||
(get-output-bytes (current-output-port)))))
|
(get-output-bytes (current-output-port)))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user