equal
deleted
inserted
replaced
608 Also fork a reader process, to read the shells output and |
608 Also fork a reader process, to read the shells output and |
609 tell me, whenever something arrives" |
609 tell me, whenever something arrives" |
610 |
610 |
611 |p slaveFD execFdArray blocked exitStatus| |
611 |p slaveFD execFdArray blocked exitStatus| |
612 |
612 |
|
613 self create. "/ need my windowID (to pass down in environment) |
|
614 |
613 p := ExternalStream makePTYPair. |
615 p := ExternalStream makePTYPair. |
614 p isNil ifTrue:[ |
616 p isNil ifTrue:[ |
615 self warn:'cannot open pty'. |
617 self warn:'cannot open pty'. |
616 ^ self. |
618 ^ self. |
617 ]. |
619 ]. |
685 |
687 |
686 " |
688 " |
687 VT100TerminalView openShell |
689 VT100TerminalView openShell |
688 " |
690 " |
689 |
691 |
690 "Modified: / 13.6.1998 / 19:08:45 / cg" |
692 "Modified: / 13.6.1998 / 19:20:54 / cg" |
691 ! ! |
693 ! ! |
692 |
694 |
693 !TerminalView methodsFor:'menu'! |
695 !TerminalView methodsFor:'menu'! |
694 |
696 |
695 editMenu |
697 editMenu |
795 ! ! |
797 ! ! |
796 |
798 |
797 !TerminalView class methodsFor:'documentation'! |
799 !TerminalView class methodsFor:'documentation'! |
798 |
800 |
799 version |
801 version |
800 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.33 1998-06-13 17:19:43 cg Exp $' |
802 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.34 1998-06-13 17:22:26 cg Exp $' |
801 ! ! |
803 ! ! |