equal
deleted
inserted
replaced
1416 ^ super drawVisibleLine:visLineNr from:1 to:line size with:fg and:bg. |
1416 ^ super drawVisibleLine:visLineNr from:1 to:line size with:fg and:bg. |
1417 ]. |
1417 ]. |
1418 |
1418 |
1419 markType := line at:i2. |
1419 markType := line at:i2. |
1420 |
1420 |
1421 x := (self xOfCol:markIndex inVisibleLine:visLineNr) - leftOffset. |
1421 x := (self xOfCol:markIndex inVisibleLine:visLineNr) - viewOrigin x. |
1422 y := (self yOfVisibleLine:visLineNr) - (lineSpacing//2). |
1422 y := (self yOfVisibleLine:visLineNr) - (lineSpacing//2). |
1423 |
1423 |
1424 self paint:bg. |
1424 self paint:bg. |
1425 self fillRectangleX:margin y:y width:(width-(margin*2)) height:fontHeight. |
1425 self fillRectangleX:margin y:y width:(width-(margin*2)) height:fontHeight. |
1426 markIndex ~~ 1 ifTrue:[ |
1426 markIndex ~~ 1 ifTrue:[ |
2732 ! ! |
2732 ! ! |
2733 |
2733 |
2734 !MenuView class methodsFor:'documentation'! |
2734 !MenuView class methodsFor:'documentation'! |
2735 |
2735 |
2736 version |
2736 version |
2737 ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.129 2001-09-05 14:33:38 cg Exp $' |
2737 ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.130 2001-10-05 08:56:34 cg Exp $' |
2738 ! ! |
2738 ! ! |