equal
deleted
inserted
replaced
2083 |
2083 |
2084 ((requiredW > width) or:[requiredW < (width * 3 // 4)]) ifTrue:[ |
2084 ((requiredW > width) or:[requiredW < (width * 3 // 4)]) ifTrue:[ |
2085 "/ some hysteresis to avoid quick readjust again |
2085 "/ some hysteresis to avoid quick readjust again |
2086 newWidth := (requiredW * 1.1) rounded. |
2086 newWidth := (requiredW * 1.1) rounded. |
2087 self corner:(newWidth+1 @ 1.0). |
2087 self corner:(newWidth+1 @ 1.0). |
2088 textViewScroller origin:(newWidth @ 0.0) corner:(1.0 @ 1.0). |
2088 [ |
|
2089 textView removeDependent:self. |
|
2090 textViewScroller origin:(newWidth @ 0.0) corner:(1.0 @ 1.0). |
|
2091 ] ensure:[ |
|
2092 textView addDependent:self. |
|
2093 ]. |
2089 self invalidate. |
2094 self invalidate. |
2090 ]. |
2095 ]. |
2091 ! |
2096 ! |
2092 |
2097 |
2093 update:something with:aParameter from:changedObject |
2098 update:something with:aParameter from:changedObject |
2094 "/ self shown ifFalse:[^self]. |
2099 "/ self shown ifFalse:[^self]. |
2095 |
2100 |
2096 (changedObject == textView) ifTrue:[ |
2101 (changedObject == textView) ifTrue:[ |
2097 (something == #sizeOfContents) ifTrue:[ |
2102 ((something == #sizeOfContents) |
|
2103 or:[ false "(something == #sizeOfView)" ]) ifTrue:[ |
2098 self adjustSizeForLongestLine. |
2104 self adjustSizeForLongestLine. |
2099 |
2105 |
2100 "/ (numberOfLines ~= (textView list size max:textView cursorLine)) ifTrue:[ |
2106 "/ (numberOfLines ~= (textView list size max:textView cursorLine)) ifTrue:[ |
2101 "/ self invalidate. |
2107 "/ self invalidate. |
2102 "/ ]. |
2108 "/ ]. |
3535 ! ! |
3541 ! ! |
3536 |
3542 |
3537 !CodeView2 class methodsFor:'documentation'! |
3543 !CodeView2 class methodsFor:'documentation'! |
3538 |
3544 |
3539 version |
3545 version |
3540 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.93 2013-06-30 07:12:03 cg Exp $' |
3546 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.94 2013-07-03 21:16:11 cg Exp $' |
3541 ! |
3547 ! |
3542 |
3548 |
3543 version_CVS |
3549 version_CVS |
3544 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.93 2013-06-30 07:12:03 cg Exp $' |
3550 ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.94 2013-07-03 21:16:11 cg Exp $' |
3545 ! |
3551 ! |
3546 |
3552 |
3547 version_SVN |
3553 version_SVN |
3548 ^ '$Id: Tools__CodeView2.st,v 1.93 2013-06-30 07:12:03 cg Exp $' |
3554 ^ '$Id: Tools__CodeView2.st,v 1.94 2013-07-03 21:16:11 cg Exp $' |
3549 ! ! |
3555 ! ! |
3550 |
3556 |
3551 |
3557 |
3552 CodeView2 initialize! |
3558 CodeView2 initialize! |