2012 lineNr isNil ifTrue:[ ^ nil ]. |
2014 lineNr isNil ifTrue:[ ^ nil ]. |
2013 |
2015 |
2014 item := self at:lineNr ifAbsent:nil. |
2016 item := self at:lineNr ifAbsent:nil. |
2015 item notNil ifTrue:[ |
2017 item notNil ifTrue:[ |
2016 line := item perform:#label ifNotUnderstood:[item displayString]. |
2018 line := item perform:#label ifNotUnderstood:[item displayString]. |
2017 line isString ifTrue:[ |
2019 (line isString or:[line isLabelAndIcon]) ifTrue:[ |
2018 line := line string. |
2020 line := line string. |
2019 line := line withoutSeparators. |
2021 line := line withoutSeparators. |
2020 ]. |
2022 ]. |
2021 ]. |
2023 ]. |
2022 line notNil ifTrue:[ |
2024 line notNil ifTrue:[ |
2023 len := self widthOfWidestLineBetween:lineNr and:lineNr. |
2025 len := self widthOfWidestLineBetween:lineNr and:lineNr. |
2024 len > width ifTrue:[ |
2026 len > width ifTrue:[ |
2025 text := line collect:[:ch | ch isSeparator ifTrue:[Character space] ifFalse:[ch]]. |
2027 (line isString or:[line isLabelAndIcon]) ifTrue:[ |
|
2028 text := line string collect:[:ch | ch isSeparator ifTrue:[Character space] ifFalse:[ch]]. |
|
2029 ]. |
2026 ]. |
2030 ]. |
2027 |
2031 |
2028 "/ a hack; maybe we'll find a better solution... |
2032 "/ a hack; maybe we'll find a better solution... |
2029 (line respondsTo:#helpText) ifTrue:[ |
2033 (line respondsTo:#helpText) ifTrue:[ |
2030 (text2 := line helpText) notEmptyOrNil ifTrue:[ |
2034 (text2 := line helpText) notEmptyOrNil ifTrue:[ |