Mercurial Mercurial > hg > stx-libwidg2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Tue, 08 Jan 2019 14:14:20 +0100
changeset 5983 023c539cad97
parent 5982 99f5b623447c
child 5984 ba363b1766e4
#DOCUMENTATION by cg class: ComboView comment/format in: #initialize
ComboView.st file | annotate | diff | comparison | revisions 
--- a/ComboView.st	Thu Dec 27 22:27:01 2018 +0100
+++ b/ComboView.st	Tue Jan 08 14:14:20 2019 +0100
@@ -683,7 +683,7 @@
     pullDownButton origin:1.0@0.0 corner:1.0@1.0.
     styleSheet is3D ifTrue:[
         halfSpacing := ViewSpacing // 2.
-        leftInset := rightInset := prefWidth + halfSpacing.
+        leftInset := rightInset := (prefWidth + halfSpacing).
         (lvl := styleSheet at:#'comboView.level' default:nil) notNil ifTrue:[
             self level:lvl.
             field level:0.
@@ -717,8 +717,8 @@
     ].
     field rightInset:rightInset.
     pullDownButton leftInset:leftInset negated.
+    self initialHeight:(field preferredHeight + ViewSpacing).
 
-    self initialHeight:field preferredHeight + ViewSpacing.
     "
      |b|
 
@@ -727,8 +727,9 @@
      b open
     "
 
-    "Created: / 28.2.1996 / 15:03:17 / cg"
-    "Modified: / 8.9.1998 / 20:33:22 / cg"
+    "Created: / 28-02-1996 / 15:03:17 / cg"
+    "Modified: / 08-09-1998 / 20:33:22 / cg"
+    "Modified: / 08-01-2019 / 14:16:03 / Claus Gittinger"
 !
 
 initializeButton
hg/stx-libwidg2