equal
deleted
inserted
replaced
399 the correct device - even if not specified explicitely. |
399 the correct device - even if not specified explicitely. |
400 This does not yet work fully satisfying ..." |
400 This does not yet work fully satisfying ..." |
401 |
401 |
402 |wg tops v dev| |
402 |wg tops v dev| |
403 |
403 |
|
404 AllScreens isNil ifTrue:[ |
|
405 ^ Display |
|
406 ]. |
404 AllScreens size == 1 ifTrue:[ |
407 AllScreens size == 1 ifTrue:[ |
405 ^ AllScreens anElement |
408 ^ AllScreens anElement |
406 ]. |
409 ]. |
407 |
410 |
408 " |
411 " |
3714 ! ! |
3717 ! ! |
3715 |
3718 |
3716 !DeviceWorkstation class methodsFor:'documentation'! |
3719 !DeviceWorkstation class methodsFor:'documentation'! |
3717 |
3720 |
3718 version |
3721 version |
3719 ^ '$Header: /cvs/stx/stx/libview/Attic/DevWorkst.st,v 1.62 1996-01-02 14:09:28 cg Exp $' |
3722 ^ '$Header: /cvs/stx/stx/libview/Attic/DevWorkst.st,v 1.63 1996-01-03 17:27:56 cg Exp $' |
3720 ! ! |
3723 ! ! |
3721 DeviceWorkstation initialize! |
3724 DeviceWorkstation initialize! |