UIPainter.st
changeset 3238 04a843a6ae79
parent 3236 2e494c0bcf47
child 3241 1fca4b63f4bf
equal deleted inserted replaced
3237:de989be6d856 3238:04a843a6ae79
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 1995-1998 by eXept Software AG
     4  COPYRIGHT (c) 1995-1998 by eXept Software AG
     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
  5263     ].
  5265     ].
  5264 
  5266 
  5265     self clearModified
  5267     self clearModified
  5266 !
  5268 !
  5267 
  5269 
  5268 addWidget: aSpecClass
  5270 addWidget: aSpecClassSymbol
  5269     "adds a widget from aSpecClass to the current widget"
  5271     "adds a widget from aSpecClass to the current widget"
  5270 
  5272 
  5271     self addWidgetOfSpec: (Array with: (Smalltalk at: aSpecClass) new)
  5273     self addWidgetOfSpec: (Array with: (Smalltalk at: aSpecClassSymbol) new)
  5272 
       
  5273 !
  5274 !
  5274 
  5275 
  5275 addWidgetOfSpec: aSpec
  5276 addWidgetOfSpec: aSpec
  5276     "adds a widget from aSpec to the current widget"
  5277     "adds a widget from aSpec to the current widget"
  5277 
  5278