changeset 421 | 5758ae881cc1 |
parent 420 | 0375b64c2a10 |
child 422 | 22b0834a760a |
420:0375b64c2a10 | 421:5758ae881cc1 |
---|---|
34 ]. |
34 ]. |
35 |
35 |
36 img notNil ifTrue:[ |
36 img notNil ifTrue:[ |
37 Smalltalk at:#'__BannerView__' put:(view := PopUpBanner forImage:img). |
37 Smalltalk at:#'__BannerView__' put:(view := PopUpBanner forImage:img). |
38 view showCentered. |
38 view showCentered. |
39 Display flush. |
|
39 ]. |
40 ]. |
40 ]. |
41 ]. |
41 ! |
42 ! |