equal
deleted
inserted
replaced
285 (stdOutToStxPipe at:2) close. |
285 (stdOutToStxPipe at:2) close. |
286 (stxToStdinPipe at:1) close. |
286 (stxToStdinPipe at:1) close. |
287 ]. |
287 ]. |
288 |
288 |
289 shellPid isNil ifTrue:[ |
289 shellPid isNil ifTrue:[ |
290 self warn:'Cannot start shell'. |
290 "/ self warn:'Cannot start shell'. |
291 outStream close. |
291 outStream close. |
292 inStream close. |
292 inStream close. |
293 inStream := outStream := nil. |
293 inStream := outStream := nil. |
294 ^ self. |
294 ]. |
295 ]. |
295 ^ shellPid |
296 |
296 |
297 "Created: / 20.7.1998 / 18:19:32 / cg" |
297 "Created: / 20-07-1998 / 18:19:32 / cg" |
298 "Modified: / 5.5.1999 / 17:28:37 / cg" |
298 "Modified: / 01-08-2013 / 20:38:37 / cg" |
299 ! ! |
299 ! ! |
300 |
300 |
301 !TerminalSession methodsFor:'input / output'! |
301 !TerminalSession methodsFor:'input / output'! |
302 |
302 |
303 paste:someText |
303 paste:someText |
502 ! ! |
502 ! ! |
503 |
503 |
504 !TerminalSession class methodsFor:'documentation'! |
504 !TerminalSession class methodsFor:'documentation'! |
505 |
505 |
506 version |
506 version |
507 ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.5 2013-07-07 22:16:02 cg Exp $' |
507 ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.6 2013-08-01 18:47:02 cg Exp $' |
508 ! |
508 ! |
509 |
509 |
510 version_CVS |
510 version_CVS |
511 ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.5 2013-07-07 22:16:02 cg Exp $' |
511 ^ '$Header: /cvs/stx/stx/libbasic2/TerminalSession.st,v 1.6 2013-08-01 18:47:02 cg Exp $' |
512 ! ! |
512 ! ! |
513 |
513 |
514 |
514 |
515 TerminalSession initialize! |
515 TerminalSession initialize! |