Label.st
changeset 1039 28ff56306e31
parent 993 51cce445b5d5
child 1089 abb0c3d4b5f4
equal deleted inserted replaced
1038:c6d8eb89d260 1039:28ff56306e31
  1150     ]
  1150     ]
  1151 !
  1151 !
  1152 
  1152 
  1153 model:aModel
  1153 model:aModel
  1154     super model:aModel.
  1154     super model:aModel.
  1155     self getLabelFromModel.
  1155     labelMsg notNil ifTrue:[
       
  1156         self getLabelFromModel.
       
  1157     ]
  1156 ! !
  1158 ! !
  1157 
  1159 
  1158 !Label methodsFor:'change & update'!
  1160 !Label methodsFor:'change & update'!
  1159 
  1161 
  1160 backgroundChannelChanged
  1162 backgroundChannelChanged
  1636 ! !
  1638 ! !
  1637 
  1639 
  1638 !Label class methodsFor:'documentation'!
  1640 !Label class methodsFor:'documentation'!
  1639 
  1641 
  1640 version
  1642 version
  1641     ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.73 1997-02-08 14:23:29 cg Exp $'
  1643     ^ '$Header: /cvs/stx/stx/libwidg/Label.st,v 1.74 1997-02-24 20:10:55 ca Exp $'
  1642 ! !
  1644 ! !