1 "

     3 "

     2  COPYRIGHT (c) 1989 by Claus Gittinger

     4  COPYRIGHT (c) 1989 by Claus Gittinger

     3 	      All Rights Reserved

     5 	      All Rights Reserved

     4 

     6 

     5  This software is furnished under a license and may be used

     7  This software is furnished under a license and may be used

  1058     "set the labels form; adjust extent if not already realized.

  1060     "set the labels form; adjust extent if not already realized.

  1059      OBSOLETE: you should now use #label: for both strings and images"

  1061      OBSOLETE: you should now use #label: for both strings and images"

  1060 

  1062 

  1061     <resource:#obsolete>

  1063     <resource:#obsolete>

  1062 

  1064 

  1063     self label:aForm

  1066     self label:aForm

  1064 !

  1067 !

  1065 

  1068 

  1066 label

  1069 label

  1067     "return the labels string or image"

  1070     "return the labels string or image"

  1178      OBSOLETE: the old version used #form: for images and #label: for strings.

  1181      OBSOLETE: the old version used #form: for images and #label: for strings.

  1179                you should now use #label: for any."

  1182                you should now use #label: for any."

  1180 

  1183 

  1181     <resource:#obsolete>

  1184     <resource:#obsolete>

  1182 

  1185 

  1183     self label:something

  1187     self label:something

  1184 ! !

  1188 ! !

  1185 

  1189 

  1186 !Label methodsFor:'accessing-layout'!

  1190 !Label methodsFor:'accessing-layout'!

  1187 

  1191 

  1277      In future versions of ST/X, #layout: will behave the VW way.

  1281      In future versions of ST/X, #layout: will behave the VW way.

  1278      In the meantime, try to figure out what is meant ... a kludge"

  1282      In the meantime, try to figure out what is meant ... a kludge"

  1279 

  1283 

  1280     <resource:#obsolete>

  1284     <resource:#obsolete>

  1281 

  1285 

  1282     something isSymbol ifFalse:[^ super layout:something].

  1287     something isSymbol ifFalse:[^ super layout:something].

  1283 

  1288 

  1284     self obsoleteMethodWarning:'use #adjust:'.

  1289     self obsoleteMethodWarning:'use #adjust:'.

  1285     self adjust:something

  1290     self adjust:something

  1286 

  1291