changeset 488 | 521e2d58f050 |
parent 487 | 6d6fbd3a4a46 |
child 489 | b055480c567d |
487:6d6fbd3a4a46 | 488:521e2d58f050 |
---|---|
1 "/ |
|
2 "/ $Header$ |
|
3 "/ |
|
4 "/ MIMEType: application/x-smalltalk-source |
|
5 "/ |
|
6 "/ if you dont like the splash banner at startup, |
|
7 "/ simply remove or rename the showBanner.rc file. |
|
8 "/ |
|
9 |
|
10 |view| |
|
11 |
|
12 (view := Smalltalk at:#'__BannerView__') notNil ifTrue:[ |
|
13 view destroy. |
|
14 Smalltalk removeKey:#'__BannerView__'. |
|
15 ]. |
|
16 |