changeset 6079 | 0cda554f60c7 |
parent 5897 | 2557ab3713e8 |
child 6242 | ca40c9a97367 |
6078:53e0acc50b42 | 6079:0cda554f60c7 |
---|---|
353 ! |
353 ! |
354 |
354 |
355 initialize |
355 initialize |
356 |mm sep| |
356 |mm sep| |
357 |
357 |
358 <modifier: #super> "must be called if redefined" |
|
359 |
|
358 super initialize. |
360 super initialize. |
359 self addOkButton. |
361 self addOkButton. |
360 |
362 |
361 "/ label := 'Info'. |
363 "/ label := 'Info'. |
362 |
364 |
394 b := InfoBox new. |
396 b := InfoBox new. |
395 b title:'hello'. |
397 b title:'hello'. |
396 b open |
398 b open |
397 " |
399 " |
398 |
400 |
399 "Modified: / 29-07-2011 / 12:31:29 / cg" |
401 "Modified: / 08-02-2017 / 00:26:21 / cg" |
400 ! ! |
402 ! ! |
401 |
403 |
402 !InfoBox methodsFor:'queries'! |
404 !InfoBox methodsFor:'queries'! |
403 |
405 |
404 beepWhenOpening |
406 beepWhenOpening |