 ui.gadgets.paragraphs ui.gadgets.presentations
 ui.gadgets.private ui.gadgets.scrollers ui.gadgets.tracks
 ui.gestures ui.images ui.pens.solid ui.render ui.theme
-ui.traverse ;
+ui.traverse unicode ;
 FROM: io.styles => foreground background ;
 FROM: ui.gadgets.wrappers => <wrapper> ;
 IN: ui.gadgets.panes

M: pane-stream stream-write1
    [ current>> stream-write1 ] do-pane-stream ;

M: pane-stream stream-write
    [ [ split-lines ] dip pane-write ] do-pane-stream ;

M: pane-stream stream-format
    [ [ split-lines ] 2dip pane-format ] do-pane-stream ;

M: pane-stream dispose drop ;


! Copyright (C) 2005, 2010 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs classes combinators destructors
documents.private fonts fry io io.styles kernel locals math
math.rectangles math.vectors memoize models namespaces sequences
sorting splitting strings ui.baseline-alignment ui.clipboards
ui.gadgets ui.gadgets.borders ui.gadgets.grid-lines
