MenuView.st
changeset 4574 2bd3a619a8a4
parent 4546 51a852797d70
child 4611 2d2755dd6efe
equal deleted inserted replaced
4573:f181a93c3bc2 4574:2bd3a619a8a4
  2126         self leftMargin:(font height " // 2" + 2 "inset of rounded rect") "10".
  2126         self leftMargin:(font height " // 2" + 2 "inset of rounded rect") "10".
  2127     ] ifFalse:[
  2127     ] ifFalse:[
  2128         (hilightLevel ~~ 0) ifTrue:[
  2128         (hilightLevel ~~ 0) ifTrue:[
  2129             self leftMargin:hilightLevel abs + margin abs + 1.
  2129             self leftMargin:hilightLevel abs + margin abs + 1.
  2130             lineSpacing := lineSpacing max:(hilightLevel abs * 2).
  2130             lineSpacing := lineSpacing max:(hilightLevel abs * 2).
  2131         ]
  2131         ].
       
  2132         lineSpacing := lineSpacing max:2.
  2132     ].
  2133     ].
  2133 
  2134 
  2134     "Modified: 5.6.1996 / 14:36:56 / cg"
  2135     "Modified: 5.6.1996 / 14:36:56 / cg"
  2135 !
  2136 !
  2136 
  2137 
  2987 ! !
  2988 ! !
  2988 
  2989 
  2989 !MenuView class methodsFor:'documentation'!
  2990 !MenuView class methodsFor:'documentation'!
  2990 
  2991 
  2991 version
  2992 version
  2992     ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.174 2013-03-31 10:08:05 cg Exp $'
  2993     ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.175 2013-04-26 12:59:14 cg Exp $'
  2993 !
  2994 !
  2994 
  2995 
  2995 version_CVS
  2996 version_CVS
  2996     ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.174 2013-03-31 10:08:05 cg Exp $'
  2997     ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.175 2013-04-26 12:59:14 cg Exp $'
  2997 ! !
  2998 ! !
  2998 
  2999