UIPainter.st
changeset 877 f31f41b29710
parent 852 c24c7584abe4
child 884 a291fc248a8b
equal deleted inserted replaced
876:32b1012426e3 877:f31f41b29710
  2166 
  2166 
  2167 defaultInfoLabel
  2167 defaultInfoLabel
  2168     "returns the default info label"
  2168     "returns the default info label"
  2169 
  2169 
  2170     specClass isNil ifTrue: [^'No class and selector defined.'].
  2170     specClass isNil ifTrue: [^'No class and selector defined.'].
       
  2171     specSelector isNil ifTrue: [^'No selector defined.'].
  2171     ^specClass printString, ' >> ', specSelector
  2172     ^specClass printString, ' >> ', specSelector
       
  2173 
       
  2174     "Modified: / 20.6.1998 / 16:49:16 / cg"
  2172 ! !
  2175 ! !
  2173 
  2176 
  2174 !UIPainter methodsFor:'private'!
  2177 !UIPainter methodsFor:'private'!
  2175 
  2178 
  2176 askForModification
  2179 askForModification