equal
deleted
inserted
replaced
2455 |
2455 |
2456 |v| |
2456 |v| |
2457 |
2457 |
2458 (v := self pickAView) notNil ifTrue:[ |
2458 (v := self pickAView) notNil ifTrue:[ |
2459 self migrateWindow:v topView |
2459 self migrateWindow:v topView |
|
2460 ] |
|
2461 ! |
|
2462 |
|
2463 viewSelectAndShrink |
|
2464 "let user pick a view and shrink it to a reasonable size |
|
2465 Added for stupid mac, to get windows back onto the screen, |
|
2466 which have their resize handle hidden." |
|
2467 |
|
2468 |v| |
|
2469 |
|
2470 (v := self pickAView) notNil ifTrue:[ |
|
2471 v topView |
|
2472 origin:50@50 extent:200@200; |
|
2473 raise |
2460 ] |
2474 ] |
2461 ! |
2475 ! |
2462 |
2476 |
2463 widgetHardcopy |
2477 widgetHardcopy |
2464 "after a second (to allow redraw of views under menu ...), |
2478 "after a second (to allow redraw of views under menu ...), |
6962 ! ! |
6976 ! ! |
6963 |
6977 |
6964 !AbstractLauncherApplication class methodsFor:'documentation'! |
6978 !AbstractLauncherApplication class methodsFor:'documentation'! |
6965 |
6979 |
6966 version |
6980 version |
6967 ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.462 2014-06-23 08:59:50 cg Exp $' |
6981 ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.463 2014-07-03 18:38:18 cg Exp $' |
6968 ! |
6982 ! |
6969 |
6983 |
6970 version_CVS |
6984 version_CVS |
6971 ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.462 2014-06-23 08:59:50 cg Exp $' |
6985 ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.463 2014-07-03 18:38:18 cg Exp $' |
6972 ! |
6986 ! |
6973 |
6987 |
6974 version_SVN |
6988 version_SVN |
6975 ^ '$Id: AbstractLauncherApplication.st,v 1.462 2014-06-23 08:59:50 cg Exp $' |
6989 ^ '$Id: AbstractLauncherApplication.st,v 1.463 2014-07-03 18:38:18 cg Exp $' |
6976 ! ! |
6990 ! ! |
6977 |
6991 |