checkin from browser
authorClaus Gittinger <cg@exept.de>
Wed, 20 May 1998 03:51:48 +0200
changeset 842 b412ee25ae80
parent 841 03746970088f
child 843 273d9a7c2712
checkin from browser
DataSetBuilder.st
--- a/DataSetBuilder.st	Wed May 20 03:50:21 1998 +0200
+++ b/DataSetBuilder.st	Wed May 20 03:51:48 1998 +0200
@@ -624,13 +624,15 @@
                  #(#FramedBoxSpec
                     #name: 'framedBox1'
                     #layout: #(#LayoutFrame 0 0.0 3 0.0 0 1.0 -34 1.0)
-                    #label: 'Classes for code'
+                    #label: 'Class for code'
+                    #translateLabel: true
                     #labelPosition: #topLeft
                 )
                  #(#LabelSpec
                     #name: 'classLabel'
                     #layout: #(#AlignmentOrigin 73 0.11 38 0 1 0.5)
                     #label: 'Class:'
+                    #translateLabel: true
                     #adjust: #right
                     #resizeForLabel: true
                 )
@@ -644,6 +646,7 @@
                     #name: 'superClassLabel'
                     #layout: #(#AlignmentOrigin 73 0.11 65 0 1 0.5)
                     #label: 'Superclass:'
+                    #translateLabel: true
                     #adjust: #right
                     #resizeForLabel: true
                 )
@@ -662,6 +665,8 @@
               )
           )
       )
+
+    "Modified: / 20.5.1998 / 03:46:17 / cg"
 !
 
 formatEditSpec
@@ -2446,10 +2451,9 @@
 
     (cls := self resolveClassNamed) notNil 
         ifTrue: [SystemBrowser openInClass:cls] 
-        ifFalse:[self information:'No class defined!!']
-
-
-
+        ifFalse:[self information:'No class defined !!']
+
+    "Modified: / 20.5.1998 / 03:48:04 / cg"
 !
 
 doCopy