Mercurial Mercurial > hg > stx-libwidg / 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, 11 Feb 2020 16:57:51 +0100
changeset 6818 c0cabbabbf82
parent 6817 eafd7df4b2d7
child 6819 70fd62a15070
#DOCUMENTATION by cg class: RadioButton class comment/format in: #examples
RadioButton.st file | annotate | diff | comparison | revisions 
--- a/RadioButton.st	Fri Feb 07 19:22:54 2020 +0100
+++ b/RadioButton.st	Tue Feb 11 16:57:51 2020 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
@@ -70,10 +68,7 @@
     top := StandardSystemView new.
     top extent:200@200.
 
-    panel := HorizontalPanelView
-                origin:0.0@0.0
-                corner:1.0@1.0
-                    in:top.
+    panel := HorizontalPanelView origin:(0.0@0.0) corner:(1.0@1.0) in:top.
 
     group := RadioButtonGroup new.
 
@@ -99,10 +94,7 @@
     top := StandardSystemView new.
     top extent:200@200.
 
-    panel := HorizontalPanelView
-                origin:0.0@0.0
-                corner:1.0@1.0
-                    in:top.
+    panel := HorizontalPanelView origin:(0.0@0.0) corner:(1.0@1.0) in:top.
 
     group := RadioButtonGroup new.
 
@@ -126,8 +118,7 @@
 
     top := StandardSystemView extent:200@200.
 
-    panel := HorizontalPanelView
-                origin:0.0@0.0 corner:1.0@1.0 in:top.
+    panel := HorizontalPanelView origin:0.0@0.0 corner:1.0@1.0 in:top.
 
     group := RadioButtonGroup new.
     selectionInList := SelectionInList new.
hg/stx-libwidg