Tools__CodeView2.st
changeset 19122 3c948e229a60
parent 19098 b8b0683054da
child 19145 59c56f824a5d
equal deleted inserted replaced
19121:e8f6eaa31790 19122:3c948e229a60
  2555                 aScroller displayRectangleX:3 y:(yThumb-5 max:0) width:aScroller width-5 height:9.
  2555                 aScroller displayRectangleX:3 y:(yThumb-5 max:0) width:aScroller width-5 height:9.
  2556             ].    
  2556             ].    
  2557         ].
  2557         ].
  2558         
  2558         
  2559     overAllHeight := textView numberOfLines.
  2559     overAllHeight := textView numberOfLines.
  2560     overAllHeight = 0 ifTrue:[ ^ self ].
  2560     overAllHeight == 0 ifTrue:[ ^ self ].
  2561 
  2561 
  2562     annotations notEmptyOrNil ifTrue:[
  2562     annotations notEmptyOrNil ifTrue:[
  2563         annotations do:[:eachAnnotation |
  2563         annotations do:[:eachAnnotation |
  2564             |lineNr severityColor severity|
  2564             |lineNr severityColor severity|
  2565 
  2565 
  4018     size := list size.
  4018     size := list size.
  4019     text:=''.
  4019     text:=''.
  4020     emptyLines isNil ifTrue:[emptyLines := #()].
  4020     emptyLines isNil ifTrue:[emptyLines := #()].
  4021     [ i <= size ] whileTrue:[
  4021     [ i <= size ] whileTrue:[
  4022         pom := emptyLines indexOf:i.
  4022         pom := emptyLines indexOf:i.
  4023         (pom = 0) ifFalse:[
  4023         (pom == 0) ifFalse:[
  4024             helperText := pole at:i.
  4024             helperText := pole at:i.
  4025             (helperText = '') ifFalse:[
  4025             (helperText = '') ifFalse:[
  4026                 (helperText isNil)ifTrue:[helperText:=''].
  4026                 (helperText isNil) ifTrue:[helperText:=''].
  4027                 helperText:=helperText,Character cr.
  4027                 helperText:=helperText,Character cr.
  4028                 text := text asString , helperText asString.
  4028                 text := text asString , helperText asString.
  4029             ].
  4029             ].
  4030         ] ifTrue:[
  4030         ] ifTrue:[
  4031             helperText := pole at:i.
  4031             helperText := pole at:i.