equal
deleted
inserted
replaced
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
9 other person. No title to or ownership of the software is |
9 other person. No title to or ownership of the software is |
10 hereby transferred. |
10 hereby transferred. |
11 " |
11 " |
12 "{ Package: 'stx:libwidg2' }" |
12 "{ Package: 'stx:libwidg2' }" |
|
13 |
|
14 "{ NameSpace: Smalltalk }" |
13 |
15 |
14 TextCollector subclass:#TerminalView |
16 TextCollector subclass:#TerminalView |
15 instanceVariableNames:'inStream outStream readerProcess shellPid kbdSequences |
17 instanceVariableNames:'inStream outStream readerProcess shellPid kbdSequences |
16 escapeSequenceTree currentSequence kbdMap escapeLeadingChars |
18 escapeSequenceTree currentSequence kbdMap escapeLeadingChars |
17 numberOfColumns numberOfLines shellTerminateAction rangeStartLine |
19 numberOfColumns numberOfLines shellTerminateAction rangeStartLine |
2135 "Modified: / 5.5.1999 / 18:51:00 / cg" |
2137 "Modified: / 5.5.1999 / 18:51:00 / cg" |
2136 ! ! |
2138 ! ! |
2137 |
2139 |
2138 !TerminalView methodsFor:'queries'! |
2140 !TerminalView methodsFor:'queries'! |
2139 |
2141 |
|
2142 isKeyboardConsumer |
|
2143 "return true, if the receiver is a keyboard consumer; |
|
2144 Always return true here" |
|
2145 |
|
2146 ^ true |
|
2147 ! |
|
2148 |
2140 preferredExtent |
2149 preferredExtent |
2141 "return my preferred extent - this is computed from my numberOfLines, |
2150 "return my preferred extent - this is computed from my numberOfLines, |
2142 numberOfCols and font size" |
2151 numberOfCols and font size" |
2143 |
2152 |
2144 ^ (fontWidth * self class defaultNumberOfColumns + (leftMargin + margin * 2)) |
2153 ^ (fontWidth * self class defaultNumberOfColumns + (leftMargin + margin * 2)) |
2503 ! ! |
2512 ! ! |
2504 |
2513 |
2505 !TerminalView class methodsFor:'documentation'! |
2514 !TerminalView class methodsFor:'documentation'! |
2506 |
2515 |
2507 version |
2516 version |
2508 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.197 2014-11-15 16:32:17 cg Exp $' |
2517 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.198 2015-02-24 15:47:24 cg Exp $' |
2509 ! |
2518 ! |
2510 |
2519 |
2511 version_CVS |
2520 version_CVS |
2512 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.197 2014-11-15 16:32:17 cg Exp $' |
2521 ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.198 2015-02-24 15:47:24 cg Exp $' |
2513 ! ! |
2522 ! ! |
2514 |
2523 |
2515 |
2524 |
2516 TerminalView initialize! |
2525 TerminalView initialize! |