2635 "Modified: / 5.5.1999 / 18:51:00 / cg" |
2637 "Modified: / 5.5.1999 / 18:51:00 / cg" |
2636 ! ! |
2638 ! ! |
2637 |
2639 |
2638 !TerminalView methodsFor:'queries'! |
2640 !TerminalView methodsFor:'queries'! |
2639 |
2641 |
|
2642 computePreferredExtent |
|
2643 "return my preferred extent - this is computed from my numberOfLines, |
|
2644 numberOfCols and font size" |
|
2645 |
|
2646 ^ (fontWidth * self class defaultNumberOfColumns + ((leftMargin + margin) * 2)) |
|
2647 @ |
|
2648 ((self heightForLines:self class defaultNumberOfLines) + 8) |
|
2649 |
|
2650 "Created: / 09-11-2018 / 20:02:19 / Claus Gittinger" |
|
2651 ! |
|
2652 |
2640 isKeyboardConsumer |
2653 isKeyboardConsumer |
2641 "return true, if the receiver is a keyboard consumer; |
2654 "return true, if the receiver is a keyboard consumer; |
2642 Always return true here" |
2655 Always return true here" |
2643 |
2656 |
2644 ^ true |
2657 ^ true |
2645 ! |
|
2646 |
|
2647 preferredExtent |
|
2648 "return my preferred extent - this is computed from my numberOfLines, |
|
2649 numberOfCols and font size" |
|
2650 |
|
2651 ^ (fontWidth * self class defaultNumberOfColumns + ((leftMargin + margin) * 2)) |
|
2652 @ |
|
2653 ((self heightForLines:self class defaultNumberOfLines) + 8) |
|
2654 |
|
2655 "Modified: / 20-06-1998 / 20:06:57 / cg" |
|
2656 "Modified (format): / 16-11-2016 / 23:14:18 / cg" |
|
2657 ! |
2658 ! |
2658 |
2659 |
2659 terminalType |
2660 terminalType |
2660 "returns a string describing this terminal (usually, this is |
2661 "returns a string describing this terminal (usually, this is |
2661 passed down to the shell as TERM environment variable). |
2662 passed down to the shell as TERM environment variable). |