NoteBookView.st
changeset 4182 ec9c90dd35ca
parent 4160 fa7a009d1155
child 4229 a8f551219f4e
equal deleted inserted replaced
4181:34f4fd818a18 4182:ec9c90dd35ca
  2575      tabLvlAbs   "{ Class:SmallInteger }"
  2575      tabLvlAbs   "{ Class:SmallInteger }"
  2576      minLeft     "{ Class:SmallInteger }"
  2576      minLeft     "{ Class:SmallInteger }"
  2577      maxRight    "{ Class:SmallInteger }"
  2577      maxRight    "{ Class:SmallInteger }"
  2578      leftMargin  "{ Class:SmallInteger }"
  2578      leftMargin  "{ Class:SmallInteger }"
  2579      rightMargin "{ Class:SmallInteger }"
  2579      rightMargin "{ Class:SmallInteger }"
       
  2580      nLines
  2580     |
  2581     |
  2581 
  2582 
  2582     tabLvlAbs     := tabLevel abs "max:1".
  2583     tabLvlAbs     := tabLevel abs "max:1".
  2583     border        := tabLvlAbs * 2.
  2584     border        := tabLvlAbs * 2.
  2584     tabHeight     := 0.
  2585     tabHeight     := 0.
  2618         delta := tabHeight negated.
  2619         delta := tabHeight negated.
  2619     ] ifFalse:[
  2620     ] ifFalse:[
  2620         delta := tabHeight
  2621         delta := tabHeight
  2621     ].
  2622     ].
  2622 
  2623 
  2623     lastLnNr := numberOfLines.
  2624     lastLnNr := nLines := self numberOfLines.
  2624 
  2625 
  2625     list reverseDo:[:aTab|
  2626     list reverseDo:[:aTab|
  2626         |tabLayout|
  2627         |tabLayout|
  2627 
  2628 
  2628         aTab lineNr ~~ lastLnNr ifTrue:[
  2629         aTab lineNr ~~ lastLnNr ifTrue:[
  3767 ! !
  3768 ! !
  3768 
  3769 
  3769 !NoteBookView class methodsFor:'documentation'!
  3770 !NoteBookView class methodsFor:'documentation'!
  3770 
  3771 
  3771 version
  3772 version
  3772     ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.177 2012-12-14 14:23:15 cg Exp $'
  3773     ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.178 2013-03-10 20:26:39 cg Exp $'
  3773 !
  3774 !
  3774 
  3775 
  3775 version_CVS
  3776 version_CVS
  3776     ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.177 2012-12-14 14:23:15 cg Exp $'
  3777     ^ '$Header: /cvs/stx/stx/libwidg2/NoteBookView.st,v 1.178 2013-03-10 20:26:39 cg Exp $'
  3777 ! !
  3778 ! !
       
  3779