equal
deleted
inserted
replaced
1340 aBlock value:progressValue value:labelValue |
1340 aBlock value:progressValue value:labelValue |
1341 ] |
1341 ] |
1342 ] ensure:[ |
1342 ] ensure:[ |
1343 p := nil. |
1343 p := nil. |
1344 closeTopWhenDone ifTrue:[ |
1344 closeTopWhenDone ifTrue:[ |
|
1345 connectedTop sensor pushEvent:(WindowEvent terminateView:connectedTop). |
1345 connectedTop hide |
1346 connectedTop hide |
1346 ]. |
1347 ]. |
1347 finishAction value |
1348 finishAction value |
1348 ] |
1349 ] |
1349 ] newProcess. |
1350 ] newProcess. |
1378 ]. |
1379 ]. |
1379 ]. |
1380 ]. |
1380 |
1381 |
1381 " |
1382 " |
1382 |
1383 |
1383 "Modified: / 21.10.1998 / 17:37:00 / cg" |
1384 "Modified: / 20-08-2011 / 18:50:50 / cg" |
1384 ! ! |
1385 ! ! |
1385 |
1386 |
1386 !ProgressIndicator class methodsFor:'documentation'! |
1387 !ProgressIndicator class methodsFor:'documentation'! |
1387 |
1388 |
1388 version |
1389 version |
1389 ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.64 2011-01-25 11:43:52 cg Exp $' |
1390 ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.65 2011-08-20 17:07:03 cg Exp $' |
1390 ! |
1391 ! |
1391 |
1392 |
1392 version_CVS |
1393 version_CVS |
1393 ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.64 2011-01-25 11:43:52 cg Exp $' |
1394 ^ '$Header: /cvs/stx/stx/libwidg2/ProgressIndicator.st,v 1.65 2011-08-20 17:07:03 cg Exp $' |
1394 ! ! |
1395 ! ! |