equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1989 by Claus Gittinger |
4 COPYRIGHT (c) 1989 by Claus Gittinger |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
334 " |
336 " |
335 |
337 |
336 "Modified: 13.12.1995 / 16:20:01 / cg" |
338 "Modified: 13.12.1995 / 16:20:01 / cg" |
337 ! ! |
339 ! ! |
338 |
340 |
|
341 !YesNoBox methodsFor:'testing'! |
|
342 |
|
343 isWarningBox |
|
344 ^ false |
|
345 ! ! |
|
346 |
339 !YesNoBox methodsFor:'user interaction'! |
347 !YesNoBox methodsFor:'user interaction'! |
340 |
348 |
341 noPressed |
349 noPressed |
342 "user pressed the no-button; |
350 "user pressed the no-button; |
343 hide myself and evaluate the action" |
351 hide myself and evaluate the action" |