checkin from browser
authorClaus Gittinger <cg@exept.de>
Wed, 05 Jun 1996 16:59:46 +0200
changeset 751 624eb94690c8
parent 750 94db70fea830
child 752 a5781b7ff8cb
checkin from browser
MenuView.st
--- a/MenuView.st	Wed Jun 05 16:57:21 1996 +0200
+++ b/MenuView.st	Wed Jun 05 16:59:46 1996 +0200
@@ -1825,12 +1825,12 @@
         self leftMargin:(font height " // 2" + 2 "inset of rounded rect") "10".
     ] ifFalse:[
         (hilightLevel ~~ 0) ifTrue:[
-            self leftMargin:hilightLevel abs + self margin abs + 1.
+            self leftMargin:hilightLevel abs + margin abs + 1.
             lineSpacing := lineSpacing max:(hilightLevel abs * 2).
         ]
     ].
 
-    "Modified: 30.5.1996 / 09:19:46 / cg"
+    "Modified: 5.6.1996 / 14:36:56 / cg"
 !
 
 recreate
@@ -2538,5 +2538,5 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.87 1996-06-05 14:57:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.88 1996-06-05 14:59:46 cg Exp $'
 ! !