UIPainter.st
changeset 254 389b916506ac
parent 253 3dfd92c4cb56
child 256 d8643afc8203
equal deleted inserted replaced
253:3dfd92c4cb56 254:389b916506ac
  1297 ! !
  1297 ! !
  1298 
  1298 
  1299 !UIPainter methodsFor:'aspects'!
  1299 !UIPainter methodsFor:'aspects'!
  1300 
  1300 
  1301 canStepIn
  1301 canStepIn
  1302     ^ self booleanAspectFor:#canStepIn
  1302     ^ builder booleanAspectFor:#canStepIn
  1303 
  1303 
  1304     "Modified: 28.7.1997 / 12:41:56 / cg"
  1304     "Modified: 28.7.1997 / 12:47:47 / cg"
  1305 !
  1305 !
  1306 
  1306 
  1307 canStepOut
  1307 canStepOut
  1308     ^ self booleanAspectFor:#canStepOut
  1308     ^ builder booleanAspectFor:#canStepOut
  1309 
  1309 
  1310     "Modified: 28.7.1997 / 12:42:03 / cg"
  1310     "Modified: 28.7.1997 / 12:47:49 / cg"
  1311 !
  1311 !
  1312 
  1312 
  1313 enableChannel
  1313 enableChannel
  1314     "true if modifications are allowed otherwise running test
  1314     "true if modifications are allowed otherwise running test
  1315     "
  1315     "
  1326     ^ holder
  1326     ^ holder
  1327 
  1327 
  1328 !
  1328 !
  1329 
  1329 
  1330 hasSingleSelection
  1330 hasSingleSelection
  1331     ^ self booleanAspectFor:#hasSingleSelection
  1331     ^ builder booleanAspectFor:#hasSingleSelection
  1332 
  1332 
  1333     "Modified: 28.7.1997 / 12:42:24 / cg"
  1333     "Modified: 28.7.1997 / 12:47:51 / cg"
  1334 !
  1334 !
  1335 
  1335 
  1336 hasValidSelection
  1336 hasValidSelection
  1337     ^ self booleanAspectFor:#hasValidSelection
  1337     ^ builder booleanAspectFor:#hasValidSelection
  1338 
  1338 
  1339     "Modified: 28.7.1997 / 12:42:30 / cg"
  1339     "Modified: 28.7.1997 / 12:47:52 / cg"
  1340 !
  1340 !
  1341 
  1341 
  1342 modifiedChannel
  1342 modifiedChannel
  1343     ^ self booleanAspectFor:#modifiedChannel
  1343     ^ builder booleanAspectFor:#modifiedChannel
  1344 
  1344 
  1345     "Modified: 28.7.1997 / 12:42:38 / cg"
  1345     "Modified: 28.7.1997 / 12:47:54 / cg"
  1346 !
  1346 !
  1347 
  1347 
  1348 noteBookView
  1348 noteBookView
  1349     "automatically generated by UIPainter ..."
  1349     "automatically generated by UIPainter ..."
  1350 
  1350